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00101 ZERO CDU Switch altered before expiration of 30 second wait 

00102 computer unable to achieve desired optics mode 

00103 sxT-oN Switch turned on with optics not in zero cdj mode 
OO lOA NO yac area available for marks 

0010s internal marks reuuest with mark system busy 

00106 SXT-ON Switch noi in desired state at mark time or mark with all requested marks accepted 

00107 MARK accept WITH MARK SYSTEM NOT IN USE 

001 10 MARK accept WITH ALL REQUESTED MARKS ACCEPTEOt OR NO MARKS SINCE INITIALIZATION OR LAST MARK ACCEPT 

IMU sub-system 


00201 CDU ZERO SWITCH ALILkED BEFORE EXPIRATION OF 30 SECOND WAIT 

00202 COMPUTER UNABLE TO ACHIEVE DESIRED MODE 

00203 NO IMU MODE INDICATED TO COMPUTER 

0020A MODE SwiTCH WITH TRNSW 1n COMPUTER CONTROL* BUT COMPUTER NOT COMMANDING 

General mission program errors (error return on imustall* etc.) 

00301 CURTAINS PROGRAM 

PROCEDURAL DIFFICULTY 
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01104 C-RELAY FAILED DURING C-RELAY TEST 

LIST OVERFLOWS (ALL ABORTS) 


01201 executive overflow - NO VAC AREAS 

01202 EXECUTIVE OVERFLOW - NO CORE SETS 

01203 WAITLIST OVERFLOa - TOO MANY TASKS 

01204 SLIGHT VARIATION OF 01203 

01205 MASTER CONTROL OVERFLOW - TOD MANY UOBS WAITING 

01206 keyboard ♦ DISPLAY WAITING LINE OVERFLOW 

01207 NO VAC AREA FOR MARKS 

01210 something already WAITING IN IMUSTALL 

interpreter errors 


01301 arccos-arcsin input angle too large 

01302 SORT called WITH NEGATIVE ARGUMENT 
DISPLAY ALARMS 


01401 (VG) INCREASING - LOSS OF CONTROL 


YUL SYSTtM FOR A&C4: REVISION 0 Oh PROGRAM SOLRUMS5 BY NASA 1021108-021 


tMAlNj page 3 


DEC A, 1966 


L 001 

assembly 

Rooe? 

01402 

R00871 

01403 

R00b72 

01404 

R00B73 

01405 

ROOfa7A 

01406 

R00875 

01407 

R00876 

01411 

Rooae 

KeYBOABD 

R0089 

01501 
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(DELV) TOD LOW - EisiGINE NOT DN 
501 ABORT. WILL DVERSHOOI TARGET. 

501 ABORT. PRESENT SMA LESS THAN RE/2 
501 ABORT. COT SDIGAMMA E) NEGATIVE. 

501 ABORT. FREE-FALL ANGLE EXEEDS — 

commanded C0U2 EXCEEDS 60 DEGREES 

TIME TO incorporate AVE G UPDATE ALREADY PAST 

AND DISPLAY PROGRAM 

KEYBOARD AND DISPLAY ALARM DURING INTERNAL USE (I4VSUB), 


ABORT 
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1 DEFINITIONS 



ROOVl 

regular verbs 



R0092 

01 

DISPLAY octal COMP 

1 (RU 


R00V3 

02 

DISPLAY OCTAL COMP 

2 (Rl) 


R009A 

03 

DISPLAY OCTAL COMP 

3 (Rl) 


RC 1 O 95 

04 

DISPLAY OCTAL COMP 

1,2 (R1,R2) 


R0096 

05 

DISPLAY OCTAL COMP 

1,2,3 (K1,R2 

,R3) 

R0097 

06 

DECIMAL display 



R0098 

07 

DP DECIMAL DISPLAY 

(Rl,R2) 


R0099 

10 

REQUEST WAITLIST 



ROlOO 

11 

MONITOR OCT COMP 1 

(Rl) 


ROlOl 

12 

MONITOR OCT COMP 2 

(Rl) 


R0102 

13 

MONITOR OCT COMP 3 

(Rl) 


R0103 

14 

MONITOR OCT COMP 1 

,2 (RU 


ROlOA 

15 

MONITOR OCT COMP 1 

,2,3 (Rl,R2,R3> 

H0105 

16 

MONITOR DECIMAL 



R0106 

17 

MONITOR Dp DECIMAL 

(Rl ,R2) 


R0107 

20 

REQUEST EXECUTIVE 



R0108 

21 

LOAD COMP 1 (Rl) 



R0109 

22 

LOAD COMP 2 {R2) 



ROllO 

23 

LOAD COMP 3 {R3) 



ROlll 

24 
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R2) 


R0112 

25 
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26 
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ROl lA 

27 
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ROUS 

30 
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R0116 

31 

BANK DISPLAY 



R0117 

32 

C{R2I INTO R3, C<R1) INTO R2 


ROl 18 

33 

proceed without data 


ROl 19 

34 

terminate Current 

TEST OR LOAD 

REQUEST 

R0120 

35 

RELEASE display SYSTEM 


R0121 

36 

FRESH start 



R0122 

37 

CHANGE MAJOR MODE 



R0123 

END 

OF regular verbs 




R0124 

extended verbs 


R0125 

40 

ZERO (USED tfjiTH NOUN ICDU OR 

OCDJ) 

R0126 

41 

COARSE ALIGN (USED WITH NoUN 

ICDJ OR OCDU 

R0127 

42 

FINE align IMU 


R0128 

43 

LOCK IMU 


R0U9 

44 

SET IMU TO ATTITUDE CONTROL 


R0130 

45 

set IMU TO RE-E^4TRY CONTROL 


R0131 

46 

RETURN IMU TO COARSE ALIGN 


R0132 

47 

OPTICAL tracker ON (NOT IN USE YET) 

R0133 

50 

PLEASE PERFORM 
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52 
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53 
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R0137 

5A 

PULSE TORQUE GYROS 


R0138 

55 

ALIGN TIME 


R0139 

56 

PERFORM BANKSUM 


ROlAO 

57 

DO SYSTEM TEST 


ROlAl 

60 

prepare for standby 


R01h2 

61 

RECOVER from STANDBY 


R01A3 

62 

ILLEGAL VERB 


ROlAA 

63 

ILLEGAL VERB 


R0145 

6A 

illegal verb 


R01A6 

65 

ILLEGAL VERB 


R01a7 

66 

ILLEGAL VERB 


R01A8 

67 

ILLEGAL VERB 


R01A9 

70 

ILLEGAL VERB 


ROISO 

71 

DO TFFMIN UPDATE 


R0151 

72 

ABORT 


R0152 

73 

ILLEGAL VERB 


R01S3 

7A 

ILLEGAL VERB 


R015A 

75 

MANUAL I/O FOR FLIGHTS 


R0155 

76 

DO RVT update 


R01S6 

77 

DO L/O TIME UPDATE 
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R016A 
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R0166 
K0168 
R0169 
KOI 10 
R0171 
R0172 
H0173 
ROl /A 
R0175 
R0176 
R01V7 
R0178 
R0179 
R0180 
ROiai 
Roiez 

R0183 
ROlbA 
R01B5 
RO 1 66 
ROlbS 
R0190 
R0191 
R0192 
R0193 
K0194 
R0195 
R0196 
R0197 
R0198 
R0199 
R0200 
R0201 
R0202 
R0203 
R020A 
R0206 
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normal NOUNS 


00 

NOT IN USE 


01 

SPECIFY machine ADDRESS 

(FRACTIONAL) 

02 

SPECIFY machine ADDRESS 

(WHOLE) 

03 

SPECIFY machine ADDRESS 

(DEGREES) 

OA 

SPECIFY machine ADDRESS 

(HOURS) 

05 

SPECIFY machine ADDRESS 

(SECONDS) 

06 

SPECIFY machine ADDRESS 

(GYRO DEGREES) 

07 

SPECIFY machine ADDRESS 

(Y OPT degrees: 

10 

SPARE 


11 

SPARE 


12 

SPARE 


13 

SPARE 


lA 

SPARE 


15 

INCREMENT MACHINE ADDRESS 

16 

TIME SECONDS 


17 

TIME hours 


20 

ICDU 


21 

PIPA5 


22 

NEW angles I 


23 

delta angles I 


2A 

DELTA time (SECONDS) 


25 

CHECKLIST 


26 

prio/delay 


27 

SELF test On/OFF SWITCH 


30 

STAR NUMBERS 


31 

FAILREG, SFAILf ERCOJNT 


32 

DECISION time (MIDCOJRSE) 

33 

EPHEMERIS time (MIDCOJRSE) 

3A 

measured quantity (MIOCOURSE) 

35 

ROLL* PITCHf yaw 


36 

LANDMARK DATA 1 


37 

landmark DATA 2 


AO 

VG FOR 501 


A1 

SPARE 


A 2 

SPARE 


A3 

SPARE 


AA 

SPARE 


A5 

SPARE 


A6 

SPARE 


A7 

SPARE 


50 

SPARE 


51 

SPARE 


52 

GYRO BIAS drift 


53 

GYRO INPUT AXIS ACCELERATION DRIFT 

5A 

GYRO SPIN AXIS ACCELERATION DRIFT 

END 

OF NORMAL NOUNS 
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t.XXXXX) 

(XXXXX.) 

(XXX.XXDEGREES) 

(XXX.XXHOURS) 

(XXX.XXSECONDS) 

(XX.XXXDEGREES) 

(XXX.XXDEG DR XX.XXXDEu) 


(OCTAL ONLY) 

{XXX*XXSECONDS) 

(XXX.XXHOURS) 

(XXX.XXDEGREES) 

(XXXXX, PULSES) 

(XXX.XXDEGREES) 

(XXX.XXDEGREES) 

(XXX.XXSECONDS) 

(XXXXX.) 

(XXXXX.) 

(XXXXX, ) 

(XXXXX.) 

(OCTAL ONLY) 

(XXX.XXHOURS (INTERNAL UNITS = WEEKS)) 
(XXX.XXHOURS (INTERNAL UNITS = WEEKS)) 
(XXXX.XKILOMETERS) 

(XXX.XXDEGREES) 

(OCTAL ONLY) 

(OCTAL ONLY) 

(XXXX.X METERS/SEC) 


(.BbXXXXXM ILL I RAD/SEC) 

1.BBXXXXX{MILLIRAD/5EC) /<CM/SEC SEO ) 
C.BbXXXXX (MILLlRAD/SEC) / (CM/SEC SEC) ) 
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R0211 

mixed NOUNS 

R0213 

55 

OCDU 

R0215 

56 

UNCALLED MARK DATA lOCDJ 6 T IME ( SECONDS) : 

R0217 

57 

NEW angles OCdJ 

K0219 

60 

IMU MODE STATUS (IN3t wASKSETt 0L3ERR) 

R0220 

61 

TARGET AZIMUTH AND ELEVATION 

R0222 

62 

RE-ENTRY VARIABLES 

H022A 

63 

OCDUX AND TIME 

R0226 

64 

OCOUY AND time 

R0228 

65 

sampled time (Hours and seconds) 

R02i0 


(FETCHED IN INTERRUPT) 

RQ231 

66 

SYSTEM TEST RESULTS 

R0233 

67 

DELTA gyro angles 

R023A 

70 

PIPA BIAS 

R0236 

71 

PIPA SCALE FACTOR ERROR 

RU238 

72 

DELTA POSITION 

RU2A0 

73 

delta velocity 

R02A2 

74 

MEASUREMENT DATA (MIDCOURSE) 

R02AA 

75 

measurement Deviations (midcourse) 

RU2A6 

76 

POSITION VECTOR 

R02A8 

77 

velocity vector 


BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 


7 


user*s own page no, 7 

SCALE AND DECIMAL POINT 
(XXX.XXDEGt XXX.XXDEG UR XX.XXXDEG) 

(XXX,XXDEG» XXX.XXDEG UR XX.XXXDEGt XXX.XXSEC) 

(XXX.XXDEGt XXX.XXDEG UR XX.XXXDEG) 

(OCTAL ONLY) 

(XXX.XXDEGt XX.XXXDEG) 

(XXX.XXSECt XXXXX.t XXXXX.J 
(XXX.XXDEGt XXX.XXSEC) 

(XXX.XXDEG OR XX.XXXOEut XXX.XXSEC) 

(XXX.XXHOURSt XXX.XXSEC) 

(XXXXX.t .XXXXXt XXXXX.) 

(XX.XXXDEG FOR EACH) 

(X.XXXXCM/SEC SEC FOR EACH) 

(XXXXX. PARTS/MILLION FOR EACH) 

(XXXX.XKIL0METER5 FOR EACH) 

(XXXX.XMETERS/SEC FOR EACH) 

(XXX.XXHOURS (INTERNAL UNITS=WEEKS) , XXXX.XK ILOMETERS, XXXXX. 
(XXXX.XKlLOMETERSt XXXX.XMETERS/SeC t XXXX.XKILOMETERS) 
(XXXX.XKILOMETERS FOR EACH) 

(XXXX.XMETERS/SEC FOR EACH) 


4o^b78A Yuu System for agca: revision o of- program solrumss by nasa 1021108-021 


dec 1966 


L 001 

assembly and 

operation information 

PU2S0 

MAJOR MODES 

For Flight soi 

RU2S1 

00 

IDLING 

R02S2 

OX 

PRELAUNCH 

R0253 

01 

INITIALIZATION 

R02SA 

02 

gyrocompassing 

R0255 

03 

OPTICAL verification 

R02b6 

OA 

INERTIAL REJ-ERENCE 

R02561 

05 

vertical erect. (COUNTING) 

R02562 

06 

vertical erect. (UNCONDITIONAL) 

R0257 

07 

SYSTEM TEST 

R02S8 

IX 

BOOSTER monitor 

R02b9 

11 

FIRST stage booster MONITORING 

R0260 

lA 

SlV-B BOOSTER MONITOR WITH TUMBLE MON. ON 

R0261 

2X 

COASTING PHASE 

R0262 

21 

maneuver to COLDSDAK ATTITUDE 

R0263 

22 

HOLD ATTITUDE DURING ORBITAL INTEGRATION 

RQ26A 

23 

HOLD attitude 

R0265 

2A 

HOLD ATTITUDE WITH STATE VECTOR UPDATE ALLOWED 

RCI2655 

26 

HOLD SPS2 ATTITUDE AND WAIT FOR TFF = TFFMIN 

R0266 

27 

R, V* T UPDATING 

R0267 

3X 

PRE-THRUST ING PHASES 

R0268 

31 

PRE-SPSl 

R0269 

32 

PRE-5P52 

R0270 

AX 

THRUSTING PHASES 
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H0271 

A1 

SPSI 

R0272 

A2 

SPS2 

R0275 

5X 

alignment 

RU276 

6X 

ENTRY 

RU277 

61 

CM/SM separation MANEUVER 

R0278 

62 

PRE-ENTRY MANEUVER 

k0279 

63 

INITIATE ENTRY STEERING 

R0280 

6A 

.05 G INDICATION 

R02ai 

65 

UP-CONTROL PHASE 

R0282 

66 

BALLISTIC PHASE 

R0283 

67 

FINAL PHASE 

R0284 

7X 

ABORT PHASES 

R0285 

71 

POST-TUMBLE ATTITUDE RECOVERY 

R0286 

72 

free-fall ENTRY ABORT 

RU2a7 

73 

abort burn 

R0288 

74 

TUMBLE arrest BURN 

R0289 

77 

G+N FLUSHED 
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P0290 

R0291 

Ru292 

R0293 

RQ294 

R0295 

R0296 

R0297 

R0298 

R0299 

R0300 

R03U1 

R0302 

R0303 

R0304 

R0305 

K0306 

R0307 

R030B 

R0309 

R0310 

R0311 

R0312 

R0313 

R0314 

R0315 

R0316 

R0317 

R0318 

R0319 

R0320 

R0321 

R0322 

R0323 

R0324 

R0325 

KU326 

R0327 

R03Z8 

R0329 

R0330 

R0331 

Ra332 

R0333 

R0334 

R0335 

R0336 

R0337 

R0338 
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PRI037 

PR1036 

PRIOSS 


PRI033 
PR 1032 


PR 1 031 


PRI027 


PRI025 


PRI024 

PRI023 

PRI022 

PR 1 021 
PRI020 


PRI016 

PRI015 

PRI014 

PRI013 

PRI012 


PRIOlO 

PRI07 


DOAUARM 

NWJOB 

BIASONLY 

1/GYRO 

ENEMA 

M0DE32 

M0DE26 

P0STBY3 

CHAR IN 

MKVB50 

MKVB51 

REM<VB51 

SPITGYRO 

MON DO 

FREOSPDO 

SPITGYRO 

ENEMA 

S4B5MSEP 

ABORTEST 

REDD4.2I 

BEGIN501 

liftoff 

MANUJOB 

TUMBJOBI 

TUMBJOB 

CGJOB 

TOPI 

TSELECT 

PRAWAKE 

STARTPL2 

GYRDRFT2 

CDUXJO0 

SERVICER 

ENTRYTOP 

SMOOTHER 

CHKOPT 

UPTHETAl 

SOAKJOB 

TARGJOB 

SOAKINIT 

ATTIJOB 

ATTiJOtil -1 

ATTIJ0B2 

SEPMANU 

entajob 

ROLLJOB 

MOOE23 

M0DE44 
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PR 1 06 
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UPJOB 

R03395 

PRI05 


MON IT JOB 

K03A0 



MARKDISP 

R03A1 

PR102 


FXFXCHK 
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U0U3 

0000 

A 

E J JALS 

0004 

0001 

Q 

equals 

0005 

0002 

2 

EQUALS 

0006 

0003 

LP 

equals 

0007 

0004 

INO 

EQUALS 

0008 

0005 

INI 

equals 

0009 

0006 

IN2 

EQUALS 

0010 

0007 

IN3 

EQUALS 

0011 

0010 

OUTO 

equals 

0012 

0011 

OUTl 

equals 

0013 

0012 

0UT2 

equals 

OOU 

0014 

0UT4 

equals 

0015 

0015 

BANKREG 

equals 

0016 

0016 

RELINT 

equals 

0017 

0017 

INHINT 

equals 

0018 

0020 

CYR 

equals 

0019 

0021 

SR 

equals 

0020 

0022 

CYL 

equals 

0021 

0023 

5L 

equals 

0022 

0024 

ZRUPT 

equals 

0023 

0025 

BRUPT 

equals 

0024 

0026 

ARUPT 

equals 

0025 

0027 

QRUPT 

equals 

0026 

0030 

bankrupt 

equals 

0027 

0031 

OVRUPT 

equals 

0028 

0032 

LPRUPT 

equals 

0029 

0033 

05RUPT5W 

equals 

0030 

0034 

OVCTR 

equals 

0031 

0035 

TIME2 

equals 

0032 

0036 

TIMEI 

equals 

0033 

0037 

TIME3 

equals 

0034 

0040 

T IME4 

equals 

0035 

0041 

UPLINK 

equals 

0036 

0042 

OUTCRl 

equals 

0037 

0043 

0UTCR2 

equals 

0038 

0044 

PIPAX 

equals 

0039 

0045 

PIPAY 

equals 

0040 

0046 

PIPAZ 

equals 

0041 

0047 

CDUX 

EQUALS 

0042 

0050 

CDUY 

equals 

0043 

00 51 

COUZ 

equals 

0044 

0052 

OPTX 

EQUALS 

0045 

0053 

opty 

equals 
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1 

2 

3 

A 

5 

6 
7 

10 

11 

12 

U 

15 

16 
17 
20 
21 
22 
23 
2A 

25 

26 
27 


30 

31 

32 

33 


TaRUPT PHASE COUNT GOES 7 (-1)0 


3A 

35 

36 

37 
AO 
A1 

42 

43 
4A 

45 

46 

47 

50 

51 

52 

53 
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P00A6 



INTERPRETIVE 

\ 

special Registers 
. < 

conta 

INED in THe 

WORK AREA. 


00A7 

.1. 


♦ 


00 AO 

VAC 

E3JALS 

320 

Relative to fixloc 

00A8 

REF 

1 


% 

OOAO 

VACX 

E3JALS 

VAC 


00A9 

REF 

2 

LAST 

13 

00A2 

VACY 

E3JALS 

VAC + 2 


0050 

REF 

3 

LAST 

13 

OOAA 

VACZ 

E3JALS 

VAC ♦ 4 


0051 





00A6 

XI 

E3JALS 

380 

INDEXES ARE RELATIVE TO FiXLOC 

0052 





0047 

X2 

E3JALS 

390 


0053 





0050 

Si 

E3JALS 

400 

AhD 50 ARE STEP REGISTERS 

005A 





0051 

S2 

EOJALS 

410 


0055 





0052 

QPRLT 

E3JAL5 

420 

AS IS QPRET 



L 

0Ui>6 

«0057 

R00b9 

RUOfal 

Ro063 

OObb 

0066 

0067 

A 006 e 

0069 

A0070 

0071 

A0072 

0073 

007A 

0075 

00 76 

0077 

0078 

0079 

0080 

0081 

0082 

008 3 

008A 

0085 

0086 

0087 

0088 

0089 

0090 

0091 

0092 

0093 

009A 

0095 

0096 

0097 

0098 

0099 

ROlOO 

0101 

0102 

0103 

0104 


YUL SYSTEM fOR AGCA; REVISION 0 Oh PROORAM SOlRUMbS BY NASA 1021108-021 


DEC 4 1 1966 


{MAIN) PAGE 14 


erasable assignments 


USER'S OWN page no, 3 


0060 


SEILOC 60 


the following Registers aRe jsto by the inteRRReteRi and may be used by a basic job or basic 

PORTIONS OF AN INTERPRETIVE JOB (SOME RESTRICTIONS APPEAR WITH RTB FOLLOWED BY tC DANZIG, BUT THe NINe KeGISteRS 
VBUF AND BUF ARe AVAILABLE THeN) , THE REGISTERS ARE NOT SAVED IN jHeIR ENTIRETY DURING CHANGE JOB (MOSt OF THeM 
are IGNORED) t So THAT THeSl MUST BE JSeD ONLY AS TEMPORARIES BETWEEN ANY CCS NeWJOBS. 







0054 

NNAUTEM 

E3JALS 

54 

TLMP FOR NOUN ADDRESS TABLF ENTRY* 






0055 

nntyptem 

eojals 

55 

Temp for noun type table entry. 






0056 

idauitem 

EOJALS 

56 

TLMP FOR INDIR ADRES TABLE ENTRY (MIXNN) 










MUST = IDAD2TEM-lf = IDAD3TEM-2. 






0057 

IDAD2TEM 

eojals 

57 

TLMP FOR INDIR AORES TABLE ENTRY (MIXNN) 










MUST = IDADlTEM+l* = IDAOBTLM-l. 





0060 

0060 

IDAD3TEM 

erase 


TLMP FOR INDIR ADRES TABLE ENTRY (MIXNN) 










MUST = IDADlTEM+2t = 1DAD2TEM+1. 





0061 

0061 

bankset 

E^ASE 


SIORAGE for BAnX BITS OF OBJECT PROGRAM 





0 062 

0062 

AODRWD 

erase 


THIS WILL CONTAIN A PROPER 12 BIT ADDR 





0063 

0063 

ORDER 

erase 


STORAGE FOR RIGHT-HAND OPERATORS 

ref 

1 




0063 

UPDATRET 


ORDER 

Return for updatnn, updatvb 

ref 

2 

LAST 

14 


0063 

CHAR 

~ 

ORDER 

TLMP FOR CHARIN 

ref 

3 

LAST 

14 


0063 

ERCNT 


ORDER 

COUNTER FOR ERROR LIGHT RESET 

REF 

4 

Last 

14 


0063 

DECOUNT 


ORDER 

Counter For scaling and display (DeC) 





0064 

0064 

TEMll 

ERASE 



REF 

1 




0064 

SGNON 


TEMll 

TLMP FOR ON 

REF 

2 

LAST 

14 


0064 

nountem 

= 

TEMll 

counter for MlXNOUN FETCH 

ref 

3 

LAST 

14 


0064 

DISTEM 

s 

temu 

Counter for octal display verbs 

REF 

4 

last 

14 


0064 

dectem 

= 

TEMll 

COUNTER For fetch (Dec display verbs) 

REF 

5 

LAST 

14 


00 6 4 

DECTEMl 

s 

TEMll 

TLMP FOR NUM 





0065 

0065 

MODE 

ERASE 


DtNOTtS VECTOR* DP* OR TP. 

REF 

1 




0065 

ENTRET 


MODE 

EXIT FROM enter 





0066 

0066 

LOADIND 

ERASE 


Load indicator 

REF 

1 




0066 

NEWEQIND 

EOJALS 

LOADIND 


ref 

1 




0066 

MONTEM 


NEWEQIND 

TLMP RETURN FOR MONITOR 





0067 

0067 

FIXLOC 

ER'^SE 


ADDRESS OF CURRENT VAC AREA 





0070 

0070 

VACLOC 

ERASE 


AuDRESS OF CURRENT yAC (= FiXLOC+32D) 





0971 

0076 

VBUF 

ERASE 

+ 5 

6 WORD TEMPORARY BLOCK FOR VXV* MXV , ETC 

ref 

1 




0071 

TEMQS 

EOJALS 

VBUF 

TLMP STORAGE FOR SWCALL ROUTINE 

ref 

2 

LAST 

14 


0072 

BANXTEM 

eojals 

VBUF +1 

LIKEWISE 

ref 

3 

LAST 

14 


0073 

B 

E3JALS 

VBUF +2 

argument storage in FUNCTIONS 

ref 

4 

LAST 

14 


007 3 

PROGREG 


VBUF +2 

FUR 60 EXEC PROGRAM 

ref 

5 

LAST 

14 


0073 

MIXTEMP 


VBUF +2 

Fur mixnoun data 

ref 

6 

LAST 

14 


0073 

SIGNRET 

~ 

VBUF +2 

RETURN FOR ON 

ALSO 

PROGRFG+ 1 

f 1 

?RaGREG+2, 

mixtemp+1 » 

MIXTEMP+Z 




^ ^ » 

ref 

7 

LAST 

14 


0075 

ESCAPE2 

E3JALS 

VBUF +4 

NEGATIVE argument SWITCH IN ARCCOS 

REF 

f 

B 

Last 

14 


0075 

T A6l 

E3JALS 

VBUF +4 

used FOR PICKING UP INDEX AND STEP REGS 

p rF 

Q 

LAET 

14 


0076 

TEMQ3 

eojals 

VBUF +5 

RETURN FROM DDV AND SQRTDIV 

rv 

REF 

10 

L- n 1 

LAST 

■W 

14 


0076 

POLISH 

E3JALS 

VBUF +5 

Temporary storaue for complete addresses 


^b*+t>7eA YUU 5YSTtM FOR AGC<t: REVISION 0 OF PROGRAM bOLRUMSS BY !■ 


L erasable assignments 


0 lu5 

REF 

11 

LAST 

14 


0076 

WDCNT 

= 

0 106 

REF 

12 

LAST 

15 


0076 

INREL 


0107 





0077 

0101 

BUF 

ERASE 

0108 

ref 

1 




0077 

LOGTEM 

E3JALS 

01U9 

REF 

2 

last 

15 


0101 

sgndmax 

E3JALS 

0110 

REF 

3 

LAST 

15 


OlOl 

TEM3 

E3JALS 

0111 

REF 

4 

LAST 

15 


OiOl 

GCOMPSW 

E3JALS 

0112 





0102 

0102 

TEM2 

ERASE 

0113 

REF 

1 




0102 

DSREL 

** 

OU^t 





0103 

0103 

TEM4 

ERASE 

0115 

ref 

1 




0103 

temq 

E3JALS 

0116 

REF 

2 

LAST 

15 


0103 

D5MAG 

= 

0117 

REF 

3 

LAST 

15 


0103 

IDADDTEM 


0118 





0 104 

0104 

TEM5 

ERASE 

0U9 

REF 

1 




0104 

TEMQ2 

E3JAL5 

0120 

REF 

2 

LAST 

15 


0104 

BASE 

— 

0121 

ref 

3 

LAST 

15 


0104 

Count 

- 

0122 





0105 

0105 

TEM& 

ERASE 

0123 

REF 

1 




0105 

TEM6 

E3JAL5 

012A 





0106 

0106 

TEM9 

ERASE 

0125 

REF 

1 




0106 

WRDRET 


0126 

REF 

2 

LAST 

15 


0106 

WDRET 


0127 

REF 

3 

LAST 

15 


0106 

DECRET 


0128 

REF 

4 

LAST 

15 


0106 

21/22REG 

= 

0129 





0107 

0107 

TEMIO 

ERASE 

0130 

REF 

1 




0107 

IND 

E3JALS 

0131 

REF 

2 

LAST 

15 


0107 

MiXbR 


0132 

REF 

3 

LAST 

15 


0107 

dspmmtem 

- 

0133 





Olio 

0110 

DVSlv 

E^ASE 

013 A 

REF 

1 




0110 

SGNOFF 

= 

0135 

REF 

2 

LAST 

15 


0110 

NVTEMP 

= 

0136 

REF 

3 

LAST 

15 


Olio 

SFTEMPl 


0137 

ref 

4 

LAST 

15 


0110 

DECTEM2 


0138 





Dili 

0111 

BRANCHQ 

ERASE 

0139 

REF 

1 




0111 

CODE 

= 

OlAO 

REF 

2 

LAST 

15 


0111 

SFTEMP2 


OIhI 





0112 

0112 

COMPON 

ERASE 

01A2 

REF 

1 




0112 

DSEXIT 


0U3 

REF 

2 

LAST 

15 


0112 

EXITEM 


OlAA 

ref 

3 

LAST 

15 


0112 

blankret 

s 

01A5 





0113 

0113 

ARETURN 

E^ASE 

01A6 

REF 

1 




0113 

LSTPTR 

= 

01A7 

REF 

2 

LAST 

15 


0113 

RELRET 


0148 

REF 

3 

LAST 

15 


0113 

FREERET 


0149 





0114 

0114 

ESCAPE 

E^ASE 

0150 

REF 

1 




0114 

cadrtem 



THE following REGISTERS ARE JSeD EXCLUSIVELY 


1021108-021 


OEC l9t>t) 


IMAINJ PAGE IS 



USER'S OWN PAGE NO. 4 

VbUF +5 

VBUF +5 

+ 2 

BUF 

BUF +2 

BUF +2 

BUF +2 

CHAR COUNTER FqR DSPWD 

INPUT BUFFER SELECTOR ( X,Y,2» REG ) 

USED BY DMPl, SQRTDIV 

LUG SUBROUTINE TEMP, 

UiED IN TPAGREE 

TEM2 

RLL ADDRESS FOR D5PIN(TEM2 USED BY DADD 

TEM4 

TEM4 

TEM4 

Return from tpagree 

MAGNITUDE STORE FOR DSPIN 

MIXNOUN indirect ADDRESS STORAGE 

TEM5 

TEM5 

TEM5 

FUR DSPIN (TEMs IS USED BY DAD) 

TEM8 

ERASABLE ASSIGNMENTS BY EQUALS 

TEM9 

TEM9 

TEM9 

TEM9 

RLTURN FOR 5BLANK 

RtTURN FOR DSPWD 

return for PUTCOMIDeC LOAD) 

TEMP FOR CHARIN 

TEMIO 

TEMIO 

TEMIO 

USED IN CROSS ROUTINE 

Indicator for mixed or normal noun 

DbPCOUNT save FqR DsPMM 
(THIS CAN probably BE EQUATED) 

DVSrt 

DVSW 

DVSW 

DVSW 

TEMP FOR ON 

TEMP FOR NVSUB 

STORAGE FOR SF CONST HI PART ( = SFTEMP2-1 ) 
TEMP FOR NUM 

BRANCHQ 

BRANCHQ 

(DITTO) 

For DSPIN 

STORAGE FOR SF CONST LO PART ( sSFTEMPU D 

COMPON 

COMPON 

COMPON 

(DITTO) 

RtTURN FOR DSPiN 

RETURN FOR SCALE FACTOR ROUTINE SELECT 
RETURN FOR 2BLANK 

RETURN address FOR ARCSIN/ ARCCOS, 

ARETURN 

ARETURN 

ARETURN 

LIST pointer for GRABUSY 

RLTURN FOR RELOSP 

RtTURN FOR FREEDSP 

escape 

akcsin/arccos Switch 

TtMP STORAGE FOR GRAB ROUTINES 

the executive# 



<*a^57BA YUL SYSTEM FOR AGC't: REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A* 1966 


(MAIN) PAGE 16 


L ERASABLE ASSIGNMENTS 


USER'S OV^N PAGE NO, 5 


0152 

0153 
OISA 

0155 

0156 

0157 


0115 

0120 

0121 

0122 

0123 

012A 


0117 
0120 
0121 
O122C 
0123 
Oi2A 


mpac 

LOC 
.DifiLOC 


PUSHLOC 
PRIORITY 


erase 

ERASE, 



ERASE 

ERASE 


MULTIPLE-PRECISION ACCUMULATOR 

Location counter for operator words 

LuCATlON counter FOR OPERAND ADDRESSES 
0 FOR NO overflow* NQN-ZERO OTHERWISE 
NEXT available ENTRY IN PUSH-DOWN LIST 
PRIORITY OF current JOB 


0156 

0159 


0125 

0214 

ETASE +55D 

cj i Gtjy JOBS POSSIBLE 

0215 

0215 NEWJOB 

ehase 

SET NON-ZERO TO SIGNAL EXECUTIVE RUPT 


0160 

0216 

0216 

VAClUSE 

erase 

0161 

0217 

02 71 

VACl 

ERASE 

0162 

0272 

0272 

VAC2USE 

ERASE 

0163 

0273 

0345 

VAC2 

ERASE 

0164 

0346 

0346 

VAC3USE 

ERASE 

0165 

034 7 

0421 

VAC3 

ERASE 

0166 

0422 

0^2 2 

VAC4USE 

ERASE 

0167 

0423 

0475 

VAC4 

erase 

016B 

0476 

0476 

VAC5USE 

ERASE 

0169 

047 f 

0551 

VAC5 

ERASE 


StE executive programs FOR USE OF THeSE 
♦a2D Registers 

♦ A2D 
+ A 2 0 
+ 420 
+ 420 


R0170 the FOLLOWING REGISTERS ARE USED EXCLUSIVELY BY THE WAITLISTER. 


0171 


0552 

0560 

LSTl 

ERASE 

+ 6 

DELTA T'S, 

0172 


0561 

0570 

LST2 

ERASE 

+ 7 

Task cadhs. 

0X73 


05 71 

0571 

ruptagn 

ERASE 


waitlist additional TASK 

0174 

REF 1 


0571 

KEYTEMP2 

m 

RUPTAGN 

TEMP FOR KEYRUPt, UPRUPT 


indicator. 


R0175 THe following GROUP OF REGISTERS MAY BE JSEO AS TEMPORARY STORAGe BY ANY INTERRUPT PROGRAM OR OY ANY 

R0177 PROGRAM WHICH INHIBITS INTERRUPT, CARe MUST BE TA<EN* HOWEVER, TO SEE THA] tHeY ARe NOT USED DURING A CALL 

R0179 TO THE EXECUTIVE (FOR EXAMPLE), FOR THE EXECUTIVE '^AY USE THEM AS TEMPORARIES TOO, 


OlBl 





0572 

0572 

EXECTEMl 

ERASE 


0182 

REF 

1 




0572 

RUPTSTOR 

= 

EXECTEMl 

0183 

ref 

2 

LAST 

1 6 


0572 

INIHITEM 


EXECTEMl 

0184 





0573 

0573 

EXECTEM2 

ERASE 


OlU5 

REF 

1 




0573 

PROG 

eojals 

EXECTEM2 

0186 

ref 

2 

LAST 

16 


0573 

INILOTEM 


EXECTEM2 

0187 





05 74 

0574 

EXECTEM3 

ERASE 


0188 

REF 

1 




0574 

1TEMP3 

edjals 

EXECTEM3 

0189 

REF 

2 

LAST 

16 


0574 

5RRUPT 

edjals 

EXECTEM3 

0190 

ref 

3 

LAST 

16 


0574 

lookret 

* 

EXECTEM3 

0191 





0575 

0575 

EXELTEM4 

ERASE 


Q192 





0576 

0576 

EXECTEM5 

ERASE 


0193 





05/7 

0577 

NEWPRIO 

ERASE 


0194 

REF- 

1 




0577 

nval 

= 

NEWPRIO 

0195 

REF 

1 




0577 

DELT 


NVAL 

0196 

ref 

2 

LAST 

16 


0577 

I TEMPI 

= 

NEWPRIO 


THESE REGISTERS, EXECTEMI- 3 , MAY BE USED 

Interrupt temp for standby prep 

As SCRATCH STORAGE BY ANY PROGRAM WHICH 

Interrupt temp for standby prep 
Inhibits interrupts 

SHORT STORAGE FoR SR DURING INTERRUPT. 
IinERRUPT TEMP FOR STANDBY PREP 

BANK RETURN FROM PHASE CONTROL, 

PRIORITY OF NEW JOB 


aiv7 

0198 

0199 

0200 

0201 

0202 

0211 

0212 

0213 

0214 ^ 

0215 

0216 

0217 

021B 

0219 

0220 

0221 

0222 

0223 

022 ^ 

0225 

0226 

0227 

022B 

0229 

0230 

0231 

0232 

0233 

0234 

0235 

0236 

0237 

0237 

0237 

0237 

0237 

0237 

0237 

0237 

0238 


YUL. SYSTEM FOR AGC4 : REVISION 0 Oh H^O&RAM S 0 LRUM 55 BY NASA 1021106-021 


DEC 4 f 1 966 


(MAIN) PAGE U 


ERASABLE ASSIGNMENTS USER'S O^jN PAGE NO. 6 






0500 

0600 

WTEXIT 

ERASE 



REF 

1 




0600 

ITEMP2 


WTEXIT 


REF 

2 

LAST 

17 


0600 

KEYTEMPl 


WTEXIT 

TEMP FOR KEYRUPTf UPRUPT 

ref 

3 

LAST 

17 


0600 

DSRUPTEM 


WTEXIT 

TEMP FOR DSPOUT 





0601 

0601 

LOCCTR 

ERASE 


Used to locate storage for core registrs 

REF 

1 




0601 

PHASDATA 

EGJALS 

LOCCTR 


ERASABLE 

ASSIGNMENTS 

SPECIFIC 

TO PInBaLL 








O 5 O 2 

0602 

VERbREG 

ERASE 


VERB CODE 





0603 

0603 

NOUNREG 

ERASE 


NuUN CODE 





0604 

0604 

XREG 

ERASE 


R1 INPUT BUFFER 





0605 

0605 

YREG 

ERASE 


R2 INPUT BUFFER 





0606 

0606 

ZREG 

ERASE 


R3 INPUT BUFFER 





060 1 

060? 

XREGLP 

ERASE 


LU PART OF XREG (FOR DEC CONV ONLY) 





0510 

0610 

YREGLP 

ERASE 


LU PART OF YREG (FOR DEC CONV ONLY) 





0511 

0611 

ZREGLP 

ERASE 


Lu PART OF ZREG (FOR DEC CONV ONLY) 





0612 

0612 

MODREG 

ERASE 


MODE CODE 





0513 

0613 

REGRET 

ERASE 


RETURN REGISTER FOR LOAD 





0614 

0614 

DSPCOUNT 

erase 


display Position indicator 





0515 

0615 

decbrncfi 

ERASE 


♦DEC, - Dec, OCT INDICATOR 






06 1 6 


SETLOC 

616 

needed for pinball auto CHECK 





0 5 1 b 

0620 

D3PTEM1 

ERASE 

+ 2 

BUFFER STORAGE AREA 1 (MOSTLY FOR TIME) 

REF 

1 




0616 

LANDMARK 

EGJALS 

DSPTEMl 


REF 

2 

LAST 

17 


0616 

V75TEMP 

edjals 

DSPTEMl 






0521 

Ofa23 

DSPTEM2 

ERASE 

+ 2 

BUFFER STORAGE AREA 2 (MOSTLY FUR DEG) 





0624 

0624 

NOUNADD 

ERASE 


Machine address for noun 





062S 

0625 

MONSAVE 

erase 


N/V CODE FOR MONITOR. ALSO ACTIVITY 





0626 

0626 

MONSAVE 1 

ERASE 


NuuNADD Storage for monitor with matbs 





062 7 

0627 

CADRSTOR 

erase 


ENDIDLE storage 





0630 

0630 

GRABLOCK 

erase 


internal interlock for display system 





0631 

0631 

NVSBCADR 

ERASE 


MVSUB STORAGE FoR CALLING CADR 





0632 

0632 

LOADSTAT 

erase 


STATUS INDICATOR FOR LOADtST 





0633 

0633 

CLPA5S 

ERASE 


PASS INDICATOR FOR CLEAR 





0634 

0636 

DSPLIST 

erase 

+ 2 

Waiting list for dsp syst internal use 


LoNG-TERf*^ Storage 

used DJRIimG 

INTeRUPt * 

NOT used 

BY EXECUTlVEt WAITLIST* ETC. 


063 7 

0637 

RUPTREGl 

ERASE 

ref 1 


0637 

K5AMPTEM 

E3JALS RUPTREGl 

0540 

0640 

RUPTREG2 

ERASE 

REF 1 


0640 

05AMPTEM 

EGJAlS RUPTREG2 

0641 

0641 

RUPTREG3 

ERASE 


0642 

0642 

RUPTREG4 

ERASE 


MISCELLANEOUS RESERVATIONS 

0543 0644 SAMPTIME E^ASE *1 SAMPLED TIME EOW PInBALL REFERENCE. 


^ttt^b78A YUL SYSTEM FOR AGCA: REVIbljN 0 01- PROGRAM SoLRUMSb BY h 


L erasable assignments 


ru2ao interpreter switch assignments. 


02^1 06*t5 06A7 STATE 


0242 

REF 

1 



0645 

DSPLOCK 

0243 

REF 

2 

LAST 

18 

0645 

EXTVBACT 

0244 

REF 

3 

LAST 

18 

0645 

UPLOCK 

02 45 

REF 

4 

LAST 

18 

0646 

FLAGWRDl 

0246 

ref 

5 

LAST 

18 

0647 

FLAGWRD2 


02A7 

02^8 

0249 

0250 

0251 

0252 

0253 

0254 

0255 

0256 
02565 

A0257 

A 025 e 

A0259 

A0260 

A0261 


0001 J5WITCH 

0002 abortsig 

0003 TFF2FLAG 

0004 BIASFLAG 

0005 NBSMBIT 

0006 gonepast 

0007 RELVEL5W 

0010 EGSW 

0011 HUNTSWl 

0012 HINO 
0012 VERIFLAG 

DSKYFLAG 

DSPLOCK 

extvbact 

UPLOCK 


02615 

0262 


0017 INRLSW 
0017 PRGSW 


0263 

0264 

0265 

0266 

0267 

0268 
0269 
02 70 

02 n 

0272 
02 73 
0274 
02 75 
02 7h 
0277 


0021 coastflg 

0022 UPDATFLG 

0023 SOAKFLAG 

0024 SHTONFLG 

0025 ACTIVFLG 

0026 INTPFLAG 

0027 INITFLAG 

0030 S4BSMFLG 

0031 INTIFLAG 

0032 MONITFLG 

0033 DYMONFLG 

0034 STEERFLG 

0035 EnTRYFLG 

0036 LIFTFLAG 

0037 TUMBFLAG 


0278 

0279 

0280 
0281 


0041 DRIFTFLG 

0042 CDUXFLAG 

0043 BACKFLAG 

0044 ROLLFLAG 


ERASE 

E3JAL5 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

EOJALS 

EOjAlS 

E3JALS 

EOJALS 

E3JALS 

E3JAL5 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 


E3JALS 

E3JALS 

E3JALS 

E33AL3 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3JALS 

E3jAlS 


1021108-021 


Dec 4, 


1966 


(MAIN) PAGE 18 


USER'S O^N PAGE NO. 7 



45 switches 


used by interpretive PROGS. 


STATE BIT 4 

state bit 3 

STATE Bit 2 

STATE +1 
STATE +2 


1 

2 

3 

4 

5 

6 

7D 

BD 

90 

lOD 

100 

IID 

12D 

130 

14D 


pkee-fall integration. 

Set when (^ROUNd abort V72 is received. 

TOM D. NAMED THIS 

CAUSES DELV to BE ZEROED AFTER 1/PIPA 

In-flight alignment, 
ke-entry 
re-entry. 

Rl-ENTRY. 

re-entry. 

EiaKY. 

guards against double keyboard entries, 
keyboard/subroutine call interlock 

EXTENDED VERB ACTIVITY 

uplink interlock (ACTIVATED BY ReCPTIoN 
Of- A BAD CODE IN UPLINK) 


15D PkOGSTALL not USED DURING ENTRY. 

15D USED by PRGSTALL. 


17D 
18D 
19D 
20D 
21D 
22D 
230 
240 
25D 
26D 
27D 
280 
2 90 
30D 
310 


17 TO 47 ARE 501 SEQUENCE CONTROL FLAGS. 


330 

340 

350 

360 


H8^t>78A YUL SYSTEM FOR AGCAl REVISION 0 OF PROGRAM SOLRUMSS BY NASA 1021108-021 


DEC <+, 1966 


tMAlN) page 19 


L ERASABLE ASSIGNMENTS uSER*5 OWN PAGE NO, 8 


0282 






0045 

calcflag 

EOJALS 

37D 





0283 






0046 

domanflg 

EOJALS 

38D 





028A 






004? 

NEGFLAG 

E3JALS 

39D 





0285 






0050 

BEGINFLG 

E3JALS 

40D 





0286 






0051 

SPS4FLAG 

E3JALS 

41D 





0287 






0052 

SPS3FLAG 

eojals 

42D 





0288 






0053 

SPS2FLAG 

EOJALS 

43D 





0289 






0054 

SPSIFLAG 

E3JALS 

44D 





0290 






0055 

tabtflag 

eojals 

45D 





0291 






0056 

abrtflag 

eojals 

46D 





0292 






0057 

arrstflg 

E3JALS 

4TD 





R0293 



storage used by phase 

CONTROL. 








029A 





0650 

0655 

phasetab 

erase 

+ 5 



PHASE values For 6 programs 


0295 

ref 

1 




0650 

PHASE 1 

E3JALS 

PHASETAB 





0296 

REF 

2 

LAST 

19 


0651 

PHASE2 

E3JALS 

PHASETAB 

4 

1 



0297 

ref 

3 

LAST 

19 


0652 

PHASE3 

E3JALS 

PHASETAB 


2 



0290 

REF 

4 

LAST 

19 


0653 

PHASE4 

E3JALS 

PHASETAB 

♦ 

3 



0299 

REF 

5 

LAST 

19 


06 54 

PHASES 

E3JALS 

PHASETAB 

+ 

4 



0300 

REF 

6 

LAST 

19 


0655 

PHASES 

E3JALS 

PHASETAB 


5 



0301 





0656 

0663 

PHASEBAR 

ERASE 

+ 5 



COMPLEMENTED COPY. 


0302 

REF 

1 




0656 

-PHA5E1 

E3JALS 

PHASEBAR 





0303 





0664 

0664 

TBA5E2 

ERASE 






030A 





0665 

0665 

TBA5E3 

ERASE 






0305 





0566 

0666 

TBASE4 

ERASE 






0306 





0667 

0667 

TBA5E5 

erase 




SHOULD COMPLETE THIS SET. 


R0307 



the 

FOLLOWING 

registers are jsed by the 

DOrtNRUPT PROGRAM 

• 




0308 





0670 

0670 

telcount 

erase 




ENDPULSE frequency MONITORING COUNTER. 

0309 





06/i 

0671 

LDATALST 

ERASE 






0310 





0672 

0672 

dnlstadr 

ERASE 




BASE address OF APPROPRIATE 

TM LIST, 

0311 





06 ?3 

0673 

DNTMGOTO 

erase 




ADDRESS OF CURRENT DOWNLINK 

phase. 

0312 





0674 

0674 

TMINDEX 

ERASE 




51 EPS THROUGH THE OOWNLIST 


0313 





0675 

0675 

tmmarker 

ERASE 






031A 





0676 

0676 

markerct 

ERASE 






R0315 



the 

FOLLOWING 

STORAGE 

IS USED 

BY T4RUPT 

m 






1 6 





06 7 ? 

0677 

CDUIND 

erase 




IMU CDU STATUS INDICATOR AND 

1 indexeR. 

0317 





0700 

0702 

thetad 

ERASE 

+ 2 



SET OF THREE DEISRED ANGLES 

IN 2S COMPL. 

W Jk 1 

0316 





0703 

0 ?03 

OPTIND 

ERASE 




OPTICS CDU STATUS INDICATOR 

AND indexer. 

0319 





070*f 

0705 

desoptx 

ERASE 

♦1 



DESIRED OPTICS CDU ANGLES, 


n ^ n 





0706 

0706 

DSPCNT 

ERASE 




STEPS THROUGH K-RELaY SLOTS 

IN DSPTAB, 






0 70 ? 

0/0 7 

NOUT 

ERASE 




HOLDS number OF RELAY WORDS 

TO change. 

\J J C 1 

0322 





0710 

0725 

DSPTAB 

ERASE 

*13D 



HOLDS STATE OF ALL RELAYS AND CHANGE INF 

0323 





0726 

0726 

OLDERR 

ERASE 




LmST-SAMPLED SYSTEM ERROR BITS, 


YUL SYSTEM FOR A6C<»: REVISION 0 OE PROGRAM SOLRUMSS BY NASA 1021108-021 


DEC 


1966 


(MAIN) PAGE 20 


L ERASABLE ASSIGNMENTS 


USER'S 0\nN page no. 9 


R032A 


the bits of OLDERR have the following MEANINGS: 


R0325 BIT 1 
R0326 BIT 2 
R0327 BIT 3 
R032B bit a 
R 0329 BIT 5 
R0330 BITIO 
R0331 BlTll 
R0332 BIT12 


1 IF the PILOTS AtiITUDe BUTTON IS DEPRESSED. 

1 IF RESTART FAILEU (AND UID A FRESH START). 

1 IF BIT A OF OUT I wAS NOT INVERTED LAST N^vJOB. 

1 TO INHIBIT IMU fail FqR 5 SECONDS AFTER COARSE ALIGN. 
I IF curtains CALLED (IMU MOOING FAILUREt ETC.) 

1 IF CDU FAIL IS ON IN FINE ALIGN. 

1 IF PIPA FAIL IS ON. 

1 IF IMU FAIL IS ON IN ANY MODE BUT COARSE ALIGN, 


R0333 IN flight 501» BITS 2» 5t 11, AND 12 INHI3IT MAINTENANCE OF THE NIGHT WATCHMAN ALARM 

R0335 SO THAT IF THEY ARE PRESENT FOR 2 CONSECUTIVE NwJOBS, G 6 N FAIl wILL BE SeNT TO THE MCP. 


0337 

0338 


0727 

0730 

072 7 
0730 

WASKSET 

WASOPSET 

erase 

ERASE 

Last Setting of imu mode switches, 

LAST setting OF OPTICS MODE SWITCHES, 

0339 

03A0 


0731 

0732 

0731 

0732 

DESKSET 

DESOPSET 

ERASE 

ERASE 

DtsiREO Setting of imu mode switches, 

DESIRED OPTICS MODES. 

R03A1 


THe following registers 

ARE used by the 

MODE switching AND 

MARK PROGRAMS, 

U3A3 

03AA 

03a5 

REF 

0733 

1 

0 7 3*, 

0733 

0733 

073A 

IMUCADR 

MODECADR 

OPTCADR 

ERASE 

EDJALS IMUCADR 
ERASE 

USED BY IMUSTALL. 

FOR INDEXING PURPOSES, 

USED BY OPTSTALL. 

03A6 


0 7 35 

0 735 

MARKSTAT 

erase 

Mark button status register. 


^tJ4^78A YUL SYSTEM FOR aOCA: REVISION 0 OF- PROGRAM S 0 LRUM 55 &Y NASA 1021108-021 DEC A* 1966 (MAIN) PAGE 


L erasable ASSIGNMENTS USER*S OWN PAGE NO. 10 


P03A7 


the follo»^ing storage 1 

s Reserved for imj compensation i 

parameters. 

03A9 


0736 

0736 

pbiasx 

ERASE 


PiPA BIAS AND SCALE FACTOR TERMS 

O3S0 

REF 

1 

0736 

pipabias 

EQUALS 

PBl ASX 

INTERMIXED, 

03S1 


0 737 

0 737 

pipascfx 

ERASE 



03S2 

REF 

1 

0737 

PIPASCF 

EO JALS 

PIPASCFX 


0353 


07A0 

0740 

PBIASY 

ERASE 



035A 


07A1 

0741 

pipascfy 

ERASE 



0355 


0 742 

0 742 

PBIASZ 

ERASE 



0356 


0743 

0743 

PIPASCFZ 

ERASE 



0357 


0 744 

0744 

GBIASX 

erase 


GYRO BIAS drifts. 

0358 


0745 

0745 

GBIASY 

ERASE 



0359 


0746 

0746 

GBIASZ 

ERASE 



0360 


0747 

0747 

ADI AX 

erase 


acceleration Sensitive drift along the 

0361 


0750 

0750 

ADIAY 

ERASE 


INPUT AXIS. 

0362 


0751 

0751 

ADIAZ 

ERASE 



036 3 


0752 

0 752 

AD5RAX 

erase 


ALCELERATION SENSITIVE DRIFT 

036A 


0753 

0753 

ADSRAY 

ERASE 


ALONG THE SP J N-REFERENCE AXIS, 

0365 


0754 

0 754 

ADSRAZ 

ERASE 



0366 


0755 

0 755 

1/PIPADT 

erase 


DELTA time FOR 1/PlPA. 

0367 

REF 

1 

0755 

oldbti 

eojals 

1/PlPADT 

TIMEl storage DURINo FREE-FALL COMP. 

0366 


0756 

0763 

GCOMP 

erase 

+ 5 

CONTAINS COMPENSATING GYRO TORQUES. 


R0369 the FOLLO^JING INTERLOCK REGISTER IS USED 3Y THE GYRO ROUTINES, 

0370 076A 076A LGYRO ERASE 

A0371 


ZLRO IF GYROS AVAILABLE - ADDRESS OF 
COMMANDS IF IN USE 


4H4578A YUL SYSTEM FOR A&C4: REVISION u OF PROGRAM SOLRUMS5 Bi FiASA 1021108-021 


Dec a* 1966 


(MAIN) PAGE" 22 


L ERASABLE ASSIGNMENTS USER'S OwN PAGE NO. 11 

Po3?2 THt Following storage contains reference ^ariaeLes for several mission programs, included heRe are 

Ru37a Position, velocity, their associated time, and imj stable mem&eR orientation (when the imu is aligned). 


0376 





0/65 

0772 

refrrect 

E^ASE 

♦ 5 

reference rectification vectors. 

03/7 





0773 

1000 

refvrect 

E^ASE 

+ 5 


03 78 





1001 

lOOb 

DELTAV 

ERASE 

♦5 

RtFERENCE DEVIATION VECTORS. 

03 T9 





1007 

1019 

NUV 

ERASE 

♦5 


0380 





1015 

1022 

refrcv 

erase 

♦ 5 

RLFERENCE conic POSITION VECTOR, 

0381 





1028 

1030 

refvcv 

ERASE 

♦5 

RtFERENCE CONlC VELOCITY VECTOR. 

0382 





1031 

1032 

reftc 

ERASE 

+ 1 

RLFERENCE TIME SINCE RECTIFICATION, 

0383 





1033 

1039 

te 

ERASE 

+ 1 

TIME CORRESPONDING TO POSITION AND VeL, 

03aA 





1035 

1036 

REFXKEP 

ERASE 


RLFERENCE CONIC VARIABLE X. 

0385 





103/ 

1037 

PBODY 

erase 



0386 





1090 

1090 

nshift 

erase 


Average g integrator parameters requir- 

0387 





1091 

1091 

xshift 

ERASE 


ing PERMANENT STORAGE 

0388 





1092 

1092 

CALCG 

ERASE 



0389 





1093 

1050 

UNITW 

ERASE 

*5 


0390 

REF 

1 




0765 

RN 

E3JAL5 

REFRRECT 

SYMBOLS For POSITION AND VELOCITY 

0391 

ref 

2 

Last 

22 


0765 

RPIP 

E3JALS 

rffrrect 

During accelerated phases. 

0392 

REF 

1 




0773 

VN 

E JJAlS 

REFVRECT 


0393 

ref 

2 

last 

22 


0773 

VPIP 

E3JALS 

refvrect 


039A 

ref 

1 




1001 

DELV 

eOJALS 

DeLTAV 

PIPA DATA DURING ACCELERATED PHASES. 

0395 

REF 

1 




1001 

DELVX 

eojals 

DELV 


0396 

REF 

2 

last 

22 


1003 

DELVY 

E3JAL5 

DELV +2 


0397 

REF 

3 

last 

22 


1005 

DELV2 

E3JALS 

DELV +9 


0398 

ref 

1 




1007 

GRAVITY 

E3JALS 

NUV 

average G INTEGRATOR VARIABLES 

0399 

ref 

1 




1015 

UNITR 

E3JAL5 

REFRCV 


OAOO 

ref 

1 




1023 

RMAG 

E3JALS 

REFVCV 


OAOl 

ref 

2 

last 

22 


1025 

RMAGSQ 

E3JALS 

REFVCV +2 


0A02 

REF 

3 

last 

22 


1027 

DELTAT 

E3JALS 

REFvCV *9 


0903 

REF 

1 




1031 

TEMX 

EQUALS 

RLFTC 


0909 

REF 

2 

last 

22 


1032 

TEMY 

EQUALS 

REFTC ♦ 1 


0905 

REF 

1 




1033 

TEMZ 

equals 

Tb 


0906 

REF 

2 

LAST 

22 


1039 

TEMXY 

equals 

TE ♦ 1 


0907 

REF 

1 




1035 

PIPAGE 

equals 

REFXKEP 


0908 





1051 

1072 

refsmmat 

erase 

+ 17D 

RtFERENCE TO 5M MATRIX 

0909 





1073 

1079 

DTEPOCH 

ERASE 

♦1 


09092 





1075 

1075 

redocntr 

ERASE 


Restart data Saved in these registers 

09099 





1076 

1077 

REDOTIME 

ERASE 

+ 1 






■ _ c 


4 / 


f 








k 






- 


V 








$ 






r 


4 
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(MAIN) PAGE 23 


Ruaio 

Rcja12 

Roaia 

RoA16 

ROAie 

R0A19 

R0A21 

RCjA23 

R0A25 

R0A27 


UA29 

0A30 

0A31 


R0A32 

0A33 

0A3A 

OA35 

0A36 

0A37 

0A38 

R0A39 

OAAl 

0AA3 

OAAA 

UAA5 

0AA6 

0AA7 

UAA8 

QAA9 

OASO 

OASl 

OA52 

0A53 

0A5A 

0AS5 

0AS6 

0A57 

OASe 

0AS9 

OA60 

0A6l 


ERASABLE ASSIGNMENTS USER»S OWN PAGE NO. 12 

THe; FOLLo^^ING STORAGE IS TIMe-SHAReD BY MISSION PROGRAMS UNDeR THe SUPERVISION oF MASTER CONTROL. iT IS 

organized into three parts ReTERReD to as A MeMORT, B Memory, and C MeMoRT. a particular mission phase is 
assigned to one of the Segments in sjch a way that no other mission phase using the same Segment will e^eR run 

concurrently i E.G,» RE-ENTRY WILL NeVeR RUN CoNCUR^^ENT WItH TVC, THE NUMBeR OF AReAS (3) IS DETERMINED BY tHe 

maximum number qf Distinct mission programs which rjn simultaneously. 

A memory 15 used by NAVIGATION PROGRAMS; MID-CqURSe DURING FREE-FALL PQRtIONS qF THe MISSION AND 
average G integration DURING ACCELERATED PHASES, GUIDANCE PROGRAMS SUCH AS tVC USe B MEMORY TOGETHER WITH tHeIR 
ASSOCIATED ALIGnMeNtS, THE C MEMORY PORTION IS USeD THROUGHOUT MOST OF TH£ MISSION FoR THe MIDCqURSe eRRoR 

transition matrix w, and later BY re-entRy after tHe last Measurement has been incorporated, the exception is 
system test* assigned to a memory, which never runs concurrently with mission programs. 


lluu 

1313 

amemqry 

ERASE 

+ 139D 

131^ 

1560 

BMEMORY 

ERASE 

+ 16AD 

1561 

1670 

CMEMORY 

ERASE 

+ 7 ID 


REF 

1 

storage used to 

SAVE TM2 DURING STANDBY 

1100 TIME2SAV 

eouals 

amemory 

♦ OOOD 

REF 

2 

LAST 

23 

1101 

TIMEISAV 

eouals 

AMEMORY 

+ 001D 

REF 

3 

LAST 

23 

1102 

INIHISAV 

edjals 

AMEMORY 

♦ 002D 

REF 

4 

LAST 

23 

1103 

INILOSAV 

eouals 

AMEMORY 

+ 003D 

REF 

5 

Last 

23 

110^ 

inihidif 

EOUALS 

AMEMORY 

+ 004D 

REF 

6 

last 

23 

1105 

INILODIF 

eouals 

AMEMORY 

+ 005D 


the following a memory Locations are used by mid-course navigation: 


REF 

7 

LAST 

23 

uoo 

RRECT 

EOUALS 

AMEMORY 

+ 000D 

REF 

B 

LAST 

23 

1100 

RIGNTION 

EOUALS 

Amemory 

+ 000D 

REF 

9 

LAST 

23 

1106 

VRECT 

eouals 

AMEMORY 

♦ 006D 

REF 

10 

LAST 

23 

1106 

VIGNTION 

EOUALS 

AMEMORY 

+ 0060 

REF 

11 

LAST 

23 

IIU 

tdeltav 

eouals 

amemory 

+ 012D 

ref 

12 

LAST 

23 

liu 

newdltav 

eouals 

AMEMQRY 

+ 012D 

REF 

13 

LAST 

23 

uu 

YV 

EOUALS 

amemory 

+ 012D 

REF 

14 

LAST 

23 

1122 

TNUV 

eouals 

AMEMORY 

+ 018D 

REF 

1 



1122 

-UPADR 

eouals 

TNUV 


REF 

2 

LAST 

23 

1123 

STCNTR 

eouals 

TNUV +l 


REF 

15 

LAST 

23 

1122 

newnuv 

EOUALS 

amemory 

♦ 018D 

REP 

16 

LAST 

23 

1122 

zv 

eouals 

AMEMORY 

+ 018D 

REF 

17 

LAST 

23 

1130 

RCV 

eouals 

amemory 

♦ 024D 

REF 

18 

LAST 

23 

1130 

FOUNOR 

eouals 

AMEMORY 

+ 02AD 

REF 

19 

LAST 

23 

1136 

VCV 

EOUALS 

AMEMORY 

+ 030D 

REF 

20 

LAST 

23 

U36 

FOUNDV 

eouals 

AMEMORY 

+ 030D 

REF 

21 

LAST 

23 

U44 

TC 

EOUALS 

AMEMORY 

+ 036D 

REF 

22 

LAST 

23 

1146 

TET 

equals 

AMEMORY 

+0380 

REF 

23 

LAST 

23 

1150 

XKEP 

equals 

Amemory 

+ 040D 

REF 

24 

LAST 

23 

1152 

ALPHAV 

eouals 

amemory 

+ 0420 


Ab4b78A YUL SYSTEM FOR AGC^*: REVISION 0 OF PROGRAM SoLRUMSS By NASA 1021108-021 
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0A62 

REF 

25 

LAST 

23 

1152 

DELR 

E3JALS 

amemory 

♦ 042D 

0A63 

ref 

26 

LAST 

24 

1160 

betav 

E3JALS 

AMEMORY 

4>048D 

UA64 

REF 

27 

LAST 

24 

1160 

DELVEL 

E3JAL3 

AMEMORY 

+ 0460 

0A65 

REF 

28 

LAST 

24 

1160 

UVL 

E3JALS 

AMEMORY 

♦ 048D 

0466 

REF 

29 

LAST 

24 

1166 

PHIV 

E3JALS 

Amemory 

♦ 054D 

0467 

ref 

30 

LAST 

24 

1166 

starmeas 

E3JALb 

amemory 

+ 054D 

0468 

REF 

31 

LAST 

24 

1174 

LNDMRKV 

E3JALS 

amemory 

+ 060D 

0469 

REF 

32 

LAST 

24 

1174 

PSIV 

E3JALS 

AMEMORY 

+ 060D 

0470 

REF 

33 

LAST 

24 

1202 

ROTLMV 

E3JALS 

AMEMORY 

+ 066D 

0471 

REF 

34 

LAST 

24 

1202 

F V 

E3JALS 

AMEMORY 

+ 066D 

0472 

REF 

35 

LAST 

24 

1210 

VECTAB 

E3JALS 

amemory 

+ 072D 

047 3 

REF 

36 

LAST 

24 

1210 

tavegon 

E3JALS 

Amemory 

+ 072D 

0474 

ref 

37 

LAST 

24 

1212 

TRESUME 

E3JALS 

AMEMORY 

+ 074D 

0475 

REF 

38 

LAST 

24 

1214 

RAVEQON 

E3JALS 

amemory 

+ 076D 

0476 

REF 

39 

LAST 

24 

1220 

BVECTOR 

E3JAL5 

amemory 

+ 080D 

0477 

ref 

40 

LAST 

24 

1220 

UNE 

E3JALS 

amemory 

+ 080D 

0478 

REF 

41 

LAST 

24 

1222 

VAVEGON 

E3jAlS 

AMEMORY 

+ 082D 

0479 

REF 

42 

LAST 

24 

1230 

UNP 

E3JALS 

AMEMORY 

+088D 

0480 

REF 

43 

LAST 

24 

1230 

RIG-4SEC 

E3JALS 

amemory 

♦oeeD 

0481 

ref 

44 

LAST 

24 

1236 

ERADSQ/4 

E3JALS 

AMEMORY 

♦ 094D 

0482 

REF 

45 

LAST 

24 

1240 

ERAD/2 

E3JALS 

AMEMORY 

+ 096D 

0463 

REF 

46 

LAST 

24 

1254 

ALPHAM 

E3JALS 

AMEMORY 

+ 1080 

0484 

REF 

47 

LAST 

24 

1256 

BETAM 

E3JALS 

AMEMORY 

+ 110D 

0485 

REF 

48 

LAST 

24 

1256 

LONGDES 

E3JAL3 

AMEMORY 

+ 110D 

0486 

REF 

49 

LAST 

24 

1260 

TAU 

E3JAL3 

AMEMORY 

+ 112D 

0487 

REF 

50 

LAST 

24 

1260 

GIVENT 

E3JALS 

amemory 

+ U2D 

0488 

REF 

51 

LAST 

24 

1260 

DL0N6 

E3JALS 

AMEMORY 

+ 112D 

0489 

REF 

52 

LAST 

24 

1262 

OT/2 

E3JAL5 

AMEMORY 

+ 114D 

0490 

REF 

53 

LAST 

24 

1262 

LAT 

E3JALS 

AMEMORY 

+ 1140 

0491 

REF 

54 

LAST 

24 

1264 

H 

E3JAL5 

AMEMORY 

+ 1160 

0492 

REF 

55 

LAST 

24 

1264 

LONG 

E3JALS 

AMEMORY 

+ 1 1 60 

0493 

REF 

56 

LAST 

24 

1266 

TDEC 

E3JALS 

AMEMORY 

+ 1180 

0494 

REF 

57 

LAST 

24 

1270 

AZ 

E3JALS 

AMEMORY 

+ 1200 

0495 

REF 

58 

LAST 

24 

1270 

FBRANCH 

E3JALS 

AMEMORY 

+ 1200 

0496 

REF 

59 

LAST 

24 

1271 

HBRANCH 

E3JALS 

AMEMORY 

+ 1210 

0497 

REF 

60 

LAST 

24 

1272 

GMODE 

E3JAL3 

AMEMORY 

+ 1220 

0496 

REF 

61 

LAST 

24 

1272 

NUMBTEMP 

E3JALS 

AMEMORY 

+ 1220 

0499 

REF 

62 

LAST 

24 

1273 

NUMBOPT 

E3JALS 

amemory 

+ 1230 

0500 

REF 

63 

LAST 

24 

1274 

VARIANCE 

E3JALS 

AMEMORY 

+ 1240 

0501 

REF 

64 

LAST 

24 

1274 

HMAG 

E3JALS 

AMEMORY 

+ 1240 

0502 

REF 

65 

LAST 

24 

1276 

MEASO 

E3JALS 

AMEMORY 

+ 1260 

0503 

REF 

66 

LAST 

24 

12 76 

cotgam 

E3JAL5 

AMEMORY 

+ 1260 

0504 

REF 

67 

LAST 

24 

1276 

DELTAQ 

E3JALS 

AMEMORY 

+ 1260 

0505 

REF 

68 

LAST 

24 

1300 

MEASMODE 

E3JAL5 

AMEMORY 

+ 1280 

0506 

ref 

69 

LAST 

24 

1300 

sitenumb 

E3JALS 

AMLMOrY 

+ 128D 

0507 

REF 

70 

LAST 

24 

1301 

NVCOOE 

E3JALS 

AMEMORY 

+ 1290 

0506 

REF 

71 

LAST 

24 

1302 

MIDEXIT 

E3JAL3 

AMEMORY 

+ 1300 


DEC 1966 


(MAIN) PAGE 25 
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0509 

REF 

72 

LAST 

24 

1302 

dsprthn 

EOJALS 

AMEMORY 

+ 1300 

0510 

REF 

73 

LAST 

25 

1303 

wmatflag 

EOJALS 

AMEMORY 

+ 1310 

0511 

REF 

74 

LAST 

25 

1303 

INCORPEX 

E3JALS 

AMEMORY 

+ 1310 

0512 

REF 

75 

LAST 

25 

130a 

STEPEXIT 

eojals 

AMEMORY 

+ 1320 

0513 

REF 

76 

LAST 

25 

1305 

OIFEUCNT 

EOJALS 

AMEMORY 

+ 1330 

0514 

REF 

77 

LAST 

25 

1305 

NORMGAM 

E3JALS 

AMEMORY 

+ 1330 

0515 

REF 

78 

LAST 

25 

1306 

scalea 

eojals 

AMEMORY 

+ 1340 

0516 

REF 

79 

LAST 

25 

1307 

SCALEB 

EOJALS 

AMEMORY 

+ 1350 

0517 

REF 

80 

LAST 

25 

1310 

SCALEDT 

eojals 

AMEMORY 

+ 1360 

0518 

ref 

81 

LAST 

25 

1311 

SCALDELT 

EOJALS 

AMEMORY 

+ 1370 

0519 

REF 

82 

LAST 

25 

1312 

SCALER 

eojals 

AMEMORY 

+ 1380 

0520 

REF 

83 

LAST 

25 

1313 

FFFLAGS 

EOJALS 

AMEMORY 

+ 1390 


R052001 



A MEMORY 

assignments for UPDATE 

ROUTINE 




052002 

REF 

84 

LAST 

25 

1100 

STBUFF 

edjals 

AMEMORY 

+ 0000 

052003 

REF 

85 

LAST 

25 

1116 

UPOLDMD 

edjals 

AMEMORY 

+ 0140 

052004 

REF 

86 

LAST 

25 

1117 

COMPNUMB 

edjals 

AMEMORY 

+ 0150 


R0521 



ENTRY 

ITEMS IN AMEMORY Tg BE INCLUDED IN 

1 DQaN-LINK* 


0522 

ref 

87 

LAST 

25 


1100 

FX 

EDJALS 

AMEMORY 

+ 0 

052 3 

ref 

68 

LAST 

25 


1106 

predang 

EDJALS 

AMEMORY 

+ 060 

0524 

ref 

89 

LAST 

25 


1107 

JJ 

equals 

AMEMORY 

+ 070 

0525 

ref 

90 

LAST 

25 


1110 

thetah 

equals 

AMEMORY 

+ 080 

0526 

ref 

91 

LAST 

25 


1112 

latang 

equals 

AMEMORY 

+ OlOD 

0527 

REF 

92 

LAST 

25 


1222 

L/D 

EQUALS 

AMEMORY 

+ 0820 

0528 

REF 

93 

LAST 

25 


1224 

DIFF 

equals 

AMEMORY 

+ 084D 

R0529 

END 

OF 

ENTRY 

ITEMS. 






R0S30 



A MEMORY 

assignments 

FOR rotating earth 

routine 



0531 

REF 

94 

LAST 

25 


U14 

RTINIT 

equals 

AMEMORY 

+ 0120 

0532 

REF 

95 

LAST 

25 


1122 

rteast 

equals 

AMEMORY 

+ 0180 

0533 

ref 

96 

LAST 

25 


1130 

RTNORM 

equals 

AMEMORY 

+ 0240 

0534 

REF 

97 

Last 

25 


1214 

RT 

equals 

AMEMORY 

+ 0760 

0535 

REF 

98 

LAST 

25 


1144 

DTEAROT 

equals 

AMEMORY 

+ 0360 

R05352 



A MEMORY 

temporaries 

used BY PRELAUNCH 




05354 

REF 

99 

LAST 

25 


1243 

PTEMP 

equals 

AMEMORY 

+ 990 


Shares this loc with rrect. 

SHARES THIS LOC WITH VRECT, 
shares THIS LOC WITH VRECT, 
SHARES THIS LOC WITH VRECT. 
SHARES THIS LOC WITH VRECT. 
SHARES THIS LOC WITH VAVEGON. 
SHARES THIS LOC WITH VAVEGON. 


SHARES THIS LOCATION WITH RAVEGON 




H0^>36 

U5i7 

0536 

0539 


R05391 

053911 

053912 

05392 


R05^0 

0541 

0542 

0543 

0544 

0545 

0546 

0547 

0548 

0549 

0550 

0551 

0552 

0553 

0554 

0555 

0556 

0557 

0558 

0559 

0560 

0561 

0562 

0563 

0564 

0565 

0566 

0567 
0566 

0569 

0570 


YUL SYSTEM KOR AGC4: REVIblON 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4, 1966 (MAIN) PAGE 26 


ERASABLE assignments USER’S OWN PAGE NO. 15 

A MEMORY usage AS TEMPORARIES BY AVERAGE G ROUTINE. 


REF 

100 

LAST 

25 

1277 

RNl 

equals 

AMEMORY 

+ 1270 

REF 

101 

LAST 

26 

1305 

VNl 

equals 

amemory 

+ 1330 

REF 

102 

LAST 

2 b 

I3l3 

AVGRETRN 

equals 

AMEMORY 

+ 1390 


A MEMORY TEMPORARIES USED BY SERVICER 


REF 

103 

LAST 

26 

1261 

VGCNTl 

equals 

amemory 

+ 1130 


REF 

104 

LAST 

26 

1262 

DVCNTl 

EQUALS 

amemory 

+ 1140 


REF 

105 

LAST 

26 

1263 

VRl 

EQUALS 

amemory 

+ 1150 

12 LOCATIONS FOR VR, DIFFVECT 


system test a memory usage: 


REF 

106 

LAST 

26 

1100 

genpl 

equals 

amemory +0000 

REF 

1 



1100 

TARlPOS 

EQUALS 

GENPL 

REF 

107 

LAST 

26 

1114 

fildelx 

equals 

amemory +0120 

REF 

108 

last 

26 

1174 

TMARK 

equals 

AMEMORY +0600 

REF 

109 

LAST 

26 

1176 

VMARK 

EQUALS 

AMEMORY +0620 

REF 

110 

LAST 

26 

1213 

COARSAGN 

EQUALS 

amemory +0750 

REF 

111 

LAST 

26 

1215 

TESTTIME 

EQUALS 

AMEMORY +0770 

REF 

112 

LAST 

26 

1216 

LTSTNOX 

EQUALS 

AMEMORY +0780 

REF 

113 

LAST 

26 

1220 

COUNTPL 

equals 

amemory +0800 

REF 

114 

LAST 

26 

1221 

PIPINDEX 

EQUALS 

AMEMORY +0810 

REF 

115 

LAST 

26 

1222 

PIPANO 

equals 

AMEMORY +0820 

REF 

116 

LAST 

26 

1223 

POSITON 

equals 

Amemory +083D 

REF 

117 

LAST 

26 

1224 

RESULTCT 

equals 

AMEMORY *0840 

REF 

1 



1224 

NDXCTR 

EQUALS 

RESULTCT 

REF 

118 

LAST 

26 

1225 

QPLACE 

EQUALS 

AMEMORY +0850 

REF 

119 

LAST 

26 

1226 

PIPNOX 

equals 

AMEMORY +0060 

REF 

120 

LAST 

26 

1230 

STOrEPL 

equals 

amemory +0880 

REF 

121 

LAST 

26 

1231 

NBPOS 

EQUALS 

amemory +890 

REF 

122 

LAST 

26 

1232 

TESTNDX 

equals 

AMEMORY +900 

REF 

123 

LAST 

26 

1233 

COUNDX 

equals 

AMEMORY +910 

REF 

124 

LAST 

26 

1234 

GYROD 

equals 

AMEMORY +920 

REF 

125 

LAST 

26 

1242 

DATAPL 

equals 

amemory *980 

REF 

126 

LAST 

26 

1302 

VACAOR 

equals 

AMEMORY +1300 

REF 

127 

LAST 

26 

1304 

mkstati 

equals 

Amemory +i32D 

ref 

128 

LAST 

26 

1305 

COAROFIN 

equals 

amemory +1330 

REF 

129 

LAST 

26 

1307 

MAXPTS2 

equals 

amemory +1350 

REF 

130 

LAST 

26 

1310 

QPLAC 

equals 

AMEMORY +1360 

REF 

131 

LAST 

26 

1311 

PTS 

equals 

AMEMORY +1370 

REF 

132 

LAST 

26 

1312 

RUN 

equals 

AMEMORY +1380 

REF 

133 

LAST 

26 

1313 

EROPTN 

EQUALS 

amemory +1390 


if ‘-K- 







I I iT I 


. '■ 

■ ■ 



I 



L 

05 n 

0572 

05 rs 

Ob'!** 

0575 

0576 

0577 

0578 

0579 

0580 

0581 

0582 

0583 

R058<t 

0585 

0586 

0587 

0588 

0589 

0590 

0591 

0592 

0593 

059^f 

0595 

0596 

0597 

0598 

0599 

0600 

0601 

0602 

0603 

0606 

0607 

0608 

0609 

0610 

0611 

0612 

0613 

061A 

0615 

0615 

0616 

0617 


1966 


(MAIN) PAGE 21 


YUL system for AGC4: REVISION 0 OF PROGRAM 50LRUM55 BY NASA 1021108-021 DEC 4, 

erasable assignments USER'S OWN page no. 16 


REF 

1 



1561 

TESTNO 

eojals 

CMEMORY 

+ 000D 

REF 

2 

LAST 

27 

1562 

SAVE 

EOJALb 

CMEMORY 

+ 001D 

REF 

3 

LAST 

2 7 

1563 

PLOW 

EOJALS 

CMEMORY 

*002D 

ref 

4 

LAST 

27 

1564 

CUS5ANG 

E3JAL5 

CMEMORY 

+ 003D 

REF 

5 

LAST 

27 

1565 

NEGCDUl 

EOJALS 

CMEMORY 

+ 004D 

REF 

6 

LAST 

2 7 

1566 

NEGCDU2 

EQUALS 

CMEMORY 

♦ 005D 

REF 

7 

LAST 

27 

1567 

LOCNO 

EQUALS 

CMEMORY 

+ 006D 

REF 

8 

LAST 

27 

1570 

CALCDIR 

EQUALS 

CMEMORY 

+ 007D 

ref 

9 

LAST 

27 

1571 

BUBBLE 

equals 

CMEMORY 

+ 008D 

REF 

10 

LAST 

27 

1572 

TEMDELV 

equals 

CMEMORY 

+ 009D 

REF 

11 

LAST 

2 ! 

1573 

RETAA 

equals 

CMEMORY 

♦ OlOD 

REF 

12 

LAST 

27 

1574 

retbb 

equals 

CMEMORY 

+011D 

REF 

1 



0621 

starnumb 

equals 

D5PTEM2 



B memory 

USED 

By powered 

FLIGHT and ATTITUDE MANEUVERS 



REF 

1 



1314 

CDUTEMP 

EQUALS 

BMEMORY 

♦ GOOD 

REF 

2 

LAST 

27 

1322 

CDUbUF 

EQUALS 

BMEMORY 

4006D 

REF 

3 

LAST 

27 

1322 

wc 

equals 

BMEMORY 

+ 006D 

REF 

4 

LAST 

27 

1322 

UNITN 

equals 

BMEMORY 

*006D 

REF 

5 

LAST 

27 

1322 

RTRNSLUN 

equals 

BMEMORY 

+ 006D 

REF 

6 

LAST 

27 

1322 

VF 

equals 

BMEMORY 

♦ 006D 

REF 

7 

LAST 

27 

1330 

SINCDU 

EQUALS 

BMEMORY 

♦ 012D 

REF 

8 

LAST 

27 

1336 

COSCDU 

EQUALS 

BMEMORY 

+ 018D 

REF 

9 

LAST 

27 

1344 

DCDU 

EQUALS 

BMEMORY 

+ 024D 

REF 

10 

LAST 

27 

1344 

DUPCDU 

equals 

BMEMORY 

♦ 0240 

ref 

11 

LAST 

2 ! 

1344 

steerror 

EQUALS 

BMEMORY 

+ 024D 

REF 

12 

LAST 

27 

1352 

DNB 

equals 

BMEMORY 

♦ 030D 

REF 

13 

LAST 

27 

1352 

VG 

equals 

BMEMORY 

+030D 

REF 

14 

LAST 

27 

1352 

UNITVG 

equals 

BMEMORY 

+ 030D 

REF 

15 

LAST 

27 

1360 

ERRDRSUM 

equals 

BMEMORY 

♦ 036D 

REF 

16 

LAST 

27 

1366 

XSC 

equals 

BMEMORY 

+ 042D 

REF 

17 

LAST 

27 

1366 

UNITRXV 

equals 

BMEMORY 

+ 042D 

REF 

18 

LAST 

27 

1365 

UNITF 

equals 

BMEMORY 

+ 042D 

REF 

19 

LAST 

21 

1366 

UNITD 

EQUALS 

BMEMORY 

+ 042D 

REF 

20 

LAST 

21 

1374 

YSC 

equals 

BMEMORY 

+ 048D 

REF 

21 

LAST 

27 

1374 

UNITHORZ 

equals 

BMEMORY 

+ 048D 

REF 

22 

LAST 

27 

1374 

UNITS 

equals 

BMEMORY 

+ 046D 

REF 

23 

LAST 

27 

1402 

ZSC 

equals 

BMEMORY 

+ 054D 

REF 

24 

LAST 

27 

1402 

UNITMDT 

equals 

BMEMORY 

♦ 054D 

REF 

25 

LAST 

27 

1410 

XSCD 

EQUALS 

BMEMORY 

+ 060D 

REF 

26 

LAST 

27 

1410 

CBDT 

equals 

BMEMORY 

+ 0600 

REF 

27 

LAST 

2 7 

1416 

Y5CD 

equals 

BMEMORY 

+ 066D 

REF 

28 

LAST 

27 

1416 

VK 

equals 

BMEMORY 

+ 0660 

REF 

29 

LAST 

27 

1424 

ZSCD 

equals 

BMEMORY 

+ 0720 

REF 

30 

LAST 

27 

1424 

SGNTHETA 

EQUALS 

BMEMORY 

+ 0720 

REF 

31 

LAST 

27 

1424 

DIFFVECT 

equals 

BMEMORY 

♦ 0720 

REF 

32 

LAST 

2 7 

1432 

RTAHG 

EQUALS 

BMEMORY 

+ 0780 


YUL SYSTEM FOR AGCA: REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4t 


1966 (MAIN) PAGE 28 


L ERASABLE ASSIGNMENTS 


USER'S OWN page no* 17 


U617S 

REF 

33 

last 

27 

1432 

DTEMPl 

E3JALS 

bMEMORY 

♦otbd 

0618 

REF 

34 

LAST 

28 

1432 

5 

eojals 

BMEMORY 

♦ 0780 

0619 

REF 

35 

LAST 

28 

1434 

DN 

eojals 

BMEMORY 

+ 080D 

0620 

REF 

36 

LAST 

28 

1436 

5MA 

eojals 

BMEMORY 

♦ 082D 

0621 

REF 

37 

LAST 

28 

1440 

ANORMAL 

eojals 

BMEMORY 

+ 084D 

062? 

REF 

38 

LAST 

28 

1442 

LOOKANG 

EOJALS 

BMEMORY 

♦ 086D 

06225 

REF 

39 

LAST 

28 

1443 

DISPCNTR 

tOjALS 

BMEMORY 

♦ 0870 

0623 

REF 

40 

LAST 

26 

1444 

MDT 

EOJALS 

bMEMORY 

♦ 0880 

0624 

REF 

41 

LAST 

28 

1446 

VGCNTR 

E3JALS 

BMEMORY 

+ 0900 

0625 

ref 

42 

LAST 

28 

1447 

DVCNTR 

E3JAL3 

BMEMORY 

♦ 0910 

A0626 






KIROLL 

EOJALS 

BMEMORY 

+ 0920 

0627 

REF 

43 

LAST 

28 

1452 

DTHETA 

EOJALS 

BMEMORY 

+ 0940 

0626 

REF 

44 

LAST 

28 

1454 

THETAMAN 

EOJALS 

BMEMORY 

♦ 0960 

0629 

REF 

45 

LAST 

28 

1456 

TFF 

E3JALS 

BMEMORY 

+ 0980 

0630 

REF 

46 

LAST 

26 

1460 

LONGTIME 

EOJALS 

BMEMORY 

+ 1000 

0631 

REF 

47 

LAST 

28 

1462 

tliftoff 

EOJALS 

BMEMORY 

+ 1020 

0632 

REF 

48 

LAST 

28 

1462 

TENGON 

EOJALS 

BMEMORY 

♦ 1020 

0633 

REF 

49 

LAST 

28 

1462 

tcutoff 

EOJALS 

BMEMORY 

♦ 1020 

0634 

REF 

50 

LAST 

28 

1464 

PIPTIME 

EOJALS 

BMEMORY 

♦ 1040 

0635 

REF 

51 

LAST 

28 

1466 

LONGEXn 

EOJALS 

BMEMORY 

♦ 1060 

0636 

REF 

52 

LAST 

28 

1467 

CALLCADR 

EOJALS 

BMEMORY 

+ 1070 

0637 

REF 

53 

LAST 

28 

1470 

VRCADR 

EOJALS 

BMEMORY 

+ 1080 

0638 

REF 

54 

LAST 

28 

1471 

EXITCADR 

EOJALS 

BMEMORY 

+ 1090 

0639 

REF 

55 

LAST 

26 

1472 

ROLLC 

EOJALS 

BMEMORY 

♦ ilOD 

0640 

ref 

56 

LAST 

28 

1474 

EXITCADI 

EOJALS 

BMEMORY 

+ 1120 

R0650 

B f C 

memory 

J5ED FOR erasable 

501 LAJnCH* AIMPOINT* VEHICLE DATA, 


06545 

REF 

13 

LAST 

27 

1617 

TATLANl 

EOJALS 

cmemory 

♦ 0300 

0655 

REF 

57 

LAST 

28 

1526 

TATLANT 

EOJALS 

BMEMORY 

+ 1380 

06555 

REF 

14 

LAST 

28 

1621 

RTATLANl 

EOJALS 

CMEMORY 

+ 0320 

0656 

REF 

58 

LAST 

28 

1530 

RTATLANT 

EOJALS 

BMEMORY 

+ 1400 

06565 

REF 

15 

LAST 

28 

1627 

TPACIFl 

EOJALS 

CMEMORY 

+ 0380 

0657 

ref 

59 

LAST 

28 

1536 

TPACIFC 

EOJALS 

BMEMORY 

+ 1460 

06575 

REF 

16 

LAST 

28 

1631 

RTPACIFl 

EOJALS 

CMEMORY 

♦ 040D 

0658 

REF 

60 

LAST 

28 

1540 

RTPACIFC 

EOJALS 

BMEMORY 

+ 1480 

0659 

REF 

61 

LAST 

28 

1546 

ESO(VR) 

EOJALS 

BMEMORY 

+ 1540 

0660 

REF 

62 

LAST 

28 

1552 

SEMILAT 

EOJALS 

BMEMORY 

+ 1580 

0661 

REF 

63 

LAST 

28 

1556 

TCOAST 

EOJALS 

BMEMORY 

♦ 1620 

06615 

REF 

64 

LAST 

28 

1560 

TDECAY 

EOJALS 

BMEMORY 

♦ 1640 


R0662 



THE 

FOLLOWING ARE RE-EnTRY AND 

PRE-RE- 

entry ASSIGNMENTS: 


0663 

REF 

65 

LAST 

28 13U 

tv) 

EOJALS BMEMORY + 

GOOD 

0664 

REF 

66 

LAST 

28 1324 

DIFFOLD 

EOJALS BMEMORY ♦ 

0080 

0665 

REF 

67 

LAST 

28 1326 

07 

EOJALS BMEMORY ♦ 

OlOD 


N.8. THIS LOCATION SHARED WITH ENTRY 


N,B. THIS location SHARED WITH ENTRY 


^B^t>78A YUL SYSTEM FOR AGCA: REVISIJN 0 Oh PROGRAM SOLRUM55 BY 


L ERASABLE ASSIGNMENTS 


0666 

REE 

66 

LAST 

2b 

1330 

FACT2 

E3JALS 

0667 

ref 

69 

LAST 

29 

1332 

ESO 

eojals 

06 fO 

REF 

70 

LAST 

29 

1340 

LEWD 

eojals 

0671 

REF 

71 

LAST 

29 

1342 

VSQUARE 

eojals 

0672 

REF 

72 

LAST 

29 

1344 

DADVl 

E3JAL5 

0673 

REF 

73 

LAST 

29 

1346 

ROOT 

EQUALS 

067A 

REF 

7A 

LAST 

29 

1350 

tentry 

E3JALS 

0675 

REF 

75 

LAST 

29 

1352 

ROLLBIAS 

EQUALS 

R0676 

A 

HOLE. 





0677 

REF 

76 

LAST 

29 

1356 

ETA 

equals 

0678 

REF 

77 

LAST 

29 

1362 

D 

equals 

0679 

REF 

78 

LAST 

29 

1364 

VI 

equals 

0680 

REF 

79 

LAST 

29 

1366 

NEGTHET 

equals 

0681 

REF 

80 

LAST 

29 

1370 

VIOLD 

equals 

0682 

REF 

81 

LAST 

29 

1372 

K2R0LL 

equals 

0683 

ref 

82 

LAST 

29 

1374 

GOTOADDR 

EQUALS 

068A 

REF 

63 

LAST 

29 

1375 

XPIP3UM 

equals 

0685 

ref 

84 

LAST 

29 

1376 

YPIPSUM 

EQUALS 

0686 

REF 

85 

LAST 

29 

1377 

ZPIPSUM 

EQUALS 

0687 

REF 

86 

LAST 

29 

1400 

XPIPBUF 

equals 

0688 

REF 

87 

LAST 

29 

1404 

YPIPBUF 

equals 

0689 

REF 

68 

LAST 

29 

1410 

ZPIPBUF 

equals 

0690 

REF 

89 

LAST 

29 

1414 

PIPCTR 

EQUALS 

0691 

REF 

90 

LAST 

29 

I4l5 

DOLD 

equals 

R0692 

A 

HOLE. 





0693 

REF 

91 

LAST 

29 

1420 

temib 

equals 

069A 

REF 

92 

LAST 

29 

1421 

Ml 

equals 

0695 

REF 

93 

LAST 

29 

1422 

GRAD 

EQUALS 

R0696 

A 

hole. 9 





0697 

ref 

94 

LAST 

29 

1431 

LEO 

EQUALS 

0698 

ref 

95 

LAST 

29 

1433 

OHOOK 

equals 

0699 

REF 

96 

LAST 

29 

1435 

AHOOKDV 

equals 

0700 

REF 

97 

LAST 

29 

1437 

DVL 

equals 

0701 

REF 

90 

LAST 

29 

1450 

KlROLL 

EQUALS 

R070A 

UNB*X 

lYfZ 

ARE DEFINED LATER. 




R0705 






END OF 

RE-ENT 


R0706 



6 MEMORY ASSIGNMENTS FOR 

PRE-i 

LAUNCH alignment. 

0707 

REF 

99 

LAST 

29 

1314 

LATITUDE 

equals 

0708 

REF 

100 

LAST 

29 

1316 

AZIMUTH 

EQUALS 

0709 

REF 

101 

LAST 

29 

1320 

GYROCSW 

equals 

0710 

REF 

102 

LAST 

29 

1321 

PrELTEMP 

equals 

0711 

REF 

103 

LAST 

29 

1322 

prelxga 

equals 

0712 

REF 

104 

LAST 

29 

1323 

prelyga 

EQUALS 

0713 

REF 

105 

LAST 

29 

1324 

PRELZGA 

equals 

0715 

REF 

106 

LAST 

29 

1332 

inflang 

equals 


ASA 1021108-021 DEC A, lg66 (MAIN) PAGE 

USER'S OWN PAGE NO. 18 

BMEMORY *0120 
BMEMORY +01AD 


BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

+ 020D 
*0220 
* 24D 
+ 026D 
+ 028D 
+ 30D 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

+ 034D 
♦ 038D 
+ 0400 
+ 042D 
+ 044D 
+046D 
+ 0480 
+ 049D 
+ 050D 
+ 051D 
+ 052D 
+ 056D 
+ 060D 
+ 64D 
+ 650 

BMEMORY 

BMEMORY 

BMEMORY 

+ 660 
+ 69D 
+ 700 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

+ 77D 
♦ 79D 
+ BID 
+ 83D 

+0920 N*B. IHIS LOCATION SHARED WITH POW, FL 

Y STUFF 



BMFMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

BMEMORY 

+ 000D 
+ 002D 
♦ 0040 
+ 0050 
+ 0060 
+ 0070 
+ 0080 


BMEMORY ♦OIAD 


YUL SYSTEM FOR AGC4: REVISION C OF RR'jGRAM 50LRUMS5 BY NASA 1021106-021 


dec a. 


1966 


(MAIN) PAGE 30 
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CUM FOR VCA, VTS, NoOP FOR VCS, 

ADDRWD 

3 

TEM2 

0 

VACLOC 

3 

ADDRWD 

2 

TEM2 

0 

VACLOC 

2 

CONSTANT used BY UNARY LOAD ROUTINE. 
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DUUBLE precision ADD INSTRUCTION 
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UADI 
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MPAC 
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WITH addresses SET UP IN ADDRwD, TEM2 
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ADDTOSUB 

TRAD 4l 

TRIPLE precision SUBTRACT INSTRUCTION 
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INTI 
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TEM2 
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POLYNOMIAL EVALUATOR ENTERS HERE. 
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0062 

0 


T S 

0202 

ref 

3 

LAST 

75 

03*6310 

0 

7301 

1 


TC 

0203 

REF 

12 

LAST 

75 

03*6311 

0 

0106 

0 


TC 

0204 

ref 

4 

LAST 

70 

03*6312 

0 

6021 

1 

SSM 

TC 

0205 

ref 

3 

LAST 

75 

03*6313 

0 

4740 

0 


TC 

0206 

REF 

13 

LAST 

73 

03*6314 

0 

4024 

0 


TC 

0207 

REF 

14 

LAST 

75 

03*6315 

0 

4024 

0 


TC 

0208 

REF 

5 

LAST 

75 

03*6316 

0 

6021 

1 

SSP 

TC 

0209 

REF 

15 

LAST 

75 

03*6317 

0 

4024 

0 


TC 

0210 

REF 

16 

LAST 

75 

03*6320 

0 

4024 

0 


TC 

0211 

ref 

4 

LAST 

75 

03*6321 

0 

4740 

0 


TC 

0212 

REF 

17 

LAST 

75 

03*6322 

0 

4024 

0 


TC 
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USER'S OWN PAGE NO, 6 

ABVAL 

DPEXIT 

MUOE IS NOW DP 

Cl 

TEMIO 

VSRl 

D0T2 

FOUR 

VACLOC 

5T0RDAC 

TAKES HALF THE LENGTH OF THE VECTOR IN 

Vac 

Shi FT VECTOR RIGHT ONE 
take THE SQUARE OF ITS LENGTH 

SiORE SQUARE OF LENGTH IN REGISTERS 28 
AhU 29 OF vAC AREA, 

MPACCOM 

SQR T 3 

TEMIO 

TAKE A triple-precision SORT IDP ANSWER) 

ahd exit 

Q 

TEM9 

FOUR 

Subroutine which shifts vector in vac 
right one place, used by abval and unit 

VACLOC 

SRl 

TEMll 

MINUS? 

SRI 

USED BY abval AND UNIT 

VECTOR IS shifted RIGHT 30 DOT PRODUCT 
WUNT OVERFLOW, 

TEMll 

MINUS 2 
ADDRWD 

SRI 

Fur the dot routine, 

VtCTOR IS NOW shifted RIGHT 

TEM9 

BRANCH 

MPACCOM 

DANZIG 

DANZIG 

BRANCH 

DANZIG 

DANZIG 

MPACCOM 

DANZIG 

SET SIGN OF MPAC,MPAC+1 MINUS, USED BY 
sign INSTRUCTION 


^ti^t?78A YUL SYSTEM FOR AoC^t: REVl&lON 0 OF PROGRAM 50LRUM55 tiV 


001 

BANK 

03 

interpreted 

Section 






0213 

REF 

2 

LAST 

62 

03»6323 

3 

4231 

0 

square 

CAF 

021A 

REF 

1 



03»6324 

0 

5064 

0 


TC 

0215 

REF 

16 

LAST 

71 

03*6325 

4 

0065 

0 

COMP 

cs 

0216 





03*6326 

6 

0000 

1 


DDJBLE 

0217 

REF 

46 

LAST 

74 

03*632 7 

2 

0000 

0 


I MDEX 

0218 





03*6330 

0 

6331 

0 


TC 

0219 

REF 

2 

LAST 

59 

03*6331 

0 

5202 

1 


TC 

0220 

REF 

18 

LAST 

75 

03*6332 

0 

4024 

0 


TC 

0221 

REF 

5 

LAST 

75 

03*6333 

0 

474U 

0 


TC 

0222 

REF 

19 

LAST 

76 

03*6334 

0 

4024 

0 


TC 

0223 





03*6335 

0 

6333 

1 


TC 

022A 

REF 

16 

LAST 

74 

03*6336 

3 

5501 

0 

SMOVE 

CAP 

0225 

REF 

40 

LAST 

74 

03*633 f 

5 

0116 

I 


T5 

0226 

REF 

20 

LAST 

76 

03*6340 

0 

4024 

u 


TC 

0227 

REF 

22 

LAST 

73 

03*6341 

1 

0020 

L 

NEXT 

CCS 

0228 

REF 

17 

LAST 

69 

03*6342 

1 

0121 

1 


CCS 

0229 





03*6343 

0 

6347 

L 


TC 

0230 

ref 

7 

LAST 

73 

03*6344 

2 

0067 

1 


INDEX 

0231 

REF 

3 

LAST 

73 

03*6345 

3 

0052 

0 


XCH 

0232 

REF 

4 

LAST 

73 

03*6346 

0 

4602 

1 


TC 

0233 

REF 

18 

LAST 

76 

03*6347 

5 

0121 

0 

+ 4 

T5 

0234 

REF 

16 

LAST 

7h 

03 * 63 50 

3 

4516 

1 


CAF 

0235 

REF 

1 



03*6351 

0 

6362 

0 


TC 

0236 

ref 

19 

LAST 

7 6 

03*6352 

1 

0121 

1 

noload 

CCS 

0237 

ref 

20 

LAST 

76 

03*6353 

5 

0121 

0 


T5 

0238 

ref 

23 

LAST 

76 

03 * 6 3 54 

1 

0020 

1 


CCS 

0239 

ref 

17 

LAST 

76 

03*6355 

3 

5501 

0 


CAF 

0240 





03*6356 

0 

6362 

Q 


1 c 

0241 

REF 

17 

LAST 

76 

03*6 35 7 

4 

4516 

0 


cs 

0242 

REF 

17 

LAST 

76 

03*6360 

5 

0065 

1 


T5 

0243 

REF 

1 



03*6361 

0 

5072 

1 


TC 

0244 

REF 

a 

LAST 

62 

03 *6362 

5 

0066 

1 

SWLODIND 

TS 

0245 

REF 

21 

last 

76 

03*6363 

0 

4024 

0 


1C 

-1 r 

’f V 1 


- 1 
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USER’S OWN page no, 7 

bUGMPAC 

DSQ2 

MODE 

SuUARE MPaC and leave RESULT IN MPaC, *2 
CUNTINUE AS IN DMP. 

A 

+ 1 

VACCOM 

DANZIG 

MPACCOM 

DANZIG 

-2 

ZERO 

MPAC +l 
DANZIG 

Fur TP 

CYR 

adrloc 

+ 4 

F 1 XLOC 

OPRET 

D0eR2 

NEXT AND ITCQ OPERATORS 

NEXT - KNOCK DOwN AdRLOC BY ONE' 

AimD begin NEXT EQUN IMMEDIATELY 
nCQ - PICK UP UPRET AND BRANCH 

ADRLOC 

ONE 

SWLODIND 

Turn on load indicator 

adrloc 

ADRLOC 

CYR 

Zero 

NuLOD and round OPERATORS, DECREMENT 
ADRLOC SINCE WE SHOULDNT HAVE TAKEN AN 

Address, see if nolod or round 

NULOD - Set neweqind to zero 

♦ 4 

ONE 

MODE IS NOW DP 

MODE 

MPACRND 

Gu ROUND MPAC AND RETURN TO DANZIG 


NEV^iEQIND 

DANZIG 


^b^578A YUL SYSTEM FOR AGc<+; REVISION U 0|- PROGRAM SOLRUMSS BY 


L OUl 

BANK 

03 

interpreter 

Section 






U2h6 

ref 

49 

last 

76 

03 t 6 3 6 

3 

0117 

0 

SLl 

XCH 

02A7 





03f 6365 

6 

0000 

1 


JOJBLL 

02Ae 

REF 

50 

LAST 

7 7 

a3t6366 

5 

on 7 

0 


TS 

02A9 

REF 

18 

LAST 

76 

0 3 ♦ 6 3 6 7 

3 

5501 

0 


CAF 

02S0 

REF 

51 

LAST 

77 

03 i6370 

6 

0116 

1 


AD 

02SI 

REF 

52 

LAST 

77 

03^6371 

6 

0116 

1 


AD 

02S2 

REF 

53 

LAST 

77 

03*6372 

5 

0116 

1 


IS 

02S3 

REF 

19 

LAST 

7 7 

03*63 73 

3 

5501 

0 


CAF 

U2SA 

REF 

54 

LAST 

77 

03*637*+ 

6 

Oils 

1 


AD 

0255 

REF 

55 

LAST 

77 

03*6375 

6 

0115 

1 


AD 

0256 

REF 

56 

LAST 

77 

03*6376 

5 

0115 

1 


rs 

0257 

REF 

47 

LAST 

75 

03*6377 

0 

0001 

0 


TC 

0256 

ref 

5 

LAST 

69 

03*6t+00 

5 

0122 

0 


TS 

0259 

REF 

48 

LAST 

77 

03*6401 

0 

0001 

0 


TC 

0260 

ref 

3 

last 

69 

03*6402 

0 

6042 

1 

SHIFTL 

TC 

0261 





03*6403 

0 

6406 

0 


TC 

0262 

REF 

61 

LAST 

75 

03 * 6404 

5 

0062 

0 

LEFTLOOP 

T5 

0263 

REF 

1 



03*6405 

0 

6364 

0 


TC 

026A 

REF 

6 2 

LAST 

7 7 

03*6406 

I 

0062 

1 

+ 3 

CCS 

0265 

REF 

1 



03*6407 

0 

6404 

i 


TC 

0266 

REF 

22 

LAST 

76 

03*6410 

0 

4024 

0 


TC 

0267 

ref 

20 

LAST 

77 

03*6411 

3 

5501 

0 

TSLC 

CAF 

0268 

REF 

32 

LAST 

73 

03*6412 

5 

0102 

1 


TS 

0269 

REF 

6 

LAST 

75 

03*6413 

0 

6021 

1 


TC 

0270 





03*6414 

0 

64 1 6 

1 


TC 

02 71 

REF 

1 



03*6415 

0 

6430 

0 


TC 

0272 

ref 

57 

LAST 

77 

03*6416 

4 

0115 

0 

retrn 

C5 

0273 





03*6417 

6 

0000 

1 


DDJBLE 

027A 





03*6420 

5 

0000 

1 


OVS< 

0275 





03*6421 

0 

6423 

1 


TC 

02 76 

REF 

2 

LAST 

77 

03*6422 

0 

6430 

0 


TC 

0277 

REF 

33 

LAST 

77 

03*6423 

3 

0102 

1 


XCH 

02 7 P 

REF 

18 

LAST 

76 

03*6424 

6 

4516 

1 


AD 

0279 

REF 

34 

LAST 

77 

03*6425 

5 

0102 

1 


TS 

02b0 

REF 

2 

LAST 

77 

03*6426 

0 

6364 

D 


TC 

0281 

REF 

1 



03*6427 

0 

64 1 6 

1 


TC 

0282 

REF 

35 

LAST 

77 

03*6430 

4 

0102 

0 

slcans 

C5 

0283 

REF 

63 

LAST 

77 

03*6431 

2 

0062 

1 


INDEX 

028A 





03*6432 

5 

0000 

I 


TS 

0285 

REF 

23 

LAST 

77 

03 * 6 4 3 3 

0 

4024 

Q 
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USER'S Oi^N PAGt NO. 8 

MPAC +2 

MPAC +2 

ZERO 

MPAC +1 

MPAC +1 

MPAC +l 

ZERO 

MPAC 

MPAC 

MPAC 

Routine which shifts triple accumulator 

LEFT ONE PLACE. IT IS USED BY TSLT AND 
ToLC 

G 

OVFIND 

Q 

Set OVFIND if entire word overflows 

TRUE2 
+ 3 

ADDRWD 

SLl 

AODRWD 

LEFTLOOP 

DANZIG 

TP left shift - get integer address 

Zero 

TEM2 

BRANCH 

♦2 

SLCANS 

Nurmalization - start BY Setting count 
to zero 

MPAC 

hlre for non-zero 

+ 2 

SLCANS 

TEM2 

ONE 

SMP ON OVERFLOW 

NO overflow - shift again 

Dune - WE overflowed 

TEM2 

sn 

RETRN 

Du the shift 

And loop 

TEM2 

ADDRWD 

0 

DANZIG 

store complement of count 


^a^578A YUL system FQR AGCA; REVISION 0 Of- PROGRAM SoLRUM55 BY 
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0266 

ref 

27 

LAST 

73 

03 

t6434 

4 

0076 

1 

SwITCHEM 

cs 

0287 

REF 

64 

LAST 

77 

03 

f 6435 

5 

0062 

0 


IS 

028P 

ref 

1 



03 

f 6 436 

7 

7210 

1 


MAS< 

0289 

REF 

65 

LAST 

7a 

03 

♦ 643 7 

3 

0062 

0 


xch 

0290 





03 

» 6 440 

2 

5777 

1 


EXTE^iD 

0291 

REF 

3 

LAST 

48 

03 

*6441 

4 

4504 

0 


'I? 

0292 

REF 

12 

LAST 

64 

03 

*6442 

5 

0105 

0 


T5 

0293 

REF 

66 

Last 

78 

03 

*6443 

2 

0062 

1 


INDEX 

0294 

REF 

5 

LAST 

69 

03 

* 6 444 

3 

4477 

1 


CAF 

0293 

REF 

22 

LAST 

67 

03 

*6445 

5 

0103 

0 


T5 

0296 





03 

* 6 446 

2 

0017 

0 


INHINT 

0297 

REF 

13 

LAST 

78 

03 

*6447 

2 

0105 

1 


INDEX 

0298 

REF 

6 

LAST 

18 

03 

*6450 

7 

0645 

1 


MASK 

0299 

REF 

17 

LAST 

74 

03 

*6451 

5 

0104 

1 


TS 

0300 

ref 

24 

LAST 

76 

03 

*6452 

1 

0020 

1 


CCS 

0301 

ref 

4 

LAST 

45 

03 

♦ 6453 

0 

4364 

1 


TC 

0302 





03 

*6454 

0 

6457 

1 


TC 

0303 

REF 

23 

LAST 

78 

03 

*6455 

4 

0103 

1 


CS 

0304 

REF 

1 



03 

*6456 

0 

6464 

1 


TC 

0305 





03 

*6457 

2 

0016 

1 


relint 

0306 

REF 

18 

LAST 

78 

03 

*6460 

1 

0104 

0 


CCS 

0307 

REF 

12 

LAST 

72 

03 

*6461 

0 

4703 

1 


TC 

030B 

REF 

1 



03 

* 6462 

0 

4574 

0 


TC 

0309 

REF 

13 

LAST 

78 

03 

*6463 

0 

4703 

1 


TC 

0310 

REF 

14 

LAST 

78 

03 

* 6464 

2 

0105 

1 

Switch IT 

INDEX 

0311 

REF 

7 

LAST 

78 

03 

*6465 

7 

0645 

1 


V1AS< 

0312 

REF 

49 

LAST 

77 

03 

♦ 6466 

5 

0001 

0 


TS 

0313 

REF 

15 

LAST 

78 

03 

*6467 

2 

0105 

1 


INDEX 

0314 

REF 

e 

LAST 

78 

03 

♦ 6470 

4 

0645 

1 


CS 

0315 

REF 

24 

LAST 

78 

03 

*6471 

7 

0103 

1 


viASK 

0316 

REF 

50 

LAST 

78 

03 

♦ 64 72 

6 

0001 

0 


AD 

0317 

REF 

16 

LAST 

78 

03 

*6473 

2 

0105 

1 


INDEX 

0318 

REF 

9 

LAST 

78 

03 

*6474 

5 

0645 

0 


T5 

0319 





03 

*6475 

2 

0016 

1 


RElINT 

0320 

REF 

14 

LAST 

78 

03 

*6476 

0 

4703 

1 


rc 
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USER'S OWN PAGE NO. 9 

POLISH 

ADDRWD 

SbITMASK 

ADDRWD 

SWITCH AND TE^T INSTRUCTIONS. 

DECOMPOSE ADDRESS INTO SWITCH WORD AND 

BiT. MULTIPLES oF l6 ARE EXCLUDED. 

BIT 11 

1EM8 

0* 1* OR 2. 

ADDRWD 

B1T15 -1 

TEM4 

Pick up a i in specified switch pus. 
Switches are numbered i - 15 0 , 

TEM8 

STATE 

TEM5 

GET BS where B IS BIT AND S Ib ESTATE# 

- THE WORD CONTAINING THE 15 SWITCHES 

CYR 

INCADR 
+ 3 

TEM4 

Decide whether inst, is #swiTCH*t or test 
TO pick UP next address 

SWI TCHIT 

Switch bit. 

TEM5 

RE-ENTER 

SWF/F 

RE-ENTER 

test switch 

u WAS ON - DONT branch 

OFF - GO TO fixed-fixed TO PICK UP ADR. 
CuMES here if BIT 15 WAS ON 

TEMe 

We desire the Logical exclusive or of b 

STATE 

0 

TEMe 

SET THIS BIT TO OSO AD IS OK. 

STATE 

TEM4 

Q 

TEM8 

STATE 

complement of Switch bit. 
or 


re-enter 


DUNT PUSH-DOWN IF Aj END, 


^bAi>78A Yuu System for agcA: revisiun o ot- pRdgkam solRumss by 


L 001 bank 03 interpreter SECTION 


0321 

REF 

58 

LAST 

77 

03t6477 

5 

0116 

1 

VSLT2 

TS 

0322 

REF 

4 

LAST 

77 

03 »65U0 

Oi 

6042 

1 


TC 

0323 

REF 

1 



03 »650i 

0 

6513 

0 


TC 

032A 

REF 

67 

LAST 

78 

03,6502 

5 

0062 

0 

VSLTLOOP 

TS 

0325 

REF 

21 

LAST 

77 

03,6503 

3 

5501 

0 


caf 

0326 

REF 

23 

LAST 

75 

03 , 6504 

6 

0070 

0 


A3 

0327 

REF 

36 

LAST 

77 

03,6505 

5 

0102 

1 


TS 

0328 

REF 

1 



03 ,6506 

0 

6516 

0 


TC 

0329 

REF 

6 

LAST 

73 

03,6507 

0 

5^12 

0 


TC 

0330 

REF 

2 

LAST 

79 

03 ,65 10 

0 

6516 

0 


TC 

0331 

REF 

9 

LAST 

79 

03,6511 

0 

5412 

0 


TC 

0332 

REF 

3 

LAST 

79 

03,6512 

0 

65 1 6 

0 


TC 

0333 

ref 

68 

LAST 

79 

03,6513 

1 

0062 

1 

VSLTEST 

CCS 

033A 

REF 

1 



03,6514 

0 

6502 

0 


TC 

0335 

REF 

24 

LAST 

77 

03,6515 

0 

402h 

0 


TC 

0336 

REF 

37 

LAST 

79 

03 ♦ 6 5 16 

2 

0102 

0 

VSLl 

index 

0337 





03,6517 

3 

0001 

0 


XCH 

0338 





03,6520 

6 

0000 

1 


DOjtiLE 

0339 

REF 

38 

LAST 

79 

03,6521 

2 

0102 

0 


INDEX 

03aO 





03,6522 

5 

0001 

0 


TS 

03A1 

REF 

22 

LAST 

79 

03,6523 

3 

5501 

0 


caf 

0342 

REF 

39 

LAST 

79 

03 ,6524 

2 

0102 

0 


INDEX 

0343 





03,6525 

6 

0000 

1 


AD 

0344 

REF 

40 

LAST 

79 

03,6526 

2 

0102 

0 


INDEX 

0345 





03,6527 

6 

0000 

1 


AD 

0346 

REF 

41 

LAST 

79 

03,6530 

2 

0102 

0 


INDEX 

0347 





03,6531 

5 

0000 

1 


TS 

0346 

REF 

51 

LAST 

78 

03,6532 

0 

0001 

0 


TC 

0349 

REF 

6 

LAST 

77 

03,6533 

5 

0122 

0 


TS 

0350 

REF 

52 

LAST 

79 

03,6534 

0 

0001 

0 


TC 
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USER'S OWN page no. 10 

MPAC +l 

TRUE2 

VSLTEST 

ADDRWD 

ZERO 

VACLOC 

TEM2 

VSLl 

1NCRT2 

VSLl 

INCRT2 

VSLl 

ADORlvD 

VSLTLOOP 

DANZIG 

TEM2 

1 

TEM2 

1 

ZERO 

TEMZ 

0 

TEM2 

0 

TEM2 

0 

Q 

OVFIND 

SET TO zero in CASE oF RIGHT SHIFT 
RETURNS TO CALLER IF COUNT PNZ, 


0 


YUL SYSTEM FOR AGC4! REVISION 0 Of- PROGRAM SOLRUM55 BY 


L 001 

BANK 

03 

interpreter 

SECTION 





R03S1 

DOUbLE-RRECiSlON SiNE-COSiNE 

routinls 

m 


R0352 

these 

PROGRAMS are 

entered and exit in the interpretive 

K03S3 

the argument 

IN MpAC AT entry 

AND THE 

ANSWER IN MPAC AT 

R035A 

COMPUTE! 

RESPECTIVELY, (1/2) 

COS 

(Pl 

X) AND 

(1/2) SIN 

R03SS 

X = C(MPAC) ranges 

over THt interval 

(-1* +1). 


K03S6 

PRO\jRAM 

USES 

the series 





R03S7 





3 


5 

7 

9 

R035e 

(1/2) 

SIN (PI 

U 

II 

X 

X + 4C X 

+ 16C X 

+ 64C X + 

256C X , 

R03S9 





1 3 


5 

7 

9 

R0360 

where 

the c Coefficients are 

FROM HASTINGS SERIES 

R0361 





3 

5 

7 

9 


R0362 

5IN(PI X/2) = 

C X + 

C X + C X 

+ 

C X + 

C X . 


R0363 




i 

3 5 


7 

9 


036A 

REF 

53 

LAST 

79 

03 ♦6535 

3 

0001 

0 COSINE 

XCH 

036S 

REF 

17 

LAST 

78 

03,6536 

5 

0105 

0 

T5 

0366 

REF 

1 



03,6537 

0 

7143 

0 

TC 

0367 

REF 

1 



03,6540 

0 

6761 

1 

TC 

0366 

REF 

1 



03,6541 

0 

6549 

1 

TC 

0369 

REF 

5A 

LAST 

80 

03,6542 

3 

0001 

0 SINE 

XCH 

0370 

REF 

18 

LAST 

80 

03,6543 

5 

0105 

0 

T5 

03 71 

REF 

I 



03,6544 

0 

6731 

1 

TC 

0372 

REF 

59 

LAST 

79 

03,6545 

5 

0115 

1 

IS 

0373 





03 , 6546 

0 

6550 

1 

TC 

037A 

ref 

3 

LAST 

65 

03,654? 

0 

4742 

1 

TC 

0375 

REF 

60 

LAST 

80 

03,6550 

4 

0115 

0 

cs 

0376 

REF 

19 

LAST 

68 

03,6551 

5 

0073 

0 

TS 

0377 

REF 

A2 

LAST 

79 

03,6552 

5 

0102 

1 

T5 

0378 





03,6553 

6 

0000 

1 

DOUBLE 

0379 

REF 

55 

last 
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IF NOT 

SCALING OK 

CCSHOLE 

DPDOFLO 

BUF +■ 1 

MPAC +1 

A 

TROUBLE Here 

Check minor parts if majors equal 

DDVOK 

CCSHOLE 

DPDOFLO 

DPDOFLO 

TROUBLE here 

AS WELL AS WHEN C (BUF.BUF+l ) =C (MPAC.+l ) 

ZERO 

MpAC 

DPDNORT 

Tu NORMALIZE 


4ti-^578A YUL SYSTEM FOR AQ,C^i REVISION 0 


L 001 

bank 

03 

interpreter 

Section 


05*t7 

REF 

60 

LAST 

86 

03*7033 

3 

0548 

REF 

2 

LAST 

58 

03*7034 

5 

0549 

REF 

1 



03*7035 

0 

0550 

REF 

30 

LAST 

86 

03*7036 

3 

0551 





03*7037 

6 

0552 

REF 

31 

LAST 

87 

03 * 7040 

5 

0553 

REF 

25 

LAST 

86 

03*7041 

3 

0554 

REF 

32 

LAST 

87 

03*7042 

6 

0555 

REF 

33 

LAST 

87 

03*7043 

6 

0556 

REF 

34 

LAST 

87 

03*7044 

5 

0557 

REF 

5 

LAST 

81 

03*7045 

0 

0558 

REF 

3 

LAST 

43 

03*7046 

5 

0559 

REF 

4 

LAST 

87 

03*7047 

1 

0560 

REF 

1 



03*7050 

0 

0561 





03*7051 

0 

0562 

REF 

2 

LAST 

87 

03*7052 

0 

0563 

ref 

35 

LAST 

87 

03*7053 

3 

0564 

REF 

36 

LAST 

87 

03*7054 

3 

0565 

REF 

97 

LAST 

86 

03.7055 

3 

0566 

REF 

98 

LAST 

87 

03,7056 

5 

0567 

REF 

2 

LAST 

86 

03,7057 

0 
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XCH 

Q 

0076 

0 


T5 

TEM03 

7060 

0 


TC 

dvstart 

0100 

0 

DPDNORM 

XCH 

BUF + 1 

0000 

1 


DO JBLE 


0100 

0 


T5 

BUF +1 

5501 

0 


CAP 

ZERO 

007 7 

1 


AD 

bUF 

0077 

1 


AD 

euF 

0077 

1 


T5 

BUF 

6367 

0 


TC 

SLl +3 

0022 

1 

DPDNORT 

T5 

cyl 

0022 

0 


CCS 

CYL 

7036 

0 


TC 

DPDNORM 

7053 

0 


TC 

+ 2 

7060 

0 


TC 

dvstart 

0100 

0 


XCH 

BUF *1 

0077 

1 


XCH 

BUF 

0116 

1 


XCh 

MPAC +1 

0115 

1 


TS 

MPAC 

7046 

1 


TC 

DPDNORT 


DEC 4, 1966 (MAIN) PAqE 8/ 

USER'S Own page mo, ib 
Entry from sort routine 


TO DOUBLE MPAC 
TU LOOK At bit 14 

HIGH ORDER ZERO 
SET MPAC +1 TO ZERO 

AND TRY Again 
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US68 

REF 

37 

LAST 

87 

03 f 7060 

3 

0077 

1 

dvstart 

XCH 

0569 

REF 

2 

last 

39 

03 1 706 1 

2 

5777 

1 


INDEX 

0570 

REF 

99 

LAST 

87 

03,7062 

5 

0115 

1 


OV 

0571 

REF 

11 

LAST 

6 A 

03,7063 

5 

0U3A 

0 


TS 

0572 

REF 

3 

LAST 

68 

03 , 706A 

2 

5777 

1 


index 

05 ?3 

REF 

100 

LAST 

86 

03,7065 

A 

0116 

0 


V|P 

Q57A 

REF 

61 

LAST 

87 

OA , 7066 

6 

0001 

0 

-1/2+2 

AD 

05 75 

REF 

53 

LAST 

86 

03 ,706 7 

A 

0000 

0 


C5 

0576 

REF 

38 

LAST 

88 

03,7070 

6 

OiOU 

0 


AD 

0577 





03,7071 

5 

0000 



DVS< 

0576 





03,7072 

0 

7075 

1^ 


TC 

0579 

REF 

A 

LAST 

88 

03,7073 

2 

577 7 

1 


INDEX 

0580 

REF 

101 

LAST 

88 

03,707A 

6 

0115 

1 


S J 

0581 

REF 

39 

LAST 

88 

03,7075 

5 

0077 

1 

♦ 3 

T5 

0582 

REF 

5A 

LAST 

88 

03,70/6 

1 

0000 

0 


CCS 

0583 

REF 

20 

LAST 

83 

03,707 7 

6 

A5 1 6 

1 


AD 

058A 





03,7100 

0 

7102 

0 


TC 

0565 

REF 

21 

LAST 

88 

03,7101 

6 

A5 1 6 

1 


AD 

0586 





03,7102 

2 

5777 

1 

+ 2 

EXTEND 

0587 

REF 

102 

LAST 

88 

03,7103 

6 

0115 

1 


SJ 

0588 

REF 

55 

LAST 

88 

03»710A 

1 

0000 

0 


CCS 

0589 

REF 

22 

LAST 

88 

03,7105 

6 

AS 16 

1 


AD 

0590 





03,7106 

0 

7110 

0 


TC 

0591 





03*7107 

0 

7113 

0 


TC 

0592 

REF 

AO 

LAST 

88 

03,7110 

3 

0077 

1 

♦ 2 

XCH 

0593 





03t71U 

6 

0000 

1 


odjble 

05 9 A 

REF 

56 

LAST 

88 

03,7112 

1 

0000 

0 


r' r" C 
w ^ 3 

0595 

REF 

A1 

LAST 

88 

03,7113 

3 

0077 

1 

+ A 

XCH 

0596 





03,711A 

0 

7116 

0 


TC 

0597 

REF 

A2 

LAST 

88 

03,7115 

A 

0077 

0 


C5 

0598 

REF 

5 

LAST 

88 

03,7116 

2 

5777 

1 


INDEX 

0599 

REF 

103 

LAST 

88 

03,7117 

5 

01 15 

1 


DV 
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USER’S OnN page no, 19 

BUF 

OPOVF 

MPAC 

ovctr 

OPOVF 

OK 

MPAC +1 

0 

A 

BUF +1 

cumpliment of remainder. 

+ 3 

OPOVF 

MPAC 

BUF 

A 

ONE 

Ik not 

IF overflew 

+ 2 

ONE 

MPAC 

A 

ONE 
+ 2 
+ A 

BUF 

A 

BUF 
+ 2 

BUF 

OPOVF 

MPAC 

WE NOW have ABS (CORRECT BUF) 
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001 

BANK 
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USER»S OWN PAGE NO. 

0600 

REF 

lOA 

LAST 

BB 

03t7120 

5 

0116 

1 

OPDSGNT 

IS 

MPAC +1 


0601 

REF 

49 

LAST 

86 

03*7121 

1 

0102 

0 


iT r 

W ^ D 

TEM2 


0602 

REF 

1 



03*7122 

0 

7130 

1 


TC 

POSQUOT 


0603 

REF 

105 

LAST 

89 

03,7123 

4 

0116 

0 


CS 

MPAC +1 


060A 

REF 

106 

LAST 

89 

03,7124 

5 

0116 

1 


TS 

MPAC +1 


0605 

REF 

12 

LAST 

88 

03,7125 

4 

0034 

1 


CS 

OVCTR 


0606 

REF 

107 

LAST 

89 

03,7126 

5 

0115 

1 


IS 

MPAC 


0607 

REF 

3 

LAST 

87 

03,7127 

0 

0076 

0 


TC 

TEMQ3 


0608 

REF 

13 

LAST 

89 

03*7130 

3 

0034 

0 

POSQUOT 

XCH 

OVCTR 


0609 





03*7131 

0 

7126 

0 


TC 

-3 


0610 

REF 

50 

LAST 

89 

03 *7132 

1 

0102 

0 

DPDOFLO 

CCS 

TEM2 


0611 

REF 

9 

LAST 

65 

03,7133 

3 

5503 

1 


CAF 

Two 


0612 

REF 

4 

LAST 

71 

03,7134 

6 

4335 

0 


A3 

NEGl 


0613 

REF 

7 

LAST 

79 

03,7135 

5 

0122 

0 


rs 

OVFIND 


061A 





03,7136 

2 

5777 

1 


EXTEND 


SET MPAC 5 +- POSMAx 

0615 

REF 

4 

LAST 

83 

03*7137 

4 

4476 

1 


VI? 

POSMAX 


0616 

REF 

6 

LAST 

64 

03,7140 

3 

0003 

1 


XCH 

LP 


0617 

REF 

108 

LAST 

89 

03,7141 

5 

0116 

1 


T5 

MPAC ♦! 


0618 

REF 

2 

LAST 

89 

03,71^2 

0 

7126 

0 


TC 

POSQUOT -2 
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0619 

ref 

62 

LAST 

88 

03 t7l43 

3 

0001 

0 

Tsgnabs 

XCH 

0620 

REF 

1 



03»7144 

5 

0104 

1 


T5 

0621 

REF 

2 

LAST 

82 

03»7145 

0 

7154 

0 


TC 

0622 

REF 

57 

LAST 

88 

03*71 46 

1 

0000 

0 


c 

3 

0623 

REF 

23 

LAST 

88 

03*7147 

6 

4516 

1 


AD 

0624 

REF 

2 

LAST 

90 

03*7150 

0 

0104 

1 


TC 

0625 

ref 

6 

LAST 

76 

0^ t7l51 

0 

4740 

0 


TC 

0626 

REF 

24 

LAST 

90 

03*7152 

4 

45 1 6 

0 


cs 

0627 

REF 

3 

LAST 

90 

03*7153 

0 

0104 

1 


TC 

0628 

REF 

63 

LAST 

90 

03*7154 

3 

0001 

0 

TPAGREE 

XCH 

0629 

REF 

1 



03*7155 

5 

0103 

0 


T5 

0630 

REF 

7 

LAST 

77 

03*7156 

0 

6021 

1 


TC 

0631 

REF 

1 



03*715? 

0 

7172 

1 


TC 

0632 

REF 

1 



03*71 bO 

0 

7165 

1 


TC 

0633 

REF 

5 

LAST 

89 

03 * 7 Ibl 

4 

44 7 6 

1 


CS 

0634 

REF 

1 



03*7162 

5 

0101 

1 


TS 

0635 

REF 

25 

LAST 

90 

03*7163 

4 

4516 

0 


CS 

0636 

REF 

1 



03*7 164 

0 

7175 

0 


TC 

0637 

REF 

26 

LAST 

87 

03*7165 

3 

5501 

0 

SGN=0 

CAF 

0638 

REF 

109 

LAST 

89 

03*7166 

5 

0115 

1 


T5 

0639 

REF 

110 

LAST 

90 

03*7167 

5 

0116 

1 


TS 

0640 

REF 

111 

LAST 

90 

03*7170 

5 

011/ 

0 


TS 

0641 

REF 

2 

LAST 

90 

03*7171 

0 

0103 

0 


TC 

0642 

REF 

6 

LAST 

90 

03*7172 

3 

4^*76 

0 

SGN = + 

CAF 

0643 

REF 

2 

LAST 

90 

03*7173 

5 

0101 

1 


TS 

0644 

REF 

26 

LAST 

90 

03*7174 

3 

4516 

1 


CAF 
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0 

TEMQ2 

TPAGREE 

SIGNUM AND ABSOLUTE VALUE 

A 

ONE 

TEMQ2 

test SIGNUM 

MPACCOM 

ONE 

TEMU2 

cumplement if Negative 

Q 

temo 

BRANCH 

5GN= + 

5GN=0 

POSMAX 

SGNDMAX 

ONE 

SGFDRCE 

ZERO 

MPAC 

MPAC +1 

MPAC +2 

temo 

furce sign agreement in tp word in mpac 


POSMAX 

5(iNDMAX 
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U6A5 

REF 

112 

LAST 

90 

03 

06 A 6 

REF 

3 

LAST 

90 

03 

06A7 

REF 

113 

LAST 

91 

03 

06 A 8 

REF 

27 

LAST 

90 

03 

06A9 

REF 

llA 

LAST 

91 

03 

06S0 

REF 

A 

LAST 

91 

03 

06S1 

REF 

115 

LAST 

91 

03 

06S2 

REF 

28 

LAST 

91 

03 

06S3 

REF 

116 

LAST 

91 

03 

065A 

REF 

5 

LAST 

91 

03 

06S5 

REF 

117 

LAST 

91 

03 

0656 





03 

0657 

REF 

3 

LAST 

90 

03 


I ON 


7175 

6 

0117 

0 

sgforce 

AD 

7176 

6 

0101 

1 


AD 

71 n 

5 

OiU 

0 


T5 

7200 

3 

5501 

0 


caf 

7201 

6 

0116 

1 


AD 

7202 

6 

0101 

1 


AD 

7203 

5 

0116 

1 


TS 

720A 

3 

5501 

0 


CAF 

7205 

6 

0115 

1 


AD 

7206 

6 

0101 

1 


AD 

7207 

5 

0115 

1 


TS 

7210 


00017 

1 

sbitmask 

Dcr 

7211 

0 

0103 

0 


TC 
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MpAC +2 

sgndmax 

MPAC +2 
ZERO 

MPAC 

Sgndmax 

MPAC +1 
ZERO 

MPAC 
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USER* 5 OWN page NO. 23 

0658 

ref 

2 

LAST 

75 

03t72l2 

0 

6263 

0 

UNIT 

TC 

AbVAL 

Unit vector routine - start by getting 

A06S9 












Length 

0660 

REF 

2 

LAST 

75 

03*7213 

0 

6275 

1 


TC 

VSRl 

LtAVES 1/2 unit VECTORS 

0661 

REF 

2 

LAST 

38 

03*72l<t 

1 

0215 

0 


^ r 

NEwJOB 

Allow for interrupts 

0662 

REF 

1 



03*7215 

0 

7263 

1 


TC 

UNITRUPT 

SU WE CAN return IN BASIC 

0663 

REF 

24 

Last 

79 

03*7216 

6 

0070 

0 

UNITRSM 

AO 

VACLOC 

RETURNS Here from breakpoint if called. 

0666' 

REF 

69 

LAST 

79 

03*721 ? 

5 

0062 

0 


IS 

ADDRWD 


0665 

REF 

10 

LAST 

89 

03*7220 

3 

5503 

1 


CAP 

Two 


0666 

REF 

7 

LAST 

86 

03*7221 

5 

OUO 

1 


T5 

DVSrt 

NON-ZERO FOR BACKWARDS DIVIDE 

0667 

REF 

6 

LAST 

45 

03*7222 

5 

0112 

0 

UNITLOOR 

T5 

COMPON 


0668 

REF 

118 

LAST 

91 

03*7223 

4 

0U5 

0 


C5 

MPAC 


0669 

REF 

58 

LAST 

90 

03*7224 

4 

OOOO 

0 


cs 

A 


06 ro 

REF 

70 

LAST 

92 

03*7225 

2 

0062 

1 


IMOEX 

ADDRWD 


0671 





03*7226 

3 

0000 

1 


XC4 

0 

LENGTH TO COMPONENT AND COMPONENT TO BUF 

0672 

REF 

43 

LAST 

SB 

03*7227 

5 

00 7 7 

1 


TS 

bUF 


0673 

REF 

119 

LAST 

92 

03*7230 

4 

0116 

0 


CS 

MPAC +l 


067A 

REF 

59 

LAST 

92 

03*7231 

4 

0000 

0 


C5 

A 


0675 

REF 

71 

LAST 

92 

03*7232 

2 

0062 

1 


INDEX 

ADDRWD 


0676 





03*7233 

3 

OOOi 

0 


XC4 

i 


0677 

REF 

44 

LAST 

92 

03.723** 

5 

0100 

0 


TS 

BUF + 1 


0678 





03*7235 

3 

7241 

1 


CAP 

+ 4 

CALL BACKWARDS DIVIDE 

06 19 

REF 

4 

LAST 

89 

03*7236 

5 

0076 

0 


T5 

TEMU3 


0600 

REF 

29 

LAST 

91 

03*7237 

3 

5501 

0 


CAP 

ZERO 


0601 

REF 

2 

LAST 

58 

03*7240 

0 

6776 

1 


TC 

DDVO 


0682 





03*7241 

0 

7242 

1 


TC 

+ 1 


0683 

ref 

120 

last 

92 

03.7242 

3 

0115 

1 


XCH 

MPAC 

Result back to component bringing back 

0684 

REF 

72 

LAST 

92 

03*7243 

2 

0062 

1 


INDEX 

ADDRWD 

LENGTH 

0665 





03*7244 

3 

0000 

1 


XCH 

0 


0666 

REF 

121 

LAST 

92 

03*7245 

5 

0115 

1 


TS 

MPAC 


0667 

REF 

122 

LAST 

92 

03*7246 

3 

0116 

1 


XCH 

MPAC +l 


0668 

REF 

73 

LAST 

92 

03*7247 

2 

0062 

1 


INDEX 

ADDRWD 


0669 





03*7250 

3 

0001 

0 


XCH 

1 


0690 

REF 

123 

LAST 

92 

03,7251 

5 

0116 

1 


TS 

MPAC *l 


0691 

REF 

3 

LAST 

59 

03*7252 

0 

5242 

0 


TC 

AD2 

Increment aodrwd 

0692 

REF 

7 

LAST 

92 

03*7253 

1 

0112 

1 


CCS 

COMPON 


0693 

REF 

1 



03*7254 

0 

7222 

1 


TC 

unitloop 


0694 

ref 

11 

LAST 

92 

03.7255 

4 

5503 

0 


CS 

Two 

store length of ARGUMENT IN REGISTERS 30 

0695 

REF 

25 

LAST 

92 

03,7256 

6 

0070 

0 


AD 

VACLOC 


0696 

REF 

51 

LAST 

89 

03,7257 

5 

0102 

1 


TS 

TEM2 

And 31 OF VAC AREA, 

0697 

REF 

13 

LAST 

81 

03,7260 

3 

4772 

1 


CAP 

DAD2 +4 


0698 

REF 

5 

LAST 

73 

03*7261 

0 

5041 

1 


TC 

8T02 


0699 

REF 

29 

LAST 

85 

03,7262 

0 

4024 

0 


TC 

DANZIG 
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0 7U0 

REF 

9 
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69 

03*7263 

4 

0061 

1 

UNITRUPT 

C5 

0701 

ref 

12A 

LAST 

92 

03*7264 

5 

0117 

0 


TS 

0702 

REF 

7 

LAST 

52 

03*7265 

3 

0120 

1 


XC4 

0703 

REF 

6 

LAST 

76 

03*7266 

2 

006 7 

1 


INOEX 

070A 





03*7267 

5 

0036 

1 


TS 

0705 

REF 

1 



03*7270 

0 

2101 

0 


TC 

0706 

REF 

125 

LAST 

93 

03*7271 

4 

0117 

1 


C5 

0707 

REF 

10 

LAST 

93 

03*7272 

5 

0061 

0 


TS 

0706 

REF 

9 

LAST 

93 

03*7273 

2 

0067 

1 


INDEX 

0709 





03*7274 

3 

003b 

1 


XCH 

0710 

REF 

8 

LAST 

93 

03*7275 

5 

0120 

1 


TS 

0711 

REF 

30 

LAST 

92 

03*7276 

3 

5501 

0 


CAP 

0712 

REF 

1 



03*7277 

0 

7216 

0 


TC 

0713 

REF 

lA 

LAST 

92 

03*7300 

3 

4772 

1 

MPAC5R1 

CAF 

071A 

REF 

10 

LAST 

75 

03^7301 

5 

0064 

0 

SRI 

TS 

0715 

REF 

60 

LAST 

92 

03*7302 

2 

0000 

0 


INDEX 

0716 





03*7303 

3 

0000 

1 


X V- H 

0717 

REF 

6 

LAST 

BB 

03.7304 

2 

5777 

1 


I NDEX 

0718 

REF 

A 

LAST 

85 

03.7305 

4 

4522 

1 


MP 

0719 

REF 

11 

LAST 

93 

03*7306 

2 

0064 

1 


INDEX 

0720 





03*7307 

5 

0000 

1 


TS 

0721 

REF 

12 

LAST 

93 

03*7310 

2 

0 06 A 

I 


INDEX 

0722 





03*7311 

3 

0001 

0 


XCH 

0723 

REF 

3 

LAST 

43 

03*7312 

5 

0021 

1 


TS 

072A 

REF 

A 

LAST 

93 

03.7313 

3 

0021 

1 


XCH 

0725 

REF 

7 

LAST 

89 

03.731A 

6 

0003 

1 


AD 

0726 

REF 

13 

LAST 

93 

03*7315 

2 

006A 

1 


INDEX 

0727 





03*7316 

5 

0001 

0 


TS 

0728 

REF 

64 

LAST 

90 

03*7317 

0 
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0 
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BANKSeT 

MPAC +2 

LOC 

FIXLOC 

30D 

LhANGl 

Requests for interpretive interrupt 

CUME here during THe UNIT OPERATION, 
SINCE WE DESIRE TO RETURN IiN BASIC BUT 
BUT STILL SAVE THE INTERPRETER CENTRALS 
(bANKSET AND LOC) 

MPAC *2 

BANK5ET 

FIXLOC 

30D 

ON RETURN* restore AS BEFORE 

LOC 

ZERO 

UNITRSM 

DAD2 +A 

ENTER UNIT DIVIDE LOOP, 

TtMll 

A 

0 

OPOVF 

HALF 

TEMll 

0 

TEMll 

I 

SR 

SR 

LP 

TEMll 

L 

SHIFTS RIGHT ONE USING ADDRESS IN A 


^b^578A YUL SYSTEM FOR AGC4! REVISION 0 OF FR3GRAM SOLRUM55 BY 


L OUl 

Bank 

03 

interpreter 

SECTION 






0729 

REF 

31 

LAST 

93 

03.7320 

3 

5501 

0 

SQRT 2 

laf 

0730 

REF 

126 

LAST 

93 

03 » 7 321 

5 

0117 

0 


TS 

07 31 

REF 

65 

LAST 

93 

03»7322 

3 

0001 

0 

SORT 3 

XCH 

0732 

REF 

A 

LAST 

90 

03.7323 

5 

0104 

1 


TS 

0733 

REF 

3 

LAST 

90 

03.732A 

0 

7154 

0 


TC 

073A 

REF 

61 

LAST 

93 

03.7325 

1 

0000 

0 


r c 
^ ^ D 

0735 

REF 

1 



03.7326 

0 

7336 

0 


TC 

0736 

ref 

5 

LAST 

9A 

03.7327 

0 

0104 

1 


TC 

0737 

REF 

127 

LAST 

9A 

03.7330 

1 

0ll5 

0 


r c 
w s- D 

0738 

REF 

2 

last 

82 

03*7331 

0 

3044 

1 


TC 

0739 





03.7332 

01302 

1 


OCT 

07A0 

A07a1 





03.7333 

0 

7331 

1 


TC 

07A2 

REF 

128 

LAST 

9A 

03.7334 

5 

0116 

1 


TS 

07A3 

REF 

6 

LAST 

9A 

03.7335 

0 

0104 

1 


TC 

07AA 

ref 

7A 

Last 

92 

03 * 7336 

5 

0062 

0 

setnorm 

TS 

0745 

REF 

129 

LAST 

9A 

03.7337 

4 

0115 

0 


C5 

07A6 

REF 

5 

LAST 

87 

03 . 7 3 4 U 

5 

0022 

1 


TS 

07A7 

REF 

6 

LAST 

9A 

03.73AI 

1 

0022 

0 


CCS 

0746 

REF 

1 



03.73A2 

0 

7300 

0 


TC 

07A9 

REF 

1 



03.7343 

0 

7405 

1 


TC 

0750 

ref 

1 



03.7 344 

0 

7346 

1 


TC 

0751 

REF 

1 



03.7345 

0 

7353 

0 


TC 

0752 

REF 

1 



03 * 7 346 

6 

7066 

0 

SRTEST 

AO 

0753 

REF 

62 

LAST 

9A 

03.7347 

1 

0000 

0 


CCS 

075A 

ref 

2 

LAST 

9A 

03,7350 

0 

7300 

0 


TC 

0755 

REF 

1 



03.7351 

0 

7374 

0 


TC 

075 6 
A0757 
A075e 

ref 

1 



03*7352 

0 

7362 

1 


TC 




I 







I 


1 I 


NASA 1021108-021 


OEC At i9t)6 


(MAIN) PA&E gA 



USER'S OWN PAGE NO. 25 

ZERO 

MPAC +2 

ENTRY TO IGNORE C(MPAC+ 2 ) 

Q 

TEM02 

here to treat THIPLE-PRECISiON CASES 

TPAGREE 

A 

SETNORM 

TEMQ 2 

MPAC 

FORCE SIGN agreement 

TtST SIGNUM 

Pi.Z - OK. 

FAST EXIT FOR ZERO ARGUMENT 

IF argument WAS negative BUT MAJOR PART 

AbORT 

01302 

-2 

(MPAC IS NEGATIVE) IS ZERO* ANSWER IS 
taken as zero WITH NO FURTHER ACTION, 

IF NON-ZERO, IT IS ASSUMED A TRANSIENT 
EnROR HAS PRODUCEO THE BAD DATA. 

MPAC +l 
TEMQ2 

AkGUMENT NEGATIVE BUT MORE THAN -LO-4. 
SET MPAC ,+1 TO ZERO AND EXIT. 

ADORWD 

StT NORMALIZATION COUNT TO ZEHO 

MpAC 

CYL 

CYL 

MPACSRl 

arghi 

WL WILL USE A/2, SO MUST CHECK FOR 
NORMALIZATION FIRST 

NORMALIZED - SHIFT RIGHT ONE. 

SRTEST 

LESS THAN 1/2 - SEE IF AT LEAST 1/8. 

A 0 = 0 

MAJOR PART (POSSIBLY MINOR PART) = 0 . 

- 1 / 2+2 

A 

See IF ARG greater THAN OR EQUAL TO 1/4 

M 

MPACSRl 

ARGLO 

n 15 - Shift right one and gcj to arglo 

(♦0 WAS IMPOSSIBLE THIS CCS.) 


sqrtnorm +1 


LtSS THAN l/A - PUT IN EFFECTIVE RIGHT 
BY SHIFTING LEFT ONLY ONCE IaiHEN ADDING 
ONE TO the right SHIFT COUNT. 


^b^b7aA YUL system f-OR A6C4! REVISION 0 OF rROGRAm SOLRUM55 


L 001 BANK 03 iNTE^P^fcTEf^ SECTION 


07S9 

REF 

130 

LAST 

9A 

03i7353 

3 

0117 

0 

A0 = 0 

XCH 

0760 

REF 

131 

LAST 

95 

03.7354 

3 

0116 

1 


XCH 

0761 

REF 

132 

LAST 

95 

03*7355 

3 

0115 

1 


XC4 

0762 

REF 

75 

LAST 

94 

03.7356 

6 

0062 

0 


AO 

0763 

REF 

1 



03.735/ 

6 

5362 

0 


AO 

076A 

REF 

2 

LAST 

94 

03.7360 

0 

7336 

0 


TC 

0765 

REF 

6 

LAST 

87 

03.7361 

0 

6364 

0 

SORTNORM 

TC 

0766 

REF 

27 

LAST 

90 

03.7362 

3 

4516 

1 


CAP 

0767 

REF 

76 

Last 

95 

03.7363 

6 

0062 

0 


AO 

0760 

REF 

77 

LAST 

95 

03 * 7 364 

5 

0062 

0 


TS 

0769 

REF 

7 

LAST 

95 

03.7365 

0 

6364 

0 


TC 

07 ro 

REF 

7 

LAST 

94 

03.7366 

5 

0022 

1 


TS 

0771 

REF 

8 

LAST 

95 

03.7367 

4 

0022 

0 


C5 


NASA 1021108-021 


DEC A * 1966 


(MAIN) page 9S 



USER’S OWN page no, 26 

MPAC +2 

MPAC ♦! 

MPAC 

ADDRWD 

MOVE ARGUMENT UP 

SEVEN 

setnorm 

Increase shift count by 14/2 = 7 

SLl 

ONE 

ADDRWD 

ADDRWD 

SLl 

CYL 

CYL 

argument less than 1 / 8 , so shift it left 

Two places AND INCREASE SHIFT COUNT FoR 
RtSULT 


^B^i>78A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUMbS BY 


001 

BANK 

03 

INTERPRETER 

SECTI^l^l 






0772 

REF 

9 

LAST 

95 

03*7370 

1 

0022 

0 

NORMTEST 

f- r 

W, ^ 3 

0773 

REF 

10 

LAST 

96 

03*7371 

1 

0022 

0 


CCS 

077a 

REF 

2 

LAST 

9^ 

03*73/2 

0 

7361 

1 


TC 

0775 

REF 

2 

LAST 

94 

03*73/3 

0 

7405 

1 


TC 

07 76 

REF 

1 



03*73 /i* 

3 

7401 

0 

ARGLO 

CAF 

0777 

REF 

7 

LAST 

93 

03*7375 

2 

5777 

1 


INDEX 

0778 

REF 

133 

LAST 

95 

03*73/6 

4 

0115 

0 


MP 

07 79 

REF 

1 



03*73/7 

6 

7402 

0 


AD 

0780 

REF 

3 

LAST 

96 

03 * 7 AOO 

0 

7411 

1 


TC 

0781 





03*7A01 

32506 

0 

SLOPELO 

DEC 

0782 





03 * 7A02 

04604 

1 

BIASLO 

DEC 

0783 





03*7^^03 

22650 

1 

SLOPEHI 

DEC 

0784 





03,7 AOh 

06552 

0 

BIASHI 

DEC 

0785 

REF 

1 



03*7<,05 

3 

7403 

1 

arghi 

CAF 

0786 

REF 

8 

LAST 

96 

03* /A06 

2 

5777 

1 


INDEX 

0787 

REF 

134 

LAST 

96 

03*740/ 

4 

0115 

0 


MP 

0788 

REF 

1 



03*7A10 

6 

7404 

0 


AD 

0789 

REF 

135 

LAST 

96 

03,7i,U 

3 

0115 

1 

+ 4 

XCH 

0790 

REF 

45 

LAST 

92 

03*7412 

5 

0077 

1 


TS 

0791 

REF 

52 

LAST 

92 

03*7A13 

5 

0102 

1 


TS 

0792 

REF 

32 

LAST 

9A 

03 * 74 1 A 

3 

5501 

0 


CAP 

0793 

REF 

136 

LAST 

96 

03 *7A15 

3 

0116 

1 


XCH 

0794 

REF 

46 

LAST 

96 

03*7416 

5 

OlOO 

0 


TS 

0795 

REF 

47 

LAST 

96 

0 3 * 7 4 1 7 

4 

0U77 

0 


C5 

0796 

REF 

9 

LAST 

96 

03*7420 

2 

5/7 / 

1 


INDEX 

0797 

REF 

137 

LAST 

96 

03*7421 

5 

0115 

1 


DV 

0798 

REF 

5 

LAST 

93 

03*7422 

5 

0021 

1 


TS 

0799 

REF 

6 

LAST 

96 

03*7423 

4 

0021 

0 


C5 

0800 

REF 

130 

LAST 

96 

03,7424 

6 

0115 

1 


AD 

0801 

REF 

139 

LAST 

96 

03,7425 

5 

0115 

1 


TS 

0802 

REF 

1 



03*7426 

5 

0101 

1 


TS 

0803 

REF 

1 



03*742 7 

0 

7033 

3 


TC 

0804 

REF 

2 

LAST 

96 

03 * 7 4 30 

3 

0101 

1 


XCH 

0805 

REF 

10 

LAST 

96 

03*7431 

2 

5777 

1 


INDEX 

0806 

REF 

5 

LAST 

93 

03,7432 

4 

4522 

1 


MP 

0807 

REF 

140 

LAST 

96 

03,7433 

6 

0115 

1 


AD 

0808 

REF 

14 

LAST 

89 

03*743'+ 

5 

0034 

0 


T o 
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NASA 1021108-021 


USER’S OWN PAGE NO, 27 


CYL 

CYL 

5QRTN0RM 

HERE 

IF 

LESS than i/e 




arghi 

HtfiE 

IF 

at least 1/4, 

LESS 

THAN 

1/2 

SLOPELO 

OPOVF 

MPAC 

Her e 

IF 

at least 1/8* 

LESS 

THAN 

1/4 

BIASLO 

ARGHI +4 

XO/2 

— 

.a324(A0/2) + 

.2974/2 



.b32A 
.29/A B-l 
.5884 
.4192 B-l 


SLOPEHI 

OPOVF 

MPAC 

BIASHI 

MPAC 

BUF 

TEM2 

ZERO 
MPAC +1 
BUF +1 
bUF 
OPOVF 
MPAC 
SR 
SR 

MPAC 

MPAC 

TEM3 

sqrtdiv 

TEM3 

OPOVF 

half 

MPAC 

OVCTR 


XO/2 10 MPAC 
AO/2 TO aUF 

SET UP POSITIVE QUOTIENT SIGNAL AND 

ZERO LOW-ORDER DIVIDEND FOR DP DIVIDE 
Ai/2 TO BUF+l. A2 NOW DISCARDED 


-(AO/2) /(XO/2) . 


Xi IS GOOD TO 14 bits 

Xi = XO/2 + ( (AO/2) / (XO/2) ) /2 

SmVE XI FOR ADDITION 

Gu TO FORM DP QUOTIENT OF AO/2* Al/2 

OVER XI, 0. RESULT IN MPAC, MPAC +1 


AhD maybe SKIP, IF ARG rtAS NEAR POSMAX 


yuL. System for agc'h revision o of rRdgRam solrumss by nasa iOi?iio8-*02i 


DEC A» 1966 


(MAIN) page 97 


L 001 

bank 

03 

interpreter 

Section 


0009 





03*7435 

0 

08 10 

REF 

7 

LAST 

90 

03*7436 

3 

0811 

REF 

lAl 

LAST 

96 

03*743 / 

5 

0812 





03*7 440 

0 

0813 

REF 

8 

LAST 

93 

03*7441 

3 

08IA 

REF 

1A2 

LAST 

97 

03 * 7442 

6 

0015 

REF 

IA3 

LAST 

97 

03 * 74^3 

3 

0816 

REF 

15 

LAST 

96 

03*7 444 

3 

0817 

REF 

lAA 

LAST 

97 

03 * 7445 

5 

0818 

REF 

33 

LAST 

96 

03*7446 

3 

0819 

REF 

145 

LAST 

97 

03*7A47 

5 

0820 

ref 

78 

LAST 

95 

03*7450 

1 

0821 

REF 

3 

LAST 

74 

03*7A5i 

0 

0822 

REF 

7 

LAST 

94 

03*7452 

0 

0823 

REF 

18 

LAST 

76 

03»7453 

4 

082A 





03*7454 

6 

0825 

REF 

63 

LAST 

94 

03*7455 

2 

0826 





03*7456 

0 

0827 

REF 

2 

LAST 

83 

03*7457 

0 

0828 

REF 

30 

LAST 

92 

03*7460 

0 

0829 

REF 

2 

LAST 

75 

03*7461 

0 

0830 

REF 

31 

LAST 

97 

03*7 ^*6 2 

0 

0831 

REF 

1 





0832 

ref 

32 

LAST 

97 



0833 

REF 

33 

LAST 

97 



083A 

REF 

12 

LAST 

92 

03*7 463 

4 

0835 

REF 

3 

LAST 

75 

03*7464 

0 


7441 

1 


TC 

+ 4 

4476 

0 


CAF 

POSMAX 

0116 

1 


IS 

MpAC +1 

7445 

0 


TC 

+ 5 

0003 

1 

♦ 4 

XCH 

LP 

0U6 

1 


AD 

MPAC +1 

0116 

1 


XCH 

MPAC +1 

00 34 

0 


XCH 

OVCTR 

0115 

1 

+ 5 

T5 

MPAC 

5501 

0 


CAF 

ZERO 

0117 

0 


TS 

MPAC +2 

0062 

1 


CCS 

ADORWD 

6236 

0 


TC 

SHIFTR *3 

0104 

1 


TC 

TEMQ2 

0065 

0 

SORTS 

C5 

MODE 

0000 

1 


DOUBLE 


OOOO 

0 


INDEX 

A 

7455 

1 


TC 

-1 

7320 

1 


TC 

SORT 2 

4024 

0 


TC 

DANZIG 

7322 

0 


TC 

SORT 3 

4024 

0 


TC 

DANZ I G 

5363 

NEG13 

EDJALS 

MINUS13 

4024 

DMOVE 

equals 

DANZIG 

4024 

VMOVE 

eduals 

DANZIG 

5503 

0 

TMOVE 

C5 

T WO 

5240 

1 


T C 

DPEXIT +1 


USER’S Own page no, 28 

IF NO OVERFLOW 

FOR normal cases 

Above and xi/2 

ZERO MPAC+2 SO SHIFT LEFT MAKES SENSE. 

RE-NORMALIZE if count non-zero 
fits in with main Shift loop 
NO re-scaling required 

Interpreter linkage 
Take appropriate sort 

FOR DP 


loading only 

Set mode to triple for tp operations 


4b^578A YUL SYSTEM FOR A6c<f: REVISION U OF PROGRAM SOLRUMSS BY 


L 001 EXECUTIVE 

ROOOl EXECUTIVE PROGRAMS 
R0002 


0003 







2046 


bam< 

OOOA 

REF 

3 

LAST 

16 

2046 

5 

0577 

1 

FINDVAC 

T5 

0005 

REF 

66 

LAST 

9A 

2047 

3 

0001 

0 


XCH 

0006 

REF 

1 



2050 

0 

2065 

0 


tc 

0007 

REF 

1 



2051 

0 

6004 

0 


tc 

0008 

ref 

4 

LAST 

98 

2052 

5 

0577 

1 

NOVAC 

T5 

0009 

REF 

67 

LAST 

98 

2053 

3 

0001 

0 


XCH 

OOLO 

REF 

2 

LAST 

98 

2054 

0 

2065 

0 


TC 

0011 

REF 

34 

LAST 

97 

2055 

3 

5501 

0 


CAF 

0012 

REF 

4 

LAST 

16 

2056 

5 

0574 

1 


T5 

0013 

REF 

1 



2057 

0 

6027 

1 


TC 

OOIA 

REF 

3 

LAST 

16 

2060 

5 

0573 

0 

JOBWAKE 

T5 

0015 

REF 

68 

LAST 

98 

2061 

1 

0001 

1 


^ r Ci 

0016 

REF 

4 

LAST 

17 

2062 

5 

0600 

I 


T5 

0017 

REF 

1 



2063 

0 

2071 

0 


TC 

0018 

REF 

1 



2069 

0 

6110 

1 


TC 

0019 

REF 

5 

LAST 

98 

2065 

5 

0600 

1 

EXECCOM 

T5 

0020 

REF 

64 

LAST 

97 

2066 

2 

0000 

0 


IMDEX 

0021 





2067 

3 

0000 

1 


CAF 

0022 

REF 

4 

LAST 

98 

2070 

5 

0573 

0 


15 

0023 

REF 

2 

LAST 

35 

20 71 

3 

2075 

1 

EXECSW 

CAF 

0024 

REF 

20 

LAST 

69 

2072 

3 

0015 

0 


XC^ 

0025 

REF 

3 

LAST 

16 

2 073 

5 

0572 

1 


T5 

0026 

REF 

69 

LAST 

98 

2074 

0 

0001 

0 


TC 

0027 

REF 

2 

LAST 

98 

2075 


10009 

1 

EXECBANK 

CADR 

0028 

REF 

21 

LAST 

98 

2076 

5 

0015 

0 

FOUNDVAC 

TS 

0029 

REF 

6 

LAST 

98 

2077 

2 

0600 

0 


index 

0030 





2100 

0 

0001 

0 


TC 
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(MAIN) page 9fl 


1 

newprio 

Q 

EXECCOM 

F1NDVAC2 

NEWPRIO 

u 

EXECCOM 

ZERO 

EXECTEM3 

N0VAC2 

EXECTEM2 

(J 

InTEXIT 

EXECSW 

JO0WAKE2 

^.TEXIT 

A 

0 

EXECTEM2 

EXECBANX 

bankreg 

EXECTEMl 

U 

F INDVAC2 

BANXREG 

W7EX1T 

1 


USER’S OWN PAGE NO. I 


PKOGRAM To FIND AN AVAILABLE VAC 

COMMON FF EXECUTIVE SUBROUTINE. 

OFF TO executive BANK, 

ENTRY EXCLUSIVELY FgR BASIC JOBS NOT 
REQUIRING A VAC AREA, 

COMMON FF executive SUBROUTINE. 

ZERO PD field in PUSHLOC, 


entry Here to re-activate a sleeping job 
Return address - i to wtexit. 

Shares final portion of findvac, novac, 

COMMON EXEC BANK-SWITCH SUBROUTINE, 


exit address 

pick up job or task address. 

(USED By FINDVAC, NOVAC, AND WAITLIST) 


Call in exec bank* saving return. 


COMES HERE TO RETURN FROM FINDVAC, 
novac* OR JOBWAKE. 


tjEC 1966 


(main) page 99 


YUL system FOR AGc'»: REVISION 0 OF PROGRAM SOLRUY.SS BY nAsA 1021108-021 


L OUl EXECUTIVE USER’S OWN PAGE NO, 2 


POOJl 



calls 

TO 

findvac begin 

here. 

SNATCHING i 

AN available VAC AREA. 


OOiZ 






04,6000 


SETLOC 

10000 

E^EC/wAI T lIST bank. 

0033 

REF 

1 



04*6000 

0 

6705 

0 

slapb 

TC 

SLAPl 


0034 

REF 

1 



04 * 600 1 

0 

7363 

0 

KEYRUPTC 

TC 

KEYRUPTl 

SfANDARD LOC, DONT MOVE 

003S 

ref 

1 



04*6002 

0 

6653 

1 

MODROUTB 

t: 

MOOROUT 

SlANDAKD LOG. DoNT MOVE 

0036 

REF 

1 



04*6003 

0 

6525 

0 

5VCT3 

TC 

SVCT3X 

SlAtMDARD LOC* 

0037 

ref 

1 



04 * 6004 

1 

0216 

0 

FINDVAC2 

CCS 

VAClUSE 

ClVACiUSE) = TC VAClUSE IF VACI IS 

0036 

REF 

1 



04*6005 

0 

6020 

0 


TC 

evi 

Available, or +o if it is in use. 

0039 

REF 

1 



04 * 6 006 

1 

0272 

1 


CCS 

VAC2U5E 


0040 

REF 

2 

LAST 

99 

04*6007 

0 

6020 

0 


TC 

FVl 

The first CCS WITH +0 jumps to the 

0041 

REF 

1 



04*6010 

1 

0346 

1 


CCS 

VAC3USE 

CORRESPONDING TC ORDER, 

0042 

REF 

3 

LAST 

99 

04*6011 

0 

6020 

0 


TC 

FVl 


0043 

REF 

1 



04*6012 

1 

0422 

1 


CCS 

VAC4USE 


0044 

REF 

4 

LAST 

99 

04*6013 

0 

6020 

0 


TC 

FVl 


0046 

REF 

1 



04,6014 

1 

04 76 

0 


CCS 

VAC5USE 


0046 

REF 

5 

LAST 

99 

04,6016 

0 

6020 

0 


TC 

Fv 1 


0047 

ref 

3 

LAST 

94 

04*6016 

0 

3044 

1 


TC 

ABORT 

NU VAC areas available. 

0048 





04,6017 

01201 

0 


OCT 

01201 


0049 

REF 

13 

LAST 

97 

04*6020 

6 

5503 

1 

FV 1 

AO 

Two 

Tu form address of assigned vac area. 

0060 

REF 

5 

LAST 

98 

04,6021 

5 

0574 

1 


TS 

EXECTEM3 


0061 

ref 

5 

LAST 

98 

04,6022 

6 

0577 

1 


AO 

NEWPRIO 

) STORE address OF VACI IN LOW-ORDER 

0062 

REF 

6 

LAST 

99 

04,6023 

5 

0577 

1 


TS 

NEWPRIO 

) 9 bits of NEWPRIO, 

0063 

REF 

35 

LAST 

98 

04*6024 

3 

5501 

0 


caf 

ZERO 

> 

0054 

REF 

6 

LAST 

99 

04,6026 

2 

0574 

0 


INOEX 

EXECTFM3 

) STORE +0 IN vACIySE, INDICATING uSb 

0055 





04,6026 

4 

7 77 7 

0 


T5 

0 -1 

) 

0056 

ref 

1 



04*6027 

3 

6042 

1 

N0VAC2 

CAF 

LASTADR 

relative ADDRESS OF LAST REGISTER SET, 

0057 

REF 

2 

LAST 

17 

04,6030 

5 

0601 

0 


TS 

LOCCTR 


0058 

REF 

65 

LAST 

98 

04,6031 

1 

0000 

0 


CCS 

A 


0069 





04,6032 

0 

6037 

0 


TC 

+ 5 

P(NZ AND -Q ONLY, 

0060 

REF 

5 

LAST 

98 

04,6033 

4 

0573 

1 

12B1TS0K 

cs 

EXECTEM2 

COMES HERE IF JOB ADDRESS LESS THAN 6K 

0061 

REF 

1 



04,6034 

0 

606 7 

0 


TC 

LOCSET 


0062 

REF 

4 

LAST 

99 

04,6035 

0 

3044 

1 


TC 

ABORT 

NU register sets AVAILABLE, 

0063 





04 ,6036 


01202 

0 


OCT 

01202 


0064 

ref 

3 

LAST 

99 

04,6037 

2 

0601 

1 

+ 5 

INOEX 

LOCCTR 

TtilS LOOP FINDS THE FIRST AVAILABLE 

0065 

REF 

1 



04,6040 

1 

0124 

1 


CCS 

PRIORITY 

storage area FOR CORE REGISTERS FOR 

QOhft 

REF 

1 



04,6041 

0 

6105 

0 


TC 

N0VAC3 

THE NEW JOB, 

w w LJ vy 

0067 





04,6042 


00070 

0 

LASTADR 

DEC 

56 

EIGHT sets OF EIGHT REGISTERS, 
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(MAIN) PAGE 100 


L 001 
0068 


• * • ^ . J 


EXECUTIVE USER»5 OWN PAGE NO. 3 

REF 2 LAST 99 0A,60Ai 0 6105 0 TC N0VAC3 NNZ MEANS JOB ASLEEP HERE. 








4e<f^»7BA YUL SYSTEM FOR AGCA; REVISION 0 Of PROGRAM SqlRUMSS BY 


L 001 EXECUTIVE 


P0069 NOi^ that register SeTS HAVE BEEN FOUND FDR 


0071 

ref 

4 

LAST 

99 

OA » 60A4 

2 

0601 

1 

CQRSW 

INDEX 

0072 

REf 

8 

LAST 

89 

0At60A5 

5 

0122 

0 


T5 

0073 

ref 

7 

Last 

99 

0A,6aA6 

6 

057 7 

1 


AD 

007A 

ref 

5 

LAST 

101 

OA»60A7 

2 

0601 

1 

J0BWAKE4 

INDEX 

007S 

REF 

2 

last 

99 

OAf6U5U 

5 

0124 

0 


TS 

00/6 

REF 

2 

LAST 

AO 

OA,6051 

3 

2261 

0 


CAF 

00 /7 

REF 

6 

LAST 

99 

OA ,6052 

7 

0573 

1 


MA5<. 

00 7 6 

REF 

7 

LAST 

99 

OA,6053 

6 

0574 

1 


AD 

0079 

REF 

6 

LAST 

101 

OA , 605 A 

2 

0601 

1 


INDEX 

oobo 

REF 

5 

LAST 

A5 

OA,6055 

5 

0123 

1 


1 5 

GOBI 

REF 

1 



0A,6056 

3 

6316 

0 


CAP 

0082 

REF 

7 

LAST 

101 

04*6057 

7 

0573 

1 


MA5< 

0083 

REF 

66 

LAST 

99 

OA * 6060 

1 

0000 

0 


CCS 

OOBA 





OA ,6061 

0 

6063 

1 


TC 

0085 

REF 

1 



04,6062 

0 

6033 

1 


TC 

0086 

REF 

a 

LAST 

101 

OA , 6063 

3 

0573 

0 


XCH 

00b7 

REF 

A 

LAST 

69 

OA , 6 0 6 A 

7 

4606 

1 


v|AS< 

0088 

REF 

2 

LAST 

AA 

OA,6065 

6 

4373 

1 


AD 

0089 





OA ,6066 

4 

0000 

0 


CDM 

0090 

ref 

7 

LAST 

101 

04,6067 

2 

0601 

1 

L0C5ET 

INDEX 

0091 

REF 

9 

LAST 

93 

04,6070 

5 

0120 

1 


TS 

0092 

REF 

3 

LAST 

92 

04,6071 

2 

0215 

0 


INDEX 

0093 

ref 

3 

LAST 

101 

04,6072 

4 

0124 

1 


CS 

009A 

REF 

8 

LAST 

101 

04,6073 

6 

0577 

1 


AD 

0095 

REF 

67 

LAST 

101 

04,6074 

1 

0000 

0 


CCS 

0096 

ref 

8 

LAST 

lOl 

04,6075 

4 

0601 

1 


CS 

0097 

REF 

1 



04,6076 

0 

6102 

i 


1 c 

0098 





04,6077 

0 

6100 

0 


T ^ 

0099 

REF 

A 

LAST 

98 

04,6100 

3 

0572 

1 

N0WAKE2 

XCH 

0100 

REF 

X 



04,6101 

0 

2076 

1 

ENDFIND 

TC 

0101 





04 ,6102 

<+ 

0000 

0 

newhigh 

CDM 

0102 

REF 

A 

LAST 

101 

04,6103 

5 

0215 

1 


T 5 

0103 

REF 

1 



04 , 6 1 U4 

0 

6100 

0 


TC 

OlOA 

REF 

1 



04,6105 

4 

4513 

0 

N0VAC3 

CS 

0105 

REF 

9 

LAST 

101 

04 ,6105 

6 

0601 

0 


AD 

0106 

REF 

2 

LAST 

98 

04,610/ 

0 

6030 

1 


1 C 
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(MAIN) page 101 


USER'S OWN page no. A 

new job, initialize them and Set Newjob if called For. 


locctr 

OvFlND 

(COMES HERE WITH C(A) = 0), TURN OFF OVF 

newprio 

LOCCTR 

PRIORITY 

BANKMASK 

EXECTtM2 

Set up PRIORITY FOR NEW JOB, 

JOB WAKING ENTERS HERE TO FINISH UP. 
SiORE NEW PRIORITY 

EXECTFM3 

LOCCTR 

PUSHLOC 

PUSHLOC 

EXEC70K 

tXECTEM2 

A 

CREATE PROPER 12 BIT ADDRESS. 

See if high three bits zero. 

♦ 2 

12BITS0< 

tXLCTEM2 

LOwlO 

6K 

LOCCTR 

LOG 

NEEDS SPECIAL TREATMENT IF C(A) NOT ZERO 

NEWJOB 

PRIORITY 

newprio 

TEST WHETHER NEW JOB HAS HIGHER 

PRIORITY than PREVIOUS HIGHEST 

A 

LOCCTR 

NEInHIGH 

NtW JOB HAS HIGHER PRIORITY, 

SlT NEWJOB, LEAVING LOCCTR UNCHANGED. 

+ I 

EXECTEMI 

foundvac 

-0 IF PRIORITIES = AND BOTH ARE NOVACS. 

NEWJOB 

SET NEWJOB AND RETURN TO CALLER, 


EnDFIND •! 


EIGHT 

LOCCTR 

CUME5 HERE TO EXAMINE NEXT REGISTER SET. 


N0VAC2 +1 


YUL SYSTEM FOR AGC^*: REVISION 0 01- PROGRAM S0LRUMt,5 BY 


L OUl EXECUTIVE 


P0107 



the 

JoBwAKe 

ROJTINe 

REACTIVE^ 

A sleeping job 

0109 

ref 

2 

LAST 

99 

04*6110 

3 

6042 

1 

J0BWAKE2 

CAF 

0110 

REF 

10 

last 

101 

04*6111 

5 

0601 

0 


T5 

0111 

REF 

68 

LAST 

101 

04*61 12 

1 

0000 

0 


CCS 

0112 

REF 

11 

Last 

102 

04*6113 

2 

0601 

1 


I MOEX 

0113 

ref 

4 

last 

101 

04*6114 

1 

0124 

1 


CCS 

0114 

REF 

1 



04*6115 

0 

6140 

1 


TC 

0115 

REF 

1 



04 * 6 1 1 6 

0 

6143 

1 


TC 

0116 





04,611 ? 

0 

6121 

0 


TC 

0117 

REF 

2 

LAST 

102 

04*6120 

0 

6140 

1 


TC 

01 10 

ReF 

9 

LAST 

101 

04*6121 

4 

0573 

1 

+ 2 

C5 

0119 

REF 

12 

LAST 

102 

04*6122 

2 

0601 

1 


index 

0120 

REF 

10 

LAST 

101 

04,6123 

6 

0120 

1 


AD 

0121 

REF 

69 

LAST 

102 

04 * 6 1 24 

1 

0000 

0 


CCS 

0122 

REF 

3 

LAST 

102 

04*6125 

0 

6140 

1 


TC 

01^3 

REF 

6 

LAST 

86 

04,6126 

0 

3062 

0 


TC 

0124 

REF 

4 

LAST 

102 

04*6127 

0 

6140 

1 


TC 

0125 

REF 

5 

LAST 

101 

04*6130 

3 

4606 

0 


CAF 

0126 

REF 

13 

LAST 

102 

04*6131 

2 

0601 

1 


index 

0127 

REF 

6 

LAST 

101 

04*6132 

7 

0123 

0 


MASK 

0128 

REF 

8 

LAST 

lOl 

04*6133 

5 

0574 

1 


T5 

0129 

REF 

14 

LAST 

102 

04*6134 

2 

0601 

1 


INDEX 

0130 

REF 

5 

LAST 

102 

04*6135 

4 

0124 

1 


C5 

0131 

REF 

9 

LAST 

101 

04,6136 

5 

057 7 

1 


T5 

0132 

REF 

1 



04*6137 

0 

6047 

1 


TC 

0133 

ref 

2 

LAST 

101 

04*6140 

4 

4513 

0 

J0BWAKE3 

cs 

0134 

REF 

15 

LAST 

102 

04,6141 

6 

0601 

0 


AD 

0135 

REF 

2 

LAST 

98 

04*6142 

0 

6111 

0 


1 C 

0136 

ref 

16 

LAST 

102 

04*6143 

5 

0601 

0 

NOWAK £ 

T5 

0137 

REF 

1 



04,6144 

0 

6100 

0 


TC 


1021108-021 


OEC 4* 1966 


(MAIN) PAGE 10? 


USER»S OWN page no, 5 

, Setting it to be^in at the given wake adoreSS. 


LASTADR 

LOCCTR 

A 

LOCCTR 

PRIORITY 

J0BWAKE3 

blgin search For register set containing 
Sleeping job, wake address is in loc in 

CADR FORM, AS PLACEO THERE BY JOBSLEEP. 
PNZ AND -0 only, see IF THIS JOb ASLEEP. 
THIS CCS CANT GO TO TC NOWAKE . 

PimZ - ACTIVE JOB PRESENT. +o IMPOSSIBLE. 

nowake 

Alarm - sleeping job not found. 

♦ 2 

J0BWAKE3 

Inactive job found, 

-u - NOT IN USE, 

EXECTEM2 

LOCCTR - 
LOC 

See ip this is the desired sleeping job. 

A 

JOB W AK E 3 

CC5H0LE 

JOBwAkEb 

SEARCH next SET IF NOT AT END, 

LOWIO 

LOCCTR 

pushloc 

EXECTEM3 

Set up EXECTEM3 AND PRIORITY 50 WE CAN 
FINISH AT standard CORSw , 

Protect pd setting. 

LOCCTR 

PRIORITY 

NEwPRIO 

J0BWAKE4 

rl-complement priority and finish up. 

EIGHT 

LOCCTR 

Advance to next register set. 


jobwakez +1 


LOCCTR 

N0wAKE2 


SET LOCCTR = +0 TO SHOW NO JOB WAS 
MwAKENEU. 


^il^t>7eA YUU SYSTtM FOR A&CA; REVl&ijH 0 OF PROGRAM SoLRUMbS BY NASA 1021108-021 


dec A» 1966 


(Main) Rage 103 


L OUl 

EXECUTIVE 









USER’S OWN page NO. 6 

PUL3e 

A New job, of 

higher 

PRIORI rY 

THAN THE 

PReSlNT 

one* causes the ReLA- 


R0139 

TIVE 

address 

(9, 18, 

• • • 1 63) 

OF 

THE 

NEW JOB CORE Registers to be 


R0l40 

placed in Register 

NEWJOS , 

where it 


IS tested 

' By the 

interpreter. 


ROlAl 

the 

resulting 

branch 

TO CHANJOB, 

below 

, CAUSES 

A T^AOe 

between the 


R01A2 

CORE 

REGISTEf^S OF THE PRESENT 

AND NEW 

JOBS. 




0U3 

REF 

2 LAST 

101 



2101 


5ETL0C 

FOUNDVAC +3 


OlAA 




2101 

2 

0017 

0 

CHANgI 

I NHINT 


basic JOBS come here WHEN C(NEwJOB) 

OLAS 

REF 

3 LAST 

98 

2102 

3 

2075 

i 


CAF 

EXECBANK 

NuN-ZERO. start BY CALLING IN EXECUTIVE 

01 A6 

REF 

22 LAST 

98 

2103 

3 

0015 

0 


XCH 

bankreg 

Bank and saving return bank code. 

0147 




2104 

4 

0000 

0 


COvi 



0148 

REF 

11 LAST 

93 

2105 

5 

0061 

0 


T5 

BANKSET 


0149 

REF 

7 LAST 

102 

2106 

3 

0123 

1 


XCH 

PUSHLOC 

BL.ANK OUT the high-order 4 BITS IN 

OISO 

REF 

6 LAST 

102 

2107 

7 

4606 

1 


^AS< 

LOW 10 

PUSHLOC SO the bank BITS CAN BE PACKED 

0151 

REF 

a LAST 

103 

2110 

5 

0123 

1 


TS 

PUSHLOC 

WITH IT 

0152 

REF 

70 LAST 

98 

2111 

4 

0001 

1 


C5 

0 

Fur return, showing this was a basic job 

0153 

REF 

1 


2112 

0 

6145 

1 


TC 

CHANJOB 

OFF to bank 0 

0154 

REF 

12 last 

76 

2113 

1 

0066 

0 

CHANG2 

CCS 

neweqind 

Ii>*terpretive interrupts start here. 

0155 

REF 

71 LAST 

103 

2114 

0 

0001 

0 


TC 

Q 

pkovided the load Indicator isnt on 

0156 




2115 

2 

001 1 

0 


INHINT 


CALL IN EXECUTIVE BANK, 

0157 

ref 

4 LAST 

103 

2116 

3 

2075 

1 


CAF 

EXECBAN< 

0158 

REF 

23 LAST 

103 

211 ? 

5 

0015 

0 


TS 

Bankreg 


0159 

REF 

11 LAST 

102 

2120 

3 

0120 

1 


XCH 

LOC 

WITH C(AJ PNZ. SHOWING WE WERE IN INTE'RP 

0160 

ref 

2 LAST 

103 

2121 

0 

6145 

1 


TC 

CHANJOB 

CQ161 











RtTER 


YUL 5YSTtM FOR M&C4: REVISION 0 OF PROGRAM SOLRUM55 BY 


L OUl EXECUTIVE 


0162 

REF 

2 

LAST 

102 


04,6145 

SETLOC 

0163 

REF 

5 

LAST 

101 

04»6l45 

2 

0215 

0 CHANJOB 

I MOtX 

0164 

REF 

12 

LAST 

103 

0 4 ♦ 6 1 4 6 

3 

0120 

1 

XCH 

0165 

REF 

13 

LAST 

104 

04»614 7 

5 

0120 

1 

T5 

Ol66 

REF 

6 

LAST 

102 

04t615U 

3 

0124 

0 

XCH 

0167 

REF 

6 

LAST 

104 

04 ♦ 6151 

2 

0215 

0 

iM3EX 

0168 

REF 

7 

LAST 

104 

04»6152 

3 

0124 

0 

XC-i 

0169 

REF 

6 

LAST 

104 

04»6153 

5 

0124 

0 

TS 

0170 

REF 

1 



04 « 6 1 5 4 

7 

4607 

0 

v|AS< 

0171 

REF 

10 

LAST 

93 

04,6155 

5 

0067 

0 

TS 

0172 

REF 

1 



04,6156 

6 

4511 

0 

A3 

0173 

REF 

26 

LAST 

92 

04,6157 

5 

0070 

0 

TS 

0174 

REF 

12 

LAST 

103 

04,6160 

4 

0061 

1 

CS 

0175 

REF 

9 

LAST 

103 

04,6161 

6 

0123 

1 

A3 

0176 

REF 

7 

LAST 

104 

04,6162 

2 

0215 

0 

I N3EX 

0177 

REF 

10 

LAST 

104 

04,6163 

3 

0123 

1 

XCH 

0178 

REF 

11 

LAST 

104 

04,616h 

5 

0123 

1 

T5 

0179 

REF 

7 

LAST 

103 

04,6165 

7 

4606 

1 

vjA5< 

0180 

REF 

12 

LAST 

104 

04 ,6166 

3 

0123 

1 

XCH 

0161 





04,6167 

4 

0000 

0 

CD'l 

01B2 

REF 

13 

LAST 

104 

04,6170 

6 

0123 

1 

A3 

0183 

REF 

13 

LAST 

104 

04,6171 

5 

0061 

0 

TS 

0184 

REF 

21 

LAST 

76 

04,6172 

4 

0121 

1 

CS 

0185 





04,6173 

6 

0000 

1 

33JBLE 

0186 





04,6174 

6 

0000 

1 

33JBLE 

0187 

REF 

19 

LAST 

97 

04,6175 

6 

0065 

1 

A3 

0188 

REF 

8 

LAST 

104 

04,6176 

2 

0215 

0 

1M3EX 

0189 

REF 

22 

LAST 

104 

04,6177 

3 

0121 

0 

XCH 

0190 

REF 

7 

LAST 

96 

04,6200 

5 

0021 

1 

T5 

0191 

REF 

3 

LAST 

67 

04,6201 

7 

44 73 

1 

MAS< 

0192 

REF 

1 



04,6202 

6 

4341 

0 

A3 

0193 

REF 

20 

LAST 

104 

04,6203 

5 

0065 

1 

TS 

0194 

REF 

8 

LAST 

104 

04,6204 

4 

0021 

0 

C5 

0195 

REF 

9 

LAST 

104 

04,6205 

4 

002l 

0 

CS 

0196 

REF 

23 

LAST 

104 

04 , 6206 

5 

0121 

0 

T 5 
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(MAIN) page 104 



USER'S OWN PAGE NO, 7 

NOWAKE +2 
NEWJOe 

TO BEGIN SWAP OF COKE REGISTERS 

LOC 

LOC 

Save PROPER 12 BIT ADDRESS 

PRIORITY 

MEWJOB 

PRIORITY 

PRIORITY 

L0W9 

F IXLOC 

TU GET FlXLOC 

B1T6 

VACLOC 

SET UP VACLOC ( = FlXLOC + 32D ) 

BANK5ET 

PUSriLoC 

NEWJOB 

PUSHLOC 

PUSHLOC 

LOW 10 

PUSHLOC 

SAVE BANK 

AiaiD PUSHLoC in SAME WORD 

PUSHLOC 

BANKSET 

WE NOW HAVE COMPLEMNT OF BANK BITS 

ADRLOC 

MODE 

NEW JOB 

ADRLOC 

Save mode and complement of adrloc in 

SAME WORD, ADRLOC MUST BE SHIFTED 2 

Places to make room for mode 

-0, -1, or -2 

SR 

THREE 

NEG3 

MODE 

SR 

SR 

ADRLOC 

Save low 2 BITS 

This results in either -0, -1, OR -2 


'♦B^t>78A YUL system F^R AGc^I REVISION U Ok rROGRAm SOlRUMSS BY 


L OUl EXECUTIVE 


0197 

REF 

9 

last 

101 

04*6207 

1 

0122 

1 


CCS 

0196 





04*6210 

0 

6212 

0 


TC 

0199 





04*6211 

0 

6214 

0 


TC 

0200 

REF 

11 

LAST 

52 

04*6212 

4 

0063 

0 


• C5 

0201 





04*6213 

0 

6215 

1 


TC 

0202 

REF 

12 

LAST 

105 

04*6214 

3 

0063 

1 


XCH 

0203 

REF 

9 

LAST 

104 

04*6215 

2 

0215 

0 


INDEX 

020a 

REF 

10 

LAST 

105 

04,6216 

3 

0122 

0 


XCH 

0205 

REF 

13 

LAST 

105 

04,621? 

5 

0063 

1 


TS 

0206 

ref 

70 

LAST 

102 

04,6220 

1 

0000 

0 


CCS 

0207 

ref 

36 

LAST 

99 

04*6221 

3 

5501 

0 


CAP 

0208 

REF 

1 



04,6222 

0 

6226 

1 


TC 

0209 

REF 

lA 

LAST 

105 

04,6223 

4 

0063 

0 


C5 

0210 

REF 

15 

LAST 

105 

04,6224 

5 

0063 

1 


TS 

0211 

REF 

28 

LAST 

95 

04,6225 

3 

45 lb 

1 


caf 

0212 

REF 

11 

LAST 

105 

04,622b 

5 

0122 

0 

OVFSET 

T5 

0213 

REF 

1A6 

LAST 

97 

04,6227 

3 

0115 

1 


XCH 

U21A 

REF 

10 

LAST 

105 

04,6230 

2 

0215 

0 


index 

0215 

REF 

1A7 

LAST 

105 

04,6231 

3 

0115 

L 


XCH 

0216 

REF 

148 

LAST 

105 

04,6232 

5 

0115 

1 


TS 

0217 

REF 

1A9 

LAST 

105 

04,6233 

3 

0116 

1 


XCH 

0218 

REF 

11 

LAST 

105 

04 , 623h 

2 

0215 

0 


INDEX 

0219 

REF 

150 

LAST 

105 

04,6235 

3 

0116 

1 


XCH 

0220 

REF 

151 

LAST 

105 

04 * 6 236 

5 

0116 

1 


TS 

0221 

REF 

152 

LAST 

105 

04,6237 

3 

0117 

0 


XCH 

0222 

REF 

12 

LAST 

105 

04,6240 

2 

0215 

0 


INDEX 

0223 

REF 

153 

LAST 

105 

04,6241 

3 

0117 

0 


XCH 

022A 

REF 

154 

LAST 

105 

04,6242 

5 

Oil ? 

0 


TS 

0225 

REF 

37 

LAST 

105 

04,6243 

3 

5501 

0 


CAF 

0226 

REF 

13 

LAST 

103 

04 ,624“+ 

5 

0066 

1 


TS 

0227 

REF 

13 

LAST 

105 

04*6245 

5 

0215 

1 

SETNJ 

T5 

0228 





04*6246 

2 

0016 

1 


RELiNT 

0229 

REF 

14 

LAST 

104 

04,6247 

I 

0120 

0 


CCS 

0230 

REF 

38 

LAST 

105 

06,6250 

3 

5501 

0 


CAP 

0231 

REF 

34 

LAST 

97 

04,6251 

0 

4026 

1 


TC 

0232 

REF 

29 

LAST 

105 

04*6252 

6 

4516 

1 


AD 

0233 

REF 

79 

LAST 

97 

04*6253 

5 

0062 

0 


TS 

023A 

REF 

14 

LAST 

104 

04 * 6254 

4 

0061 

1 


CS 

0235 

REF 

1 



04*6255 

0 

2122 

1 

ENDCHANG 

TC 

0236 

ref 

2 

LAST 

38 



2122 


SETLOC 

0237 

REF 

24 

LAST 

103 

2122 

5 

0015 

0 

BASICALL 

TS 

0238 

ref 

80 

LAST 

105 

2 1 2 3 

0 

0062 

0 


TC 


1021108-021 


pEc 1966 


(MAIN) page lot) 


USER'S OWN page NO, 6 


OVFIND 

+ 2 
♦ 3 

ORDER 

+ 2 

ORDER 

NEWJOB 

OVFIND 

A 

ZERO 

OVFSET 

ORDER 

ORDER 

ONE 

OVFlND 


Save c(oRder) positive if c(ovfino) = o 

And NEGATIVE OTHERWISE 


/ 

V 

' < 

4 _ 

Determine new setting of ovfind 

To ZERO 

order was NEGATIVEt MAKE IT POSITIVE 
To SET OVFIND 


MPAC 

NEwJOe 

MPAC 
MPAC 
MPAC +1 
NEwJOB 
MPAC +1 
MPAC +1 
MPAC +2 
NEwJOB 
MPAC +2 
MPAC +2 


TRADE C(MPAC TO MPAC+2) 


0 V i -J rJ 0 5 + 0 

v V ii) " 


ZERO 

NLWEGIND 

NEWJOB 

LOC 

ZERO 

DANZIG *2 
ONE 

ADDRWD 

BANKSET 

BASICALL 


Make sure load indicator off. 
Enable interrupt 

C(LOC) PNZ FOR interpretive JOBS, 

RETURN TO interpreter 

get ABSILOC) and return to BASIC 
GET DESIRED BANkBITS 


CHANG2 +7D TAKE OP WHERE WE LEFT OFF IN FIXED-FIXED 


BANKREG 

addrwd 


YUL SYSTEM FOR A&C^I REVISION 0 OF PROGRAM SOLRUM&S BY 


L 001 

EXECUTIVE 








0239 

ref 

5 

LAST 

103 

2124 

3 

2075 

1 

ENDOFJOB 

CAP 

02*t0 

REF 

25 

LAST 

105 

2125 

5 

0015 

0 


TS 

0241 

REF 

1 



212b 

0 

6256 

0 


TC 

0242 

ref 

15 

LAST 

105 

212 7 

5 

0120 

1 

jobsleep 

IS 

0243 

ref 

6 

LAST 

106 

2130 

3 

2075 

1 


CAf 

0244 

REF 

26 

LAST 

106 

2131 

5 

0015 

0 


T5 

0245 

REF 

1 



2132 

0 

62 6 7 

1 


TC 

0246 

REF 

1 




04,6256 


SETLOC 

0247 





04»6256 

2 

0017 

0 

END JOB 1 

IMHINT 

0248 

REF 

39 

LAST 

105 

04,6257 

4 

5501 

1 


CS 

(j249 

REF 

4 8 

LAST 

96 

04,6260 

5 

0100 

0 


TS 

0250 

REF 

9 

LAST 

104 

04*6261 

3 

0124 

0 


XCH 

0251 

ref 

2 

LAST 

104 

04,6262 

/ 

4607 

0 


MASK 

0252 

REF 

71 

LAST 

105 

04 ,6263 

1 

0000 

3 


r- ii 

V- vb 

0253 

REF 

72 

LAST 

106 

04,6264 

2 

0000 

0 


INDEX 

0254 





04,6265 

5 

0000 

1 


TS 

0255 

ref 

1 



04 ,6266 

0 

62 7*, 

3 


TC 

0256 





04,6267 

2 

0017 

0 

JOBSLPl 

nniNT 

0257 

REF 

10 

last 

106 

04,6270 

4 

0124 

1 


cs 

0258 

REF 

11 

LAST 

106 

04,6271 

5 

0124 

0 


TS 

0259 

REF 

40 

LAST 

106 

04,6272 

4 

5501 

1 


cs 

0260 

REF 

49 

LAST 

106 

04,6273 

5 

0100 

0 


TS 


(MAIN) page I Oft 


iASA 1021108-021 


DEC 1966 


LXECBAN< 

BANKREG 

endjobi 

LOC 

EXECBAN< 

BANKREG 

JOBSLPl 

ENDCHANG +1 


ZERO 

bUF +1 

PRIORITY 

L0W9 

A 

A 

0 

EJSCAN 


PRIORITY 
PRIORITY 
ZERO 
BUF +1 


USER'S ONN PAGE NO. 9 

Normal endjob entry. 


entry here TO Dl-ACTIVE this job. 
LUC Is SET TO The Awakening address 
so THE SUBSEQUENT JOBNAKE CAN FIND 

the proper register set. 


Interpret ivE jobs finish with rtb 

To ENDJOBx 

Endjob uses 0Uf» buf +i, and buf 
R oSTOHE availability OF VACi BY SETTING 

C(VACIUSE) NON-ZERO 


ENDJOB need NOT EXAMINE FIRST REG, SET. 
FINISH JOB SLEEP AND START eNDJOB-TYPe 

Scan, complemented priority register 

SHOWS JOB is asleep, 

INITIALIZE search FOR HIGHEST PRIORITY. 


^b4&78A YUL SYSTEM KqR AGC4 I REVISION 0 OF PROGRAM SQLRUMbS BY 


L 001 

P0261 

0262 

0263 

026A 

0265 


0266 

0267 

0268 

0269 

0270 

0271 

0272 

0273 

027A 

0275 

0276 

0277 

0276 

0279 

0280 
0281 

0282 

0283 

0284 

0285 

0286 

0287 

0288 
0209 


EXELUTIVE 


SCAN For the active job of h 


REF 

12 

last 

106 

REF 

1 



REF 

7 

last 

102 


REF 

13 

LAST 

107 

REF 

2 

last 

107 

REF 

8 

last 

107 


REF 

14 

LAST 

107 

REF 

3 

LAST 

107 

REF 

9 

LAST 

10 7 


ref 

15 

LAST 

107 

REF 

4 

LAST 

107 

REF 

10 

LAST 

107 


REF 

16 

LAST 

107 

REF 

5 

LAST 

107 


REF 

17 

LAST 

107 

REF 

6 

LAST 

107 

ref 

18 

LAST 

107 


REF 

19 

LAST 

107 

REF 

7 

LAST 

107 

REF 

11 

LAST 

107 


O't 

*62 74 

1 

0139 

04 

»62 75 

0 

6341 

04 

*6276 

0 

3062 

04 

*6277 

0 

6300 

04 

*6300 

1 

0144 

04 

*6301 

0 

6341 

04 

*6302 

0 

3062 

04 

*6303 

0 

6304 

04 

*6309 

1 

0154 

04 

.6305 

0 

6341 

04 

*6306 

0 

3062 

04 

*6307 

0 

6310 

04 

*6310 

1 

0164 

04 

*6311 

0 

6341 

04 

*6312 

0 

3062 

04 

*6313 

0 

63 1 4 

04 

*6314 

1 

0179 

04 

*6315 

0 

6341 

04 

*6316 

70000 

04 

*631 7 

0 

6320 

04 

*6320 

1 

0204 

04 

*6321 

0 

6341 

04 

*6322 

6 

7653 

04 

*6323 

0 

6324 

04 

*6324 

1 

021** 

04 

*6325 

0 

6341 

04 

*6326 

0 

3062 

04 

*6327 

0 

6330 


IGHEST priority, 

0 EJSCAN 

1 
0 
1 

1 
I 

0 
0 

0 
1 
0 
0 

0 
1 
0 
1 

I 
I 

0 EXEC70K 
0 

0 

1 

0 -CCSPR 

1 

1 
I 
0 
I 


fin fin rinrifi nnrin nnrin nnrin nnnn nnnn 


NASA 1021108-021 


OEC a, 1966 


(MAIN) PAGE 107 


PRIORITY 

EJI 

CCSHOLE 

*l 

PRIORITY 

Ejl 

CCSHOLE 

+ 1 

PRIORITY 

EJI 

CCSHOLE 

+ 1 

PRIORITY 

Ejl 

CCSHOLE 
+ 1 

PRIORITY 

EJI 

70000 

♦ i 

PRIORITY 

EJI 

PRIORITY 

+ 1 

PRIORITY 

EJI 

CCSHOLE 

+ l 


USER'S Own page no. 10 


ErtCH priority Register (priority +8N) 

IS Scanned, ns contents are either 

2. NN2 - AN INACTIVE PRIORITY NUMBER. 

♦16P OK 3. -0 - NOT IN USE. 

If PN2t control is transferred to EJI 

PARED WITH THE PREVIOUS HIGHEST 

♦2AD priority FOUND, THE CONTENTS OF 0 

SERVE TO LOCATE THE CCS WHICH WAS 

NtWJOB IS SET To THE RELATIVE AODRpSS 

+320 OF THE REGISTER SET WITH THE HIGHTEST 

Active priority at the end of the scan. 

+40D 

+ 48D 

♦ 560 


4d4b7aA YUL System for agca: REvisiaN o of program solrumss by 


L 001 

EXECUTIVE 


0290 

REF 

SO 

Last 

106 

0291 





0292 

REF 

1 



0293 

REF 

73 

LAST 

106 

0294 





029S 

REF 

1 



0296 

REF 

14 

LAST 

105 

02 97 

REF 

16 

LAST 

106 

0298 

REF 

3 

LAST 

103 


0299 

REF 

51 

LAST 

100 

03UO 

REF 

52 

LAST 

lOB 

0301 

REF 

74 

LAST 

lOfa 

0302 

REF 

72 

LAST 

103 

0303 

0304 

REF 

1 



0305 

0306 

REF 

73 

LAST 

106 

0307 

ref 

53 

LAST 

108 

0308 

REF 

54 

LAST 

108 

0309 

REF 

55 

LAST 

108 

0310 

0311 

REF 

56 

LAST 

106 


*6330 

1 

0077 

0 

^ r- 

^ W D 

♦ 6331 

0 

6333 

1 

TC 

* 6 332 

0 

6245 

1 

TC 

♦ 6333 

2 

0000 

0 

I'JOEX 

♦ 6334 

2 

7777 

0 

caf 

♦ 6335 

6 

6322 

1 

A3 

♦ 6336 

5 

0215 

I 

T5 

*633 / 

3 

0120 

1 


♦ 6340 

0 

6145 

1 

TC 


♦ 6341 

5 

0101 

1 

EJI 

TS 

♦ 6 342 

6 

OlOO 

0 


A3 

♦ 6343 

i 

0000 

0 


CCS 

♦ 6344 

3 

0001 

0 


XCH 

♦ 6345 

0 

6351 

0 


TC 

♦ 6346 

3 

0000 

1 


N33P 

♦ 6 3 4 1 

2 

0001 

1 


1 M3EX 

♦ 6350 

0 

0002 

0 


TC 

♦ 6351 

5 

0077 

1 

EJ2 

TS 

♦ 6352 

4 

0101 

0 


C5 

♦ 6353 

5 

0100 

0 


TS 

♦ 6354 

2 

0077 

0 


I NJ3EX 

♦ 635b 

0 

0002 

0 


TC 


OA 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 

04 


NASA 1021100-021 
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USER'S Own page no, u 

BUF 

+ 2 

5ETNJ 

If bUF = Of THE SCAN WAS PART OF 

A PRIORITY change IN WHICH THE NE^ 
PkIORITY 15 HIGHEST, GO SET NLWJOB = 0 

A 

0 -1 

-CCSPR 

NEtvJOB 

LOC 

CHANJOB 

PICK UP CCS instruction to get ne^^job 

SbLECl CCS INSTRUCTION. 

RELATIVE ADDRESS ONLY. 

(NO meaning for ENDoFJOb). 

BUF +2 
bUF *1 

A 

Q 

EJ2 

Q 

STORE NEW priority 
- OLD PRIORITY 

IF NEW priority IS LARGER 

IF OLD PRIORITY IS LARGER 

OR equal 

2 


bUF 

BUF +2 

BUF +1 

BUF 

SAVE C(0) TO LOCATE HIGHEST PRIORITY 
JOB AT END OF SCAN, 


2 


hB4L>7BA VUL system for AGCiti REVISION o Of- PROGRAM SOLRUM 53 BY NASA 1021108-021 


DeC Ct f 


1966 


(MAIN) PAGE 109 




L 001 

EXECUTIVE 









USER'S OWN PAGE NO. 12 

P0312 



the 

FOLLO*^ING routine 1 

[5 available TO CHANGE THE PRIORITY 

OF A JuB while IT IS RUNNING UNDeR EXECUTIVE 

K031A 

Control 

(IE, 

IN CqRE 

SET 0) . 

CALLING 

Sequence is 

AS Follows (no inhint ne'-essary> : 

A0316 










CAF 

NEWPRID 

PkIORITY IN BITS 10-14 - ZERO ELSEWHERE. 

A0317 









L 

TC 

PRIOCHNG 


R031H 

Return i 

[5 TO 

L+i immediately 

unless a 

Job of Still higher priority 

IS present, in WHICH caSe It Goes to chanjqb 

R0320 

BEFORE return 

ING- 









03^1 

REF 

1 





2133 


SETLDC 

JOBSLEEP +4 


0322 





2133 

2 

0017 

0 

PRIOCHNG 

I NHINT 


PkEPAHE Q, bank, ANU PUSHLqC (ALA 

0323 

ref 

10 

LAST 

102 

2134 

5 

0577 

1 


TS 

newprio 

CrIANGU IN CASE WE HAVE TO CHANGE JOBS, 

032A 

REF 

74 

LAST 

108 

2135 

4 

0001 

1 


CS 

0 


0325 

REF 

17 

LAST 

lOe 

2136 

5 

0120 

1 


T5 

LUC 


0326 

REF 

7 

LAST 

106 

213 7 

3 

2075 

1 


caf 

EXECBANK 


0327 

REF 

27 

LAST 

106 

2140 

3 

0015 

0 


XCH 

BANKREG 


0328 

REF 

1 



2141 

0 

6356 

1 


TC 

PRI0CH2 

Ot-F TO EXECUTIVE BANK, 

0329 

REF 

2 

LAST 

106 


04,6356 


SETLDC 

EJ2 +5 


0330 





04 » 6 35b 

4 

0000 

0 

PRI0CH2 

COM 



0331 

REF 

15 

LAST 

105 

04,6357 

5 

0061 

0 


T5 

BANXSET 


0332 

REF 

14 

LAST 

104 

04,6360 

3 

0123 

1 


XCH 

PUSHLOC 


0333 

REF 

B 

LAST 

104 

04,6361 

7 

4606 

1 


MA5< 

LOWlO 


033A 

REF 

15 

LAST 

109 

04,6362 

5 

0123 

1 


TS 

PUSHLOC 


0335 

REF 

3 

LAST 

106 

04,6363 

3 

4607 

I 


CAF 

L0W9 

Make up New priority word, leaving 

0336 

REF 

20 

LAST 

107 

04,6364 

7 

0129 

1 


MA5< 

PRIORITY 

Possible vac address intact. 

0337 

REF 

11 

LAST 

109 

04 , 6365 

6 

0577 

1 


AO 

NEWPRIO 


0338 

REF 

21 

LAST 

109 

04,6366 

5 

0124 

0 


TS 

PRIORITY 


0339 





04 , 636 7 

4 

0000 

0 


COM 


Initialize buf +i to - this priority for 

03A0 

REF 

57 

LAST 

108 

04,6370 

5 

0100 

0 


TS 

BUF + 1 

SEARCH FOR HIGHEST PRIORITY. 

03A1 

REF 

41 

LAST 

106 

04,6371 

3 

5501 

0 


caf 

ZERO 

SlT buf TO ZERO AS A FLAG FOR END OF 

03^2 

REP 

58 

LAST 

109 

04,6372 

5 

0077 

i 


TS 

faUF 

So AN. 

03A3 

REF 

2 

LAST 

106 

04,6373 

0 

6274 

0 


TC 

EJSCAN 

SCAN FOR HIGHEST PRIORITY. 
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DEC 4 t 1966 


(MAIN) PAgE no 


L 001 EXECUTIVE USER'S OVvN PAGE NO* 13 

P03A5 LIST OF PROGRAM PRIORITIES 


03^+6 

REF 

1 




2142 


SETLOC 

PRIOCHNG +7 

03A7 

REF 

1 




4505 

PRIOl 

EOJALS 

BITIO 

US^fB 

REF 

A 

LAST 

78 


4504 

PRI02 

EO JAlS 

BITll 

03s9 





2142 

03000 

1 

PRI03 

OCT 

03000 

03S0 

REF 

1 




4503 

PRI04 

EO JALS 

BIT12 

03S1 





2143 

05000 

1 

PR 1 05 

OCT 

05000 

03b2 

REF 

1 




2143 

0CT05000 

EJJALS 

PR 105 

03b3 

REF 

3 

LAST 

101 


4373 

PR 1 06 

EOJALS 

6K 

03bA 





2144 

07000 

0 

PRI07 

OCT 

07000 

03SS 

REF 

2 

LAST 

48 


4502 

PRIOlO 

eojals 

bIT13 

03b6 





2145 

11000 

1 

PRIOl 1 

OCT 

11000 

03t>T 





2146 

12000 

1 

PRI012 

OCT 

12000 

03b8 





2147 

13000 

0 

PRI013 

OCT 

13000 

0339 





2150 

14000 

1 

PRI014 

OCT 

14000 

0360 





2151 

15000 

0 

PRI015 

OCT 

15000 

0361 





2152 

16000 

0 

PRI016 

OCT 

16000 

0362 





2153 

17000 

1 

PRI017 

OCT 

17000 

0363 

REF 

2 

LAST 

69 


4501 

PRIQ20 

E 0 JALS 

B1T14 

036A 





2154 

21000 

1 

PRI021 

OCT 

21000 

0365 





2155 

22000 

1 

PRI022 

OCT 

22000 

0366 





2156 

23000 

0 

PRI023 

OCT 

23000 

0367 





2157 

24000 

1 

PRI024 

OCT 

24000 

0368 





2160 

25000 

0 

PRI025 

OCT 

25000 

0369 





2161 

26000 

0 

PRI026 

OCT 

26000 

0370 





2162 

27000 

1 

PRI027 

OCT 

27000 

0371 





2163 

30000 

1 

PRI030 

OCT 

30000 

0372 





2164 

31000 

0 

PRI031 

DCT 

31000 

0373 





2165 

32000 

0 

PRI032 

OCT 

32000 

037A 





2 1 6 & 

33000 

1 

PRI033 

OCT 

33000 

0375 





2167 

34000 

0 

PRI034 

DCT 

34000 

0376 





2170 

35000 

1 

PRID35 

OCT 

35000 

0377 





2171 

36000 

1 

PRI036 

OCT 

36000 

03 ?e 





2172 

37000 

0 

PR 1 03 7 

OCT 

37000 




» ^ 




* ^ • • 



CT- : 







^b4t)78A YUL SYSTEM FOR AGCA*. REVISION 0 OF PROGRAM SOLRUM5S BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAgE 111 


L WAITLIST USbR*S OwN PAGE NO. 1 


ROOOl 

CHECK 

-OUT STATUS - 

UNIT verification 

COMPLETE MAY 

* 1965 


EXCEPT LONGCALL SECTION 

• 

R0003 

Do NOT CHANCjE 

THIS 

SECTION without PR3 

APPROVAL. 





ROOUA 

groundrule... 

.DELTA T SHOULD 

NOT 

EXCEED 12000 (= 

2 MINUTES) 



OOOS 






2173 


BANK 

1 



0006 

REF 

1 


2173 

5 

0577 

1 

WAITLIST 

T5 

DELT 

51 ORE DELTA T = TD - T 

(TD r desired 

0007 

REF 

75 LAST 

109 

21 

3 

0001 

0 


XCH 

0 

TIME for future ACTION), 

OOOB 

REF 

3 LAST 

98 

2l 75 

0 

2065 

0 


TC 

EXECCCM 

Pick up TASK address and save BANKRE6. 

0009 

REF 

1 


2176 

O 

6374 

1 


TC 

WTLST3 



0010 





04*6374 


bank 

4 



0011 

REF 

1 


04*637h 

4 

0037 

1 

WTLST3 

cs 

T 1ME3 



0012 




0A,6375 

6 

6376 

0 


AO 

+ 1 

CCS A s + 1/4 


0013 

REF 

75 LAST 

108 

04t6376 

1 

0000 

0 


CCS 

A 

TEST 1/4 - C(TiME3) , 

IF POSITIVE, 

AOOIA 








IT Means 

that TIME3 overflow 

HAS OCCURRED PRIOR TO CS 

times and that 

AOOiS 








C(T1ME3) 

= T - 

11, INSTEAD OF 

UO - (T1 - T). THE FOLLOWING FOUR 

A0016 








ORDERS SET C(A) 

= TD - T1 + 1 

IN EITHER CASE. C(CSq) s 

cs Q = 40001 

A0017 








AND C(T53) = TS 0 = 50001 

notation. ,, I = 00001, 

1,0 = 37777+1 

0018 

REF 

1 


04*6377 

6 

4664 

1 


AO 

CSq 

Overflow has occurred. 

SET C(A) 5 

0019 

REF 

76 LAST 

111 

04 t 6400 

4 

0000 

0 


CS 

A 

T - T1 + 3/4 - 1 


R0020 

NORMAL CASE (CIA) 

MINUS) YIELDS 

SAME 

f* 

(A) -{-(1. 

0- (Tl- 

T) ) ♦l/4)-l 



0021 

REF 

1 


04 t64Ul 

6 

4561 

1 


AO 

TSQ 

TS Q = - 3/4 ♦ 2 


0022 

REF 

2 LAST 

111 

04*6402 

6 

0577 

1 


AO 

DELT 

RESULT = TD - Tl + 1 


C0023 











10 w 



^8A578A YUL system FOR AGCA: REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 DEC 1966 (MAIN) PAGE U? 


L WAITLIST USER'S OWN PAGE NO. 2 


002A 

REF 

77 LAST 111 

OA »6(f03 

1 

0000 0 


CCS 

A 

Test td 

- Tl + 1 



002S 

REF 

1 

04 » 6 404 

6 

0552 0 


AD 

LSTl 

if td - 

Tl POS, GO 

TO WTLST5 

WITH 

0026 

REF 

1 

04,6405 

0 

6451 1 


TC 

WTL5T5 

C(A) = ' 

(TD - Tl) + 

C(LSTl) = 

TD-T2+1 

0027 



04 1 6406 

0 

6407 1 


TC 

+ 1 





0028 

REF 

3 LAST 111 

04*6407 

4 

0577 0 


C5 

DELT 





R0029 

note 

THAT THIS PRoG 

ram Section 

IS NtVER 

entered 

WHEN 

T-Tl G/E -1, 





R0030 

since 

TD-TUl = (TD 

-T) ♦ (T- 

Tl+1) , ANO 

DELTA T = 

TD-T 

G/E +l • (G/E 






R0031 SYMBOL MEANS GREATER THAN jR EQUAL TO). THUS THERE NEED BE NO CON- 

R0032 CERN over A PREVIOUS OR IMMINENT OVERFLOW OF TIME3 HERE. 


0033 

ref 

2 

LAST 

48 

04*6410 

6 

4522 

0 

AD 

POSl/2 

0034 

ref 

3 

LAST 

112 

04,6411 

6 

4522 

0 

Ad 

POSl/2 

0035 

REF 

2 

LAST 

111 

04,6412 

3 

0U3 7 

0 

XCH 

T IME3 

0036 

REF 

1 



04,6413 

6 

4563 

0 

AD 

MSIGN 

0037 

REF 

4 

LAST 

112 

04,6414 

6 

0577 

1 

AD 

delt 

0036 

REF 

5 

LAST 

112 

04 ,6415 

5 

0577 

1 

TS 

DELT 

0039 

REF 

42 

LAST 

109 

04 ,6416 

3 

5501 

0 

caf 

ZERO 

0040 

REF 

6 

LAST 

112 

04,6417 

3 

057 7 

1 

KCH 

DELT 

0041 

REF 

2 

LAST 

112 

04*6420 

3 

0552 

0 WTLST4 

XCH 

LSTl 

0042 

REF 

3 

LAST 

112 

04,6421 

3 

0553 

1 

xc^ 

LSTl +1 

0043 

REF 

4 

LAST 

112 

04,6422 

3 

0554 

0 

XCH 

LSTl *-2 

0044 

REF 

5 

LAST 

112 

04*6423 

3 

0555 

1 

XCH 

LSTl +3 

00a5 

REF 

6 

LAST 

112 

04 * 6 42 4 

3 

0556 

1 

XCH 

LSTl +4 

00453 

REF 

7 

LAST 

112 

04 ,6425 

3 

055 7 

0 

XCH 

LSTl +5 

00456 

REF 

8 

LAST 

112 

04,6426 

3 

0560 

1 

xCh 

LSTl +6 

0046 

REF 

10 

LAST 

102 

04,6427 

3 

0573 

0 

XCH 

EXECTEM2 

0047 

REF 

2 

LAST 

16 

04,6430 

2 

0577 

0 

INDEX 

NVAL 

0048 





04,6431 

0 

6432 

1 

TC 

+ 1 

0049 

REF 

1 



04*6432 

3 

0561 

0 

XCH 

LbT2 

0050 

REF 

2 

LAST 

112 

04*6433 

3 

0562 

0 

XCh 

LST2 +1 

0051 

REF 

3 

LAST 

112 

04*6434 

3 

0563 

1 

XCH 

LST2 +2 

0052 

REF 

4 

LAST 

112 

04*6435 

3 

0564 

0 

XCH 

LST2 +3 

0053 

REF 

5 

LAST 

112 

04.6436 

3 

0565 

1 

XCH 

LST2 *4 

0054 

REF 

6 

LAST 

112 

04*6437 

3 

0566 

1 

XCH 

LST2 +5 

00543 

REF 

7 

LAST 

112 

04 * 6440 

3 

0567 

0 

X Ch 

L5T2 +6 

00546 

REF 

8 

LAST 

112 

04 * 644 1 

3 

0570 

0 

XCh 

LST2 +7 

0055 

REF 

1 



04 *6 442 

6 

2260 

1 

AD 

END TASK 

A0056 











0057 

REF 

78 

LAST 

112 

04*6443 

1 

0000 

0 

CCS 

A 

0058 

REF 

5 

LAST 

99 

04*6444 

0 

3044 

1 

TC 

ABORT 

0059 





04 * 6 445 

01203 

1 

DCT 

01203 

0060 





04 * 6 44t> 

0 

6*t44 

0 

TC 

-2 

0061 

ref 

5 

LAST 

101 

04 * 6 44 7 

3 

0572 

1 

XCh 

EXECTEMl 

0062 

REF 

1 



04*6450 

0 

2076 

1 

TC 

LVWTLI5T 


WHEN TD IS NEXT, FORM QUANTITY 
1.0 - delta T = 1.0 - (TO - T) 


TASK ADDRESS. 


AT END, CHECK THAT C(LST2+51 IS STD 


END ITEM, AS CHECK FOR EXCEEDING 
THE length of THE LIST. 

WAITLIST overflow. 


RLTURN TO CALLER. 

SAME routine AS FINDVAC, ETC.» EXIT. 


^8^578^ YUL SYSTEM FDR AGCi»; REVISION 0 0(- PROGRAM SOLRUM 55 BY 


L waitlist 


0063 

REF 

79 

LAST 

112 

04*6451 

1 

0000 

0 

WTL5T5 

CCS 

0064 

REF 

9 

LAST 

112 

04*6452 

6 

0553 

1 


AD 

006S 





04*6453 

0 

64 5 7 

1 


TC 

U066 

REF 

30 

LAST 

105 

04*6454 

6 

4516 

1 


AD 

0067 

REF 

1 



04 *6455 

0 

6535 

1 


TC 

0068 





04 * 6 456 

00001 

0 


DCT 

0069 

REF 

80 

LAST 

113 

04 1 645 ? 

1 

0000 

0 

+ 4 

CCS 

0070 

REF 

10 

LAST 

113 

04 * 6 460 

6 

0554 

0 


AD 

0071 





04*6461 

0 

6465 

0 


TC 

0072 

REF 

31 

LAST 

113 

04*6462 

6 

4516 

1 


AD 

0073 

REF 

2 

LAST 

113 

04*6463 

0 

6535 

1 


TC 

0074 





04 *6464 

00002 

0 


OCT 

0075 

REF 

81 

LAST 

113 

04 « 6 465 

1 

0000 

0 

+ 4 

r 

w 5 

0076 

REF 

11 

LAST 

113 

04*6466 

6 

0555 

1 


AD 

0077 





04*6467 

0 

6473 

1 


TC 

0076 

REF 

32 

LAST 

113 

04*6470 

6 

4516 

1 


AD 

0079 

REF 

3 

LAST 

113 

04*6471 

0 

6535 

1 


TC 

0080 





04*6472 


00003 

1 


OCT 

0081 

REF 

62 

LAST 

113 

04 *6473 

1 

0000 

D 

♦4 

^ r 

^ V D 

0082 

REF 

12 

LAST 

113 

04*64/4 

6 

0556 

1 


AD 

0083 





04*6475 

0 

6501 

0 


K 

0084 

REF 

33 

LAST 

113 

04*6476 

6 

45 1 6 

1 


AD 

0085 

REF 

4 

LAST 

113 

04*64/7 

0 

6535 

1 


TC 

0086 





04*6500 


00004 

0 


OCT 


0087 

ref 

83 

LAST 

113 

04 

008705 

REF 

13 

LAST 

113 

04 

00B71 





04 

008715 

REF 

34 

LAST 

113 

04 

00872 

REF 

5 

LAST 

113 

04 

008725 





04 


6501 

1 

0000 

0 +4 

CCS 

6502 

6 

0557 

0 

AD 

6503 

0 

650 7 

0 

TC 

6504 

6 

4516 

1 

AD 

6505 

0 

6 535 

1 

TC 

* 6506 


00005 

1 

DCT 


NASA 102UO8-O21 


UEC 4 , 1966 


(MAIN) PAGE 113 



USER'S OWN PAGE NO. 3 

A 

LSTl +1 

+4 

ONt 

WTLST2 

1 

TEST TD - T2 + 1 

A 

LSTl +2 
+ 4 

ONE 

WTLST2 

2 

TEST TD - T3 + 1 

A 

LSTl +3 
+ 4 

ONE 

WTLST2 

3 

Test TD - T4 + 1 

A 

LSTl +4 
+ A 

ONE 

WTLST2 

4 

TEST TD - T5 4 . 1 

A 

LSTl +5 

4-4 

ONE 

WTLST2 

TEST TD - T6 4 1 


^8Aij78A YUL SYSTEM FOR AGCA: REVISION 0 


l 

WAITLIST 




00873 

REF 

8A LAST 

113 

OA ,6507 

1 

003735 

REF 

lA LAST 

113 

OA ,6510 

6 

DO b 7 A 




04,6511 

0 

00b7A5 

REF 

35 LAST 

113 

04,6512 

6 

00875 

REF 

6 LAST 

113 

04,6513 

0 

008755 




04 , 65 i <+ 


00876 

REF 

85 LAST 

1 lA 

OA»65i5 

1 

0088 

ref 

1 


04,6516 

0 

0089 




04,651 7 

3 

0090 

REF 

36 LAST 

UA 

04,6520 

6 

0091 

REF 

7 LAST 

114 

04,6521 

0 

0092 




04,6522 


0093 

REF 

6 LAST 

112 

04,6523 

0 

Q09A 




04,6524 


0095 

ref 

3 LAST 

103 



0096 

ref 

1 


04 » 6 52 5 

1 

0097 

REF 

1 


04,6526 

0 

0098 

REF 

2 LAST 

llA 

04,6527 

0 

0099 




04,6530 

0 

0100 

REF 

1 


04,6531 

3 

0101 

REF 

1 


04,6532 

0 

0102 

REF 

1 


04 ,6533 


0103 

REF 

3 LAST 

UA 

04 ,6534 

0 

ROlUA 

C(TIME3) = 1 

• 0 “ 

(T1 - T) 


R0105 

C(LST1 > = 

- (T2 

- TU ♦ 1 


R0106 

C(LST1+1) = 

- (T3 

- T2) +1 


R0107 

C(L5Tl+2) = 

- (TA 

- T3} ♦ 1 


ROlOe 

C(L5Tl+3) = 

- ( T5 

- TA) ♦ 1 


R0109 

C(LST1+A) = 

- IT6 

- T5) ♦ 1 


ROl 10 

C<LST2 ) = 

TC TASkI 


ROl 11 

C(L5T2+1) = 

TC TA5K2 


R0U2 

C<LST2+2) = 

TC TA5K3 


ROl 13 

C(LST2+3) = 

TC TASiCA 


ROl lA 

C(L5T2+A) = 

TC tasks 


ROl 15 

C{L5T2+5) = 

TC TASK6 



Oh PROGRAM 50LRUMS5 BY NASA 1021108-021 


0000 

0 

+4 

CCS 

A 

0560 

1 


AD 

LSTl +6 

6515 

0 


TC 


A516 

1 


AD 

ONE 

6535 

1 


TC 

WTLST2 

00006 

1 


OCT 

6 

0000 

0 

+ 4 

CCS 

A 

6523 

0 


TC 

WTALARM 

0000 

1 


NDOP 


A5 1 6 

1 


AD 

ONE 

6535 

1 


TC 

WTLST2 

00007 

0 


OCT 

7 

3UAa 

1 

wtalakm 

TC 

ABORT 

0120A 

0 


OCT 

OIZOA 

2076 

LVWTLIST 

EOJALS 

POUNDVAC 

0647 

0 

SVCT3X 

CCS 

FLAGWRD2 

2256 

1 


IC 

TASKOVER 

2256 

1 


TC 

TASKOVER 

6531 

0 


TC 

+ 1 

2170 

0 


CAF 

PR 1035 

2052 

1 


TC 

NOVAC 

31261 

0 


CADR 

BIASONLY 

2256 

1 

LTSKOV 

TC 

TASKOVER 


DEC A* 1966 (MAIN) PAGE U 
USER'S OWN PAGE NO. A 


IF during free-fall and after 
Platform has been aligned, compensate 
Fur gyro bias drift. 

Used by longcall. 


11 w 





I 





• - 1 


* 




A 





I '■ 








I 








yul System tor agc^: revision o of program solRumss by nasa 1021108-021 


DEC A » 1966 


(MAIN) page lib 


L WAITLIST USER'S OWN PAGE NO. b 


ROU7 

THE 

ENTRY To 

WTLST2 

JUST PRECEDING UC 

T N IS FOR 

T Lt 

TD LE T -U 



ROl LB 









N 

N41 



R0119 

(LE 

means less than 

OR E3JAL 

TO) 

• AT 

ENTRY* C(A) 

= -(TO 

- T 4 1) 



R0120 










N4 1 



R0121 

THE 

LSTI 

entry -(T 

- T * 1 ) 

IS 

TO BE 

REPLACED BY 

-(TD - 

T 4 1) , AND 



ROL22 




N+1 N 





N 



R0123 

THE 

entry -(T 

- TD 

4 1 ) Id 

TO 

be I N 

serted immediately 

FOLLOWING, 



R012A 




N*1 









0125 

REE 

76 

LAST 

111 

0A»6535 

3 

0001 

0 WTLST2 

XCH 


NEW C(0) = -(TO 

- T + 1) 

0126 

REF 

66 

LAST 

llA 

OA *6 530 

2 

0000 

0 

INDEX 

A 


N4l 

0127 





OA *653 f 

3 

0000 

I 

CAP 

0 



0128 

REF 

3 

LAST 

112 

OA * 65*tO 

5 

057? 

1 

T5 

NVAL 

VALUE OF N INTO 

NVAL 

0129 

REF 

37 

LAST 

llA 

0A*65A1 

3 

A5l6 

1 

CAF 

ONE 



0130 

REF 

77 

LAST 

115 

OA * 65 A2 

6 

0001 

0 

AD 

0 



0131 

REF 

A 

LAST 

115 

OA *65A3 

2 

0577 

0 

index 

NVAL 

C(A) s -(TD - T 

) + 1. 

0132 

REF 

15 

LAST 

llA 

OA * 65A A 

6 

0551 

0 

AD 

LSTI -1 

N 


0133 

REF 

5 

last 

115 

aA*65A5 

2 

0577 

0 

INDEX 

NVAL 



013A 

REF 

16 

LAST 

115 

OA * 65Ab 

5 

0551 

0 

TS 

LSTI -1 



0135 

REF 

78 

LAST 

115 

0 A * 6 5 A / 

A 

0001 

1 

C5 

Cl 

-LtQ) = -(T 

TD) 4 1 

0136 

REF 

6 

LAST 

115 

OA * 6 550 

2 

0577 

0 

INDEX 

NVAL 

N4l 


0137 

REF 

1 



0A,6551 

0 

6 a2 0 

1 

TC 

WTLSTA 




YUL 5Y5TEM FOR AGC4: REVISION 0 OF PROGRAM SOLRUH55 BY NASA 1021108-021 


Af 1966 


(MAIN) PAGE ll6 


L 

P0136 

RUIAO 

R0191 

R01A2 

Roi^ta 


OIhA 

01^5 

01A6 

0147 

0148 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 

0158 

0159 

OlbO 

0161 

0162 

0163 


0164 

0165 

0166 

0167 

0168 
0169 


0170 

0171 

0172 

0173 

0174 

0175 

0176 

0177 


WAITLIST 


USER'S OWN page NO, 6 


THIS ROUTINE HAnDLES TAS<5 MORE THAN i20 SECS IN THE FUTURE. IT ReqUIReS CALL TIMe IN LONGTIME, +l 
AS T1ME2, 1 ANO THE TASK ADDRESS IN CaLLCADR. ENTER wITH 


TC IBNKCALL 
CAOR LDNGCALL 


THE 

ROUTINE ONLY 

HANDLES ONE 

CALL AT 

A 

TIME 




REF 

79 

LAST 

115 

04 1 6552 

3 

0001 

0 

LONGCALL 

XCH 

(J 


REF 

1 



04,6553 

5 

1 466 

1 


rs 

LONGExI t 


REF 

1 



04 ,6554 

3 

1461 

0 


XCH 

LONGTIME 

1 





04 ,6 555 

6 

0000 

1 


DOUBLE 



REF 

2 

LAST 

116 

04,6556 

5 

1461 

0 


T5 

LONGTIME 

*1 

REF 

43 

LAST 

112 

04,6557 

3 

5501 

0 


CftF 

ZERO 


REF 

3 

LAST 

116 

04 ,6560 

6 

1460 

1 


AO 

LONGTIME 


REF 

4 

LAST 

116 

04,6561 

6 

1460 

1 


AO 

LONGTIME 


REF 

5 

LAST 

Il6 

04,6562 

5 

1460 

1 


TS 

LONGTIME 






04,6563 

0 

6565 

1 


TC 

+ 2 






04 ,6 564 

0 

656h 

0 


TC 



REF 

38 

LAST 

115 

04 ,6 565 

3 

4516 

1 


CAF 

ONE 


REF 

6 

LAST 

116 

04 , 6566 

6 

1461 

0 


AO 

LONGTIME 

+ 1 

REF 

8 

LAST 

97 

04,6567 

6 

4476 

0 


AO 

P05MAX 


REF 

7 

LAST 

116 

04,6570 

5 

1461 

0 


T5 

LONGTIME 

+ 1 

REF 

44 

LAST 

116 

04,6571 

3 

5501 

0 


CAF 

ZERO 


REF 

8 

LAST 

116 

04,6572 

6 

1460 

1 


AO 

LONGTIME 


REF 

9 

LAST 

116 

04,6573 

6 

4476 

0 


AO 

POSMAx 


REF 

9 

LAST 

116 

04 ,6574 

5 

1460 

1 


TS 

LONGTIME 


REF 

12 

LAST 

107 

04,6575 

0 

3062 

0 


TC 

CCSHOLE 


REF 

3 

LAST 

110 

04,6576 

3 

4501 

1 


CAF 

blT14 






04,657 7 

2 

5777 

1 


EXTEND 



REF 

10 

LAST 

116 

04,6600 

4 

1461 

1 


MP 

LONGTIME 

+ 1 

REF 

11 

LAST 

116 

04,6601 

5 

1461 

0 


TS 

LONGTIME 

+ l 

REF 

12 

LAST 

116 

04 ,6602 

1 

l460 

0 

LONGCYCL 

CCS 

LONGTIME 


REF 

1 



04,6603 

0 

6613 

0 


TC 

loopagIn 


ref 

13 

LAST 

Il6 

04 ,6604 

1 

1461 

1 



LONGTIME 

+ l 





04,6605 

0 

6607 

0 


TC 

+ 2 


REF 

1 



04 , 6606 

0 

6622 

1 


TC 

getcadr 


REF 

14 

LAST 

116 

04,6607 

3 

1^61 

0 


XCH 

LONGTIME 

+ 1 

REF 

1 



04 ,6610 

0 

2173 

0 


TC 

WAITLIST 


REF 

2 

LAST 

116 

04,6511 


10622 

0 


CAOR 

getcadr 


REF 

1 



04,6612 

0 

6617 

1 


TC 

LONGCl 


REF 

15 

LAST 

I 1 6 

04 ,6613 

5 

1460 

1 

loopagin 

TS 

LONGTIME 



ekror trap, dt too big 


TEST FOR LOWER ORDER ZERO 


scaled same 


t * > 



^8'»t>7aA YUL SYSTEM FOR AGC^^: REVISION 0 Of- PROGRAM SOLRUM55 BY 



WAITLIST 



0178 

REF 

A LAST 

116 

OA 

0179 

REF 

2 LAST 

116 

OA 

OldO 

REF 

1 


OA 

0181 

REF 

1 


OA 

0182 

REF 

2 LAST 

116 

OA 

0183 




OA 

D18A 

REF 

1 


OA 

0185 

REF 

1 


OA 


* 66 1 A 

3 

A50i 

1 


CAP 

♦ 6615 

0 

2173 

0 


TC 

♦ 6 6 1 6 


10602 

1 


CAOR 

*661/ 

3 

653A 

0 

LONGCl 

CAF 

*6620 

3 

IA66 

1 


XCH 

*6621 

0 

0000 

1 


XA3 

*6622 

3 

1A67 

0 

6ETCADR 

XCH 

*6623 

0 

5723 

1 


TC 


NASA L021106-021 


PAGE 117 


DEC At I9S£> 


USER'S O^jN page no. 

blTlA 

WAITLIST 

LONGCYCL 

LT5KOV 

LONGEXIT 


callcadr 

BANKJUMP 


(MAIN) 

7 


^b^;>78A YUU system FOR AGc^: REVISION 0 OF P=?3GRAM 50LRUM55 BY 


L WAITLIST 


PO107 


enters Here on T3 rupt to dispatch waitlisted 


0188 

ref 

3 

LAST 

1 17 



2177 


5ETLDC 

0189 

REF 

28 

LAST 

109 

2nt 

3 

0015 

0 

T3RUPT 

XCH 

0190 

REF 

1 



2200 

5 

0030 

1 


TS 

0191 

REF 

16 

LAST 

97 

2201 

3 

003A 

0 


XCH 

0192 

REF 

1 



2202 

5 

0031 

0 


TS 

0193 

REF 

A5 

LAST 

116 

2203 

A 

5501 

1 

T 3 RUPT 2 

cs 

019A 

REF 

2 

LAST 

16 

220A 

5 

05 71 

1 


TS 

0195 

REF 

3 

LAST 

112 

2205 

3 

0037 

0 


XCH 

0196 

REF 

80 

LAST 

1 16 

2206 

5 

0001 

0 


TS 

0197 

REF 

3 

LAST 

82 

2207 

3 

A52U 

1 


CAP 

01973 

REF 

IT 

LAST 

115 

2210 

3 

0560 

1 


XCH 

01976 

REF 

18 

LAST 

iia 

2211 

3 

0557 

0 


XCH 

0198 

REF 

19 

LAST 

US 

2212 

3 

0556 

1 


XC-( 

0199 

REF 

20 

LAST 

118 

2213 

3 

0555 

1 


xch 

0200 

REF 

21 

LAST 

118 

221^ 

3 

055A 

0 


xch 

0201 

ref 

22 

LAST 

118 

2215 

3 

0553 

1 


XCH 

0202 

REF 

23 

LAST 

118 

2216 

3 

0552 

0 


XCh 

0203 

REF 

10 

LAST 

116 

221 T 

6 

AA76 

0 


AD 

020A 

REF 

81 

LAST 

118 

2220 

6 

0001 

0 


AD 

0205 

REF 

87 

LAST 

115 

2221 

5 

0000 

1 


TS 

0206 





2222 

0 

2226 

0 


TC 

0207 

ref 

3 

last 

lie 

2223 

3 

0571 

1 


XCH 

0208 

REF 

39 

LAST 

ll6 

222A 

3 

A516 

1 


CAF 

0209 

REF 

A 

LAST 

118 

2225 

3 

0571 

1 


XCH 

0210 

REF 

A 

LAST 

118 

2220 

3 

0037 

0 

♦ A 

XCH 

0211 

REF 

88 

LAST 

1 18 

2227 

1 

0000 

0 


^ 

0212 

REF 

AO 

LAST 

118 

2230 

3 

A5 1 6 

1 


CftF 

0213 

ref 

5 

LAST 

118 

2231 

6 

00 37 

0 


AD 

021A 

REF 

1 



2232 

0 

2272 

1 


TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 118 


USER’S OWN page NO. 8 


TASK. 


WAITLIST +A 

bankReg 

BANKRUPT 

OVCTR 

OVRJPT 


ZERO 

RUPTAGN 

times 

0 


NEGl/2 
LSTl *6 
LSTl +5 
LSTl +4 
LSTl +3 
LSTl +2 
LSTl +1 
LSTl 
POSMAX 
0 
A 

♦ A 

RUPTAGN 

ONE 

RUPTAGN 

TIME3 

A 

ONE 

TIMES 

XTRAINC 


BACK TO FF. 

time 3 Overflow interrupt program 

1. pick UP contents OF THE OVERFLOW 
AND SAVE IN OVRUPT FOR ENTIRE T 3 RUPT, 

StT RUPTAGN TO -0 INITIALLY, AND SET 
Ti TO -0 WHILE wE MAKE UP ITS NEW 

contents so we can detect an increment 
ogcuring in the process. 


3, MOVE UP LSTl CONTENTS, ENTERING 
A VALUE OF 1/2 +1 AT THE BOTTOM 
FOR T6-T5» corresponding TO THE 
interval 81.93 SEC FOR ENDTASK. 

A. SET T3 = 1*0 - T2 -T USING LIST 1. 
SAMPLED T3. 

See if new T3 has overflow, if so, next 

TASK IS DUE THIS T3 RUPT AND SET RUPTAGN 

accordingly. 


T3 is almost always -0 UNLESS AN 

liKREMENT OCCURRED IN WHICH CASE WE MUST 
Al^O it to THE NEW Tb, 


^8^5>7HA YUL system KOR AGcA: REVISION 0 Of- PROGRAM SOLRUMSS BY 


L WAITLIST 


0215 

REF 

2 

LAST 

112 

2233 

4 

2260 

0 T3D5P 

C5 

02153 

REF 

9 

LAST 

112 

2 23 A 

3 

0570 

0 

XCA 

02156 

REF 

10 

LAST 

119 

2235 

3 

056 7 

0 

XCH 

0216 

REF 

11 

LAST 

119 

2236 

3 

0566 

1 

XCH 

0217 

REF 

12 

LAST 

119 

2237 

3 

0565 

1 

xCh 

0210 

REF 

13 

LAST 

119 

22AO 

3 

0564 

0 

xch 

0219 

REF 

lA 

LAST 

119 

22A1 

3 

0563 

1 

XCH 

0220 

REF 

15 

LAST 

119 

22A2 

3 

0562 

0 

XCa 

0221 

REF 

16 

LAST 

119 

22A3 

3 

0561 

0 

XCH 

0222 

ref 

29 

Last 

118 

22aA 

5 

0015 

0 

T5 

0223 

REF 

1 



2245 

5 

057/ 

1 

TS 

022A 

REF 

1 



2246 

7 

266/ 

0 

MAS< 

0225 

REF 

89 

LAST 

118 


1 

0000 

0 

r r* c 

0226 





2250 

0 

2252 

0 

TC 

0227 

REF 

2 

LAST 

Il9 

2251 

0 

0577 

1 

TC 

0228 

REF 

3 

LAST 

Il9 

2252 

3 

0577 

1 

XCH 

0229 

REF 

9 

LAST 

109 

2253 

7 

4606 

1 

MASK 

0230 

REF 

90 

LAST 

119 

2254 

2 

0000 

0 

INDEX 

0231 





2255 

0 

6000 

1 

TC 


R0232 

Return* 

after 

execution 

OF ilME3 

overflow TASK. 


0233 

REF 

5 

LAST 

118 

2256 

1 

0571 

0 

TASkOvER 

IF* C 

W ^ O 

0234 

REF 

1 



2257 

0 

2203 

1 


TC 

0235 

REF 

1 



2260 

67774 

1 

ENDTASK - 

■CAOR 

0236 





2261 

76000 

0 

BANKMASK 

DCT 

0237 

REF 

2 

LAST 

llB 

2262 

3 

0U31 

0 

OVRESUME 

XCH 

0238 

REF 

17 

LAST 

1 18 

2263 

5 

003^ 

0 


TS 

0239 

ref 

2 

LAST 

118 

2264 

3 

0030 

1 

RESUME 

XCH 

0240 

REF 

30 

LAST 

119 

2265 

5 

0015 

0 


T5 

0241 

ref 

7 

LAST 

35 

2266 

3 

0027 

1 

NBRESUME 

XCH 

0242 

REF 

82 

LAST 

118 

2267 

5 

0001 

0 


TS 

0243 

REF 

7 

LAST 

35 

2270 

3 

0026 

0 


XCH 

0244 





2271 

2 

0025 

1 


RESUM 

R0245 



FINISH UP RARE 

EVENT 

OF 

extra 

increment 

TO T3 

0246 

ref 

6 

LAST 

118 

2272 

5 

003 7 

0 

XTRAINC 

TS 

0247 

REF 

1 



2273 

0 

2233 

1 


TC 

0248 

REF 

6 

LAST 

119 

2274 

5 

0571 

i 


T5 

0249 

REF 

2 

LAST 

119 

2 2 75 

0 

2233 

1 


T C 


NASA 1021108-021 


DEC 1966 


(MAIN) PAGE 119 



user *5 OWN page no. 9 

ENDTASK 

LST2 *7 

LST2 +6 

LST2 *5 

LST2 +4 

LST2 +3 

LST2 +2 

entering the ENDTASK AT BOTTOM. 

LST2 +1 

L5T2 

9. PICK UP TOP task on LIST 

BANKREG 

ITEMPl 

70K 

A 

Switch banks if necessary 

+ 2 

ITEMPl 

ITEMPl 

LOW 10 

A 

6000 

IF + 


RUPTAgN 

T3RUPT2 

SVCT3 

76000 

IF ♦! RETURN TO T3RUPT* IF -0 RESUME. 
DiSPATCH NEXT TASK IF IT WAS DUE. 

OVRUPT 

OVCTR 

OVCIR RESTORE AND BANKREG RESTORE, 

BANKRUPT 

BANKREG 

STANDARD BANK-SWITCH RESUME. 

QRUPT 

Q 

ARUPT 

NQ-BANK-SWITCH RESUME. 


TIME3 

T3USP 

RUPTAGN 

T3DSP 

USUAL CASE. 

even more rare - the next TASK IS DUE 
THIS T3RUPT, 


^b^b7aA YUL SYSTEM FOR AGC«>; REVISION 0 Of- PROGRAM SOLRUMSS BY NASA 1021108-021 


DEC 1966 (MAIN) PAGE 120 


L RESTART CONTROL USER»S OWN PAGE NO. 1 


0001 








2276 

aAM< 

1 


R0002 

OF the phase 

table 

IN 

AL'^OST 

CONTSTANt 

agreement, calling sequences 

are A6 Follows: 

AOOOA 










TC 

PHASCHNG 

CHANGE GROUP G TO PHASE PPP (127 MAX). 

A00U5 










OCT 

PPPOG 

(gall under executive ONLY) 

AOOOb 










CAF 


CHANGE GROUP G TO THE PHASE ARRIVING IN 

A0007 










TC 

NewPHASE 

A (MAY BE called ANYTIME). 

Aoooe 










OCT 

OOOOG 


Ro009 



IN ! 

each case 

the old 

phase is 

Returned to tHe < 

caller in a. 

IF the old phase was +0* Control is 

ROOi 1 

given 

TO 

' A routine 

specified 

IiM 

A CADR 

table, this routine may exit 

OR Return to calleR via swreturn. 

0013 

REF 

83 

last 

119 


22 It 

3 

0001 

0 

phaschng xch 

Q 


OOIA 






2 27 ? 

2 

0017 

0 

I SIHINT 



0015 

REF 

1 




2 300 

5 

0642 

I 

T5 

RUPTREG4 


0016 

REF 

91 

LAST 

119 


2301 

2 

0000 

0 

INDEX 

A 


0017 






2302 

3 

0000 

1 

caf 

0 


0018 

REF 

1 




2303 

5 

0601 

0 

ts 

PhASDATA 


0019 

REF 

1 




230‘* 

7 

3220 

0 

MA5< 

LOWS 

(MAY want more groups SOME DAY) 

0020 

REF 

2 

LAST 

120 


2305 

3 

0601 

0 

XCH 

PHASDATA 


0021 






230b 

2 

577 7 

1 

EXTEND 



0022 

REF 

1 




2307 

4 

2311 

1 

MP 

-bIT9 

NOTE LP NOT SAVED. 

0023 

REF 

1 




2 310 

0 

2321 

0 

TC 

PHASCH2 


002A 






231 1 

77377 

1 

-6119 OCT 

-400 


0025 






2312 

2 

0017 

0 

NEWPHASE inhint 



0026 

REF 

84 

LAST 

120 


2313 

3 

0001 

0 

XCH 

Q 


0027 

REF 

2 

LAST 

120 


2314 

5 

0642 

1 

TS 

RUPTREG4 


0028 

REF 

92 

LAST 

120 


2315 

2 

0000 

0 

index 

A 


0029 






2316 

3 

0000 

1 

CAF 

0 


0030 

REF 

3 

LAST 

120 


2 317 

5 

0601 

0 

TS 

PHASDATA 


0031 

REF 

85 

LAST 

120 


2320 

4 

0001 

1 

cs 

Q 


0032 

REF 

4 

LAST 

120 


2321 

2 

0601 

1 

PHASCH2 index 

PHASDATA 


0033 

REF 

1 




2322 

5 

0655 

1 

TS 

-PHASEl - 1 

PHASEl IS FOR PROG NUM 1. 

003A 






2323 

A 

0000 

0 

COM 



0035 

REF 

5 

LAST 

120 


2324 

2 

0601 

1 

INDEX 

PhASDATA 


0036 

REF 

1 




2 325 

3 

064 7 

1 

XCH 

PHASEl - 1 

INTO PHASEl FOR PROG 1. 

0037 

REF 

93 

LAST 

120 


2326 

1 

0000 

0 

CCS 

A 


0038 






2327 

0 

2332 

1 

TC 

♦3 


0039 

REF 

1 




2330 

0 

2341 

0 

TC 

UPT 

ON +0. 

OOaO 

ref 

14 

LAST 

99 


2331 

4 

5503 

0 

CS 

TWO 

-1 IS INACTIVE state 

OOAl 

REF 

4l 

LAST 

118 


2332 

6 

4516 

1 

♦ 3 AD 

ONE 


00^*2 

REF 

3 

LAST 

120 


2333 

3 

0642 

1 

PHASEXIT XCH 

RUPTREG4 




BAb78A 

YUL 

SYSTEM FOR A6C4: 

REVISION 

0 

OF PROGRAM 

SOLRUM55 By 

NASA 1021108-021 

DEC 4, 1966 


restart 

control 







USER'S OWN page NO. 

00A3 

REF 

42 

LAST 

uo 

2334 

6 

45 1 6 

1 

AO 

ONE 



R£F 

66 

LAST 

120 

2335 

5 

0001 

0 

15 

G 

WL MUST RELINT BEFORE 

004b 

REF 

4 

LAST 

120 

2336 

3 

0642 

1 

XCH 

RUPTREG4 

OLO PHASE BITS, 

004 6 





2 337 

2 

0016 

I 

relini 



0047 

REF 

87 

LAST 

121 

2340 

0 

0001 

0 

TC 

Q 


0048 

REF 

6 

last 

120 

2341 

2 

0601 

1 UPT 

INDEX 

PhASOATA 


0049 

REF 

1 



2342 

3 

6651 

0 

CAF 

UPTCADR -1 


0050 

REF 

2 

LAST 

73 

2 343 

0 

5662 

0 

TC 

5WCALL 


0051 

REF 

46 

LAST 

1 18 

2344 

3 

5501 

0 

CAP 

2ER0 

IF RETURN 

0052 

REF 

1 



2345 

0 

2333 

0 

TC 

PhASEXiT 



(MAIN) 


page 121 


^b^!>78A YUL SYSTtM FOR AGCA: RtVibloN u OF PROGRAM SOLRUM55 BY RASA 1021108-021 


DEC 1966 


(MAIN) PAGE 122 


L RESTART CONTROL 


USER’S OWN PAGE NO. 3 


P0053 MAJOR mode LIGHT MAINTENANCE ROUTINES, 

Rqosa routine to chec< ejualitv Between the major mode display and tHe argument at caller +1, Returns to 


ROOS6 

CALLER 

+ 2 IF 

NOT AND 

CALLER +3 


IF SO. 





0057 

REF 

A3 

last 

121 

2 3 A b 

3 

A516 

1 

checkmm 

CAP 

ONE 

oose 

REF 

88 

LAST 

121 

23A7 

6 

0001 

0 


AD 

0 

0059 

REF 

89 

LAST 

122 

2350 

3 

0001 

0 


XCH 

Q 

0060 

REF 

9A 

LAST 

120 

2351 

2 

0000 

0 


index 

A 

0061 





2352 

A 

0000 

0 


C5 

0 

0062 

REF 

1 



2353 

6 

0612 

1 


AO 

MODREG 

0063 

REF 

95 

last 

122 

235A 

1 

0000 

0 


CCS 

A 

006 A 

REF 

90 

LAST 

122 

2355 

0 

0001 

0 


TC 

Q 

0065 





2 356 


0001 f 

1 

FINEMA5K 

OCT 

17 

0066 

REF 

91 

LAST 

122 

235 1 

0 

0001 

D 


TC 

0 

0067 

REF 

92 

LAST 

122 

2360 

2 

0001 

1 


I NOEX 

0 

0068 

REF 

93 

LAST 

122 

2361 

0 

0001 

0 


TC 

u 


R0069 to update THE MAJOR MODE LIGHTS? 


00 IQ 

REF 

9A 

LAST 

122 

2362 

2 

0001 

1 NEWMODE 

INDEX 

Q 


0071 





2363 

3 

0000 

1 

CAF 

0 


0072 

REF 

2 

LAST 

122 

236H 

5 

06l2 

1 

T5 

MODREG 


0073 

REF 

1 



2365 

3 

331A 

1 

CAF 

GRABUSY +1 

CaDR OF BANK CONTAINING DSPMM 

007A 

REF 

31 

LAST 

119 

2366 

3 

0015 

0 

XCH 

BANXREG 


0075 

REF 

155 

LAST 

105 

2367 

5 

0116 

1 

T5 

MPAC +1 

MPAC5 NOT USED BY DSPMM. 

0076 

REF 

95 

LAST 

122 

2370 

3 

0001 

0 

XCH 

0 


0077 

REF 

156 

LAST 

122 

2371 

5 

0115 

1 

T5 

MPAC 


0078 

REF 

1 



2372 

0 

6003 

1 

TC 

DSPMM 


0079 

REF 

157 

LAST 

122 

2373 

3 

0116 

1 

XCH 

MPAC +1 


0080 

REF 

32 

LAST 

122 

23 74 

5 

0015 

0 

T5 

BANXREG 


OObl 

REF 

158 

LAST 

122 

23 75 

2 

0115 

0 

INDEX 

MPAC 


0082 





2376 

0 

0001 

0 

TC 

I 





I ^ ■ A 1 


1 iWfttf 



<*b4t)78A YUL SYSTEM FOR AGC4: REVISION 0 Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 


1966 (MAIN) PAGE 123 


L RESTART CONTROL U5£R*S OWN PAGt NO. A 

pgosA program prgstall is An EXECJTivE interlock routine. Requesting progs do 

ROOtiS TC BANKCALL 

ROOB6 CADR PRoSTALL 

RU087 return IS TO L+2 AFTER TWO PROGS HAVE CALLED. 


OOBR 






0^ 1 66 2 ^ 


3 ASK 

4 

U08 9 





04 * 6 624 

2 

001 7 

0 

PRGSTALL 

ISIHINT 


0090 

REF 

10 

LAST 

78 

04t6625 

4 

0645 

1 


CS 

STATE 

0091 

REF 

1 



04.6626 

7 

4516 

0 


MASK 

PRGBIT 

0092 

REF 

96 

LAST 

122 

04.6627 

5 

0001 

0 


T5 

Q 

0093 

REF 

2 

LAST 

123 

04*6630 

4 

45l6 

0 


C5 

PRGBIT 

009A 

REF 

IL 

LAST 

123 

04.6631 

7 

0645 

1 


MASK 

STATE 

0095 

REF 

97 

last 

123 

04.6632 

6 

0001 

0 


A 0 

U 

0096 

REF 

12 

LAST 

123 

04,6633 

5 

0645 

0 


TS 

STATE 

0097 

REF 

98 

LAST 

123 

04,6534 

1 

OQOl 

1 


CCS 

Q 

0098 

REF 

1 



04.6635 

0 

6642 

1 


TC 

PRGSLEEP 

0099 

REF 

1 



04 .6636 

3 

6651 

0 


CAF 

LPRGRET 

0100 

REF 

1 



04,6637 

0 

2060 

0 


TC 

JOBwAKE 

0101 





04 . 6640 

2 

0016 

1 


RELINT 


0102 

REF 

1 



04 * 6 54 1 

0 

5702 

1 


TC 

SWRETURN 

0103 

REF 

1 



04 . 6642 

0 

5 706 

0 

PRGSLEEP 

TC 

MAKECADR 

OlOA 

REF 

81 

LAST 

105 

04,6543 

3 

0062 

u 


XCH 

ADDRWD 

0105 

REF 

159 

LAST 

122 

04 . 654h 

5 

0117 

0 


TS 

HP AC +2 

0106 

REF 

2 

LAST 

123 

04 . 6 645 

3 

665 1 

0 


CAF 

LPRGRET 

0107 

REF 

2 

LAST 

109 

04 . 664o 

0 

2127 

1 


TC 

jobsleep 

OlOB 

REF 

160 

LAST 

123 

04.664 7 

3 

0117 

0 

PRCRET 

XCH 

MPAC +2 

0109 

REF 

2 

LAST 

117 

04.6550 

0 

5723 

1 


T 

■ w 

BANKJUMP 

0110 

REF 

1 



04,6551 


1064 7 

0 

LPRGRET 

CAOR 

PRGRET 

0111 

REF 

2 

LAST 

46 



4516 

PRGBIT 

E3JALS 

biTi 

0112 





04.6652 


10652 

1 

UPTCADR 

cadr 



^»b^b7HA YUL SYSTEM FOR AGCA: REVISION o Oh PROGRAM SOLRUMSS BY 


L Restart control 


P0U3 



pinball 

COMES TO MUDROUT ON 

RECEIVING 

the ne^ 

Rons 

ON ARRIVAL. 








0116 





04.6553 

2 

0017 

0 

MODROUT 

1 MH I NT 

0117 

REF 

2 

LAST 

104 

04,6654 

6 

4341 

0 


AO 

0118 

REF 

96 

LAST 

122 

04,6655 

1 

0000 

0 


CCS 

0119 

REF 

1 



04 ,6656 

0 

6703 

0 


TC 

ono 

REF 

13 

LAST 

116 

04,6657 

0 

3062 

0 


TC 

0121 

REF 

1 



04 , 6660 

0 

6670 

0 


rc 

0122 

REF 

1 



04 , 666 1 

0 

2346 

1 


TC 

0123 





04 ,6662 

00002 

0 


OCT 

012A 

REF 

2 

LAST 

124 

04,6663 

0 

6703 

0 


TC 

0125 

REF 

1 



04 , 6 66h 

3 

2150 

1 


CAF 

0126 

REF 

1 



04 , 6665 

0 

2046 

I 


TC 

0127 

REF 

1 



04 ,6666 

43262 

0 


CAOR 

0128 

REF 

1 



04,6667 

0 

2124 

1 


TC 

0129 

REF 

3 

LAST 

48 

04,6670 

6 

4335 

0 

ICHECK 

AO 

0130 

REF 

97 

last 

124 

04,6671 

1 

0000 

0 


CCS 

0131 

REF 

3 

LAST 

124 

04,6672 

0 

6 703 

0 


TC 

0132 

REF 

14 

LAST 

124 

04,6673 

0 

3062 

0 


TC 

0133 

REF 

4 

LAST 

124 

04,6674 

0 

6703 

0 


TC 

0134 

REF 

3 

LAST 

122 

04,6675 

1 

0612 

0 


CCS 

0135 

REF 

5 

LAST 

124 

04,6676 

0 

6703 

0 


TC 

0136 

REF 

1 



04,6677 

3 

4501 

1 


CAF 

0137 

REF 

2 

LAST 

124 

04,6700 

0 

2046 

1 


TC 

0138 

REF 

1 



04,6701 


42000 

1 


CAdR 

0139 

REF 

2 

LAST 

124 

04,6702 

0 

212h 

1 


TC 

01*+0 

REF 

1 



04,6703 

0 

3233 

0 

V37bAD 

TC 

0141 

REF 

3 

LAST 

124 

04,6704 

0 

2124 

1 


TC 


NASA 1021108-021 

dec 4, 1966 (MAIN) PAGE 124 


USER’S OrtN page no. 5 


MOLE Requested by verb 37 . the desired mode in is a 


NEG3 

A 

V37BAD 

CCSHOLE 

FUR FLIGHT 501, ONLY MODES 01 AND 03 MAY 
BE INITIATED BY VERB 37. 

ICHECK 

SEE IF 01 CALLED FOR, 

checkmm 

02 

V37BAD 

mode 03 Requested - demands mode 02 

PRESENTLY, 

PRI014 

FI NOV AC 

CHKOPT 

ENDOFJOB 

START OPTICAL CHECK, 

MINJSl 

A 

V37BAD 

CCSHOLE 

V376AD 

SEE IF 01 requested. 

modrec 

V37BAD 

PR1020 
r INOVAC 

TOPI 

ENDOFJOB 

DEMAND idle MODE, 


falton 

endofjob 


Illegal request. 


YUL System for AgC4; revision O of program SOLRUmSS by NASA 1021108-021 


DEC A* 1966 


(MAIN) page 125 


L 501 Restart tables and rojtines ustR'S own page no. 

ROOUl RESTART TABLES 
R00U2 --- 

R0003 THESE CONTROL ReStART OPERATION. 

ROOOA 


Rqoos 


...important... 


DO not MOVE THIS SECTION FROM BeSINNING OF BANK, DJL 


0006 

0007 

0008 

0009 

0010 

ROOil 

0012 

C0012 

0015 
C0015 

0016 

0017 

0018 
0019 


0020 

0021 

0022 

0023 


002A 

0025 

0026 
0027 

00271 

C00271 

002715 

C002715 

R0028 

R0029 

0030 

0031 

0032 

0033 

003A 

0035 

0036 





13*6000 


5ETL3C 



1 3 « 6000 

00000 

1 

wtdttab 

DfcC 



13*6001 

00000 

1 

wcadrtab 

CADR 



13*6002 

00000 

1 

PRIOTAB 

OCT 



13*6003 

00000 

1 

CADRTAB 

CADR 

ANY 

JOB 1 

restarts should go 

hefe. 






13*600A 

00000 

1 

2.1SP0T 

2DEC 



13*6005 

00000 

1 





13*6006 

00000 

1 


2DEC 



13*6007 

00000 

1 





13*6010 

00000 

1 

2. 2 SPOT 

OCT 



13*6011 

00000 

1 


DCT 



13.6012 

12000 

1 


Dcr 

REF 

1 

13*6013 

6662 1 

1 


CADR 



13.6014 

00000 

1 

2.3SPOT 

DCT 



13*6015 

00000 

1 


DCT 



13*6016 

12000 

I 


DCT 

REF 

1 

13*6017 

66412 

0 


CADR 



13*6020 

00000 

1 

2.4SP0T 

DCT 



13*6021 

00000 

1 


DCT 



13*6022 

12000 

1 


DCT 

REF 

1 

13*6023 

66404 

L 


CADR 



13*6024 

00000 

I 

2,5SP0T 

2DEC 



13*6025 

00000 

1 





13*6026 

00000 

1 


2DEC 



13*6027 

00000 

1 



ANY 

MORE 

GROUP 2 RESTART VALUES SHOULD 

GO here. 




13*6030 

77777 

0 

3.15P0T 

OCT 



13*6031 

77 77 7 

0 


DCl 

REF 

1 

13*5032 

01563 

0 


CADR 

REF 

1 

13*6033 

64066 

0 


CADR 



13*6034 

77777 

0 

3.2SPOT 

DCT 



13*6035 

77777 

0 


DCl 

REF 

1 

13*6036 

01572 

0 


CADR 


26000 

0 

0 

0 

0 


0.0 

0.0 


12000 

SOAK IN I T^ 


0 

0 

12000 

ATTIJOBl - 1 

0 

0 

12000 

ATTIJDB 



77777 
77777 
TROLL +1 
MON 1 TASK 

77777 

77777 

TTUMON 



SIART OF BANK 13. 

WAITLIST DT for RESTART l.o 
WAITLIST CADR. 

PRIORITY value. 

cmdr of current job 


2.1 restart 


RESTART 2,2 VALUES, 
PH1012 


2,3 restart 


RESTART 2, A 


2,5 RESTART, 


3,1 restart, 
CONTAINS DT 


>3 

V 



3.2 restart 


4«4i)78A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUM55 BY 


L SOL restart tables AND KDJTlNES 


0037 

REF 

1 

13f 603 1 

64250 

1 

CAOR 

0038 



1 3 » 6 Ohu 

OOOOU 

i 

dct 

0039 



13t604l 

00000 

1 

OCT 

oo«+o 



1 3 » 60*t2 

77777 

D 

OCT 

OOi^l 

REF 

1 

13 tSOAS 

64771 

1 

CADR 

OOA 2 



1 3 » 6 044 

01274 

1 

DEC 

00^*3 

REF 

1 

13»6045 

65110 

1 

CAOR 

OOhA 



13»6046 

00000 

1 

OCT 

OO^tS 



13*6047 

00000 

1 

DCT 

OOA6 



13*6050 

02032 

1 

DEC 

O0A7 

ref 

1 

13*6051 

65124 

0 

CAOR 

00A8 



13*6052 

00000 

1 

OCT 

00A9 



13*6053 

00000 

1 

OCT 

0050 



13*6054 

02063 

0 

DEC 

0051 

REF 

1 

13*6055 

65135 

0 

CAOR 

0052 



13*6056 

00000 

1 

OCT 

0053 



13*605 / 

ooooo 

1 

OCT 

005A 



13*6060 

00113 

1 

DEC 

0055 

REF 

1 

13*6061 

31550 

0 

CAOR 

0056 



13*6062 

OOOOO 

I 

OCT 

0057 



13*6063 

ooooo 

1 

OCT 

0058 



13*6064 

00310 

0 

DEC 

0059 

REF 

1 

13*6065 

65121 

0 

CAOR 

0060 



13*6066 

OOOOO 

1 

OCT 

0061 



13*606 7 

OOOOO 

1 

OCT 

0062 



13*6070 

ooooo 

1 

OCT 

0063 



13*6071 

ooooo 

1 

OCT 

0064 



13*6072 

77777 

D 

OCT 

0065 

REF 

1 

13*6073 

65070 

0 

CAOR 

0066 



13*6074 

OOOOO 

1 

OCT 

0067 



13*6075 

OOOOO 

1 

OCT 

0068 



13*6076 

27000 

1 

OCT 

0069 

REF 

1 

13*607 7 

67060 

0 

CAOR 

0070 



13*6100 

00764 

1 

DEC 

00 71 

REF 

1 

13*6101 

67260 

1 

caor 

0072 



13*6102 

OOOOO 

1 

OCT 

0073 



13*6lU3 

OOOOO 

1 

OCT 

0074 



13*6104 

01750 

1 

3.12SP0T DEC 

0075 

REF 

1 

13*6105 

67342 

0 

CAOR 

0076 



13*6106 

20000 

0 

OCT 


NASA 1021108-021 


DEC A, 1966 


IMAIN) PAGE 126 


TUMBTSKl 

USER'S Own page no, 2 

0 

0 

77777 

REDD3,3 

3,3 restart 

700 

GIMPOWOF 

0 

0 

3,4 RESTART, 

1050 

DVMODOFF 

0 

0 

3,5 restart 

1075 

ATTCONON 

0 

0 

3.6 RESTART. 

75 

CGTASK 

0 

0 

3,7RESTART 

200 

GMP0FF3 

0 

0 

3,8 restart. 

0 

0 

77777 

SETM0D23 

3,9 REATART, 

0 

0 

27000 

SHUTJOB 

3,10 REST ART , 

500 

CDUXTA5< 

0 

0 

3,11 RESTART. 

5SECS FROM TBASE3 

1000 

CM/SMT5< 

20000 

3,12 RESTART, 

1U5ECS FROM TBASE3 


ABASTbA 

YUL 

SYSTEM FDR AGC4: REVISION 0 

OF PP 

L 

501 

RESTART tables AND RDJTINLS 

00 n 

REF 

1 


13i6107 

67274 

00 76 




13.6110 

01750 

0079 

REF 

2 

LAST 

126 13.6111 

67342 

U060 




13.6112 

20000 

0081 

REF 

1 


13.6113 

67330 

0082 




13.6114 

01750 

0083 

REF 

3 

LAST 

127 13.6115 

67342 

008A 




13.6116 

00000 

0085 




13.6117 

00000 

0086 




13.6120 

02734 

OOB7 

REF 

1 


13.6121 

67355 

0088 




13.6122 

00000 

0089 




13.6123 

00000 

0090 




13.6124 

00000 

0091 




13.6125 

00000 

0092 




13.6126 

15000 

0093 

REF 

1 


13.6127 

63515 

009A 




13.6130 

00000 

C0094 




13.6131 

00000 

0095 




13.6132 

20000 

0096 

REF 

1 


13.6133 

42142 

0097 




13.6134 

00000 

C0097 




13.6135 

00000 

0098 




13.6136 

20000 

0099 

REF 

1 


13.6137 

42151 

0100 




13.6140 

00000 

COlOO 




13.6141 

00000 

0101 




13.6142 

20000 

0102 

REF 

1 


13.6143 

42266 

0103 




13*6 144 

00000 

C0103 




13.6145 

00000 

0104 




13.6146 

77777 

0105 

REF 

1 


13.6147 

42216 

0106 




13.6150 

00062 

0107 

REF 

1 


13.6151 

42262 

0108 




13.6152 

2lOOO 

0109 

REF 

2 

LAST 

127 13.6153 

42266 

01095 




13.6154 

00062 

0110 

REF 

2 

LAST 

127 13.6155 

42262 

0111 




13.6156 

00000 

COl 11 




13.615? 

00000 


1 

0 

0 

0 

1 

0 

1 

1 

0 

0 

1 

1 

1 

I 

0 

0 

1 

I 

0 

0 

I 

1 

0 

I 

I 

I 

0 

0 

1 

I 

0 

I 

0 

I 

1 

0 

0 

I 

I 

I 


3.15SP0T 


3. 16 SPOT 


cadr 


DEC 

CADR 

OCT 

cadr 

DEC 

cadr 

OCT 

OCT 

DEC 

CADR 

OCT 

OCT 

OCT 

OCT 

OCT 

CADR 


3,l7SPOT 2DEC 

OCT 

CADR 

2DEC 

OCT 

CADR 

2DEC 

OCT 

CADR 

2DEC 

OCT 

cadr 

DEC 

cadr 

OCT 

CADR 

DEC 

cadr 

2DEC 


NASA 1021108*-021 


DEC A* 1966 (MAIN) PAGE 127 


USER’S O^N page no. 3 


CDUXJO0 


1000 

CM/SMTS< 

20000 

RED03.13 

3.13 

RESTART. 


1000 

CM/5MTS< 

0 

0 

3.14 

RESTART. 


1500 

LNTATASX 

0 

0 

3.15 restart 

155ECS FROM TBASE3 

0 

0 

15000 

PREHUNT 

3.16 

Pkio 

RESTART, 

TO REDO 

huntest. 

0 

3.17 

restart. 

...PRELAUNCH 

20000 

REPLll 




0 

3.18 

RESTART. 

...PRELAUNCH 

20000 

REPL12 




0,0 

3. 19 

RESTART 

...PRElAUNCH,. 

20000 

RED03,21 




0 

3.20 

RESTART, 

...PRLLAUNCH 

77777 

REDD3.20 




50 

3.21 

restart. 

...PRELAUNCH. 


REPRELAL 

21000 

RED03.2L 


SO 

REPRELAL 

0.0 


3.22 RESTART 


PRELAUNCH 


^ti^l378A YUL SYSTEM KOR AGC<>; REVISION 0 Oh PROGRAM SOLRUM55 BY 


501 RESTART TABLES AND ROJTINeS 


01111 





13 « 6160 

00310 

0 

3.23SP0T 

DEC 

01112 

ref 

1 



1 3 t 6 1 6 1 

67166 

1 


CADR 

01113 





13*6162 

00000 

1 


ZDEC 

CUl 1 13 





13*6163 

00000 

1 



on u 





13«6l6A 

00536 

1 

3.24SP0T 

DEC 

01115 

REF 

1 



13*6165 

67177 

1 


CADR 

01116 





13*6 166 

00000 

1 


ZDEC 

coil 16 





13*6167 

00000 

1 



01117 





13*6170 

01046 

1 


DEC 

01118 

REF 

2 

LAST 

128 

13*6171 

67177 

1 


CADR 

01119 





13*6172 

00000 

1 


ZDEC 

C01119 





13*6173 

00000 

1 



R0112 

ANY 

MORE GROUP 3 

Restart values should 

GO here. 


01121 





13*617A 

OOOOQ 

1 


ZDEC 

C01121 





13*6175 

00000 

I 



01122 





13*6176 

05000 

1 


OCT 

01123 

REF 

1 



13*6177 

64074 

0 


CADR 

01 12A 





13*6200 

00000 

1 


2DEC 

COl 12A 





13*6201 

00000 

1 



01125 





13*6202 

77777 

0 


OCT 

01126 

REF 

2 

LAST 

126 

13*6203 

64250 

1 


CADR 

R0113 



ANY 

MORE 

GROUP 3 restarts GC 

IN HERE 


OllA 





13*620A 

00000 

1 

4*1SP0T 

OCT 

0115 





13*6205 

00000 

1 


OCT 

0116 





13*6206 

34000 

0 


OCT 

0117 

REF 

1 



13*6207 

66202 

1 


CADR 

0118 





13*6210 

77777 

0 

4.2SP0T 

OCT 

01 19 





13*6211 

77777 

0 


OCT 

0120 

REF 

1 6 

LAST 

ll6 

13*6212 

01461 

0 


CADR 

0121 

REF 

1 



13*6213 

64710 

0 


CA'DR 

0122 





13*6214 

02032 

1 

4.3SP0T 

DEC 

0123 

REF 

1 



13*6215 

50114 

0 


CADR 

Q12A 





13*6216 

77777 

0 


OCT 

0125 

REF 

1 



13*6217 

65022 

1 


CADR 

0126 





13*6220 

77776 

1 

4,4SP0T 

20EC 

C0126 





13*6221 

45317 

0 



0127 





13*6222 

00000 

1 


ZDEC 

C0127 





13*6223 

00000 

I 



0126 





13*6224 

34^+30 

I 


DEC 

0129 

ref 

1 



13*6225 

50154 

1 


CADR 

0130 





13*6226 

00000 

1 


ZDEC 

C0130 





13*6227 

00000 

1 



0131 





13*6230 

77777 

0 


OCT 

0132 

REF 

1 



13*6231 

01556 

0 


CADR 


NASA 1021108-021 


DEC Af 1966 (MAIN) PAGE 128 



USER’S Own page no, 4 

200 

GMP0FF2 

0,0 

3.23 RESTART 

350 

DVM0D0F2 

0.0 

3,24 RESTART 

550 

DVM0DCF2 

0.0 

3.25 RESTART 

0,0 

05000 

MOMTJOB 

3,26 restart 

0,0 

77777 

TUMBTSKl 

3,27 RESTART 

0 

4.1 restart. 

u 

34000 

RtD04. 1 

HIGH PRIO. (WATCH THIS.) 

77777 

7 7777 

LONGTIME + 1 
ENG I NO FF 

4,2 REST Art ■ 

1050 

COASTPHS 

77777 

RLD04.3 

4,3 restart. 

-30000 

4.4 restart 

0 

l46l6 

f-DADFTSK 

0 

4,5 restart (DT s 146.16 SEC 
(310 - 163.8^ SEC.) 

77777 

TCOAST 

4 # 6 R t ST AR T 

TCOAST = time Form cutoff to uptask. 


YUL SYSTEM FOR AGC^r REVISION 0 Oh PROGRAM SOLRUMSS SY 


L 501 restart tables AND RQJtINES 


0133 





13 t 6232 

00000 

1 

20EC 

C0133 





13»6233 

00000 

1 


013A 





13t623A 

00000 

I 

OCT 

0135 





13 » 6235 

00000 

1 

OCT 

0136 





13»6236 

77777 

0 

OCT 

0137 

REF 

1 



13t6237 

50201 

1 

CAOR 

0136 





13t62A0 

2635*, 

1 

DEC 

0139 

REF 

1 



13*62hI 

50335 

1 

CAOR 

OlAO 





1 3 ♦ 62A2 

06000 

1 

OCT 

OIAI 

REF 

1 



13»62A3 

50225 

1 

CAOR 

01A2 





13»6ZAA 

2635A 

1 

DEC 

01A3 

REF 

2 

LAST 

129 

13f62A5 

50335 

1 

CAOR 

OlAA 





1 3 » 6 2 A6 

06000 

1 

OCT 

0 1 *tA 5 

REF 

1 



1 3 ♦ 62 A ? 

50322 

1 

CAOR 

01A5 





13,6250 

01130 

I 

DEC 

0IA6 

REF 

1 



13,6251 

6A511 

□ 

CAOR 

01A7 





13,6252 

77777 

0 

OCT 

01<*B 

REF 

1 



13,6253 

650A5 

0 

CAOR 

01A9 





13,625*, 

00310 

0 

OEC 

0150 

REF 

1 



13,6255 

6A025 

1 

CAOR 

0151 





13,6256 

00000 

1 

20EC 

C0151 





13,6257 

00000 

1 


0152 





13,6260 

00252 

1 

DEC 

0153 

REF 

1 



13,6261 

6A37A 

0 

CAOR 

015A 





13,6262 

25000 

0 

OCT 

0155 

REF 

1 



13,6263 

6A363 

0 

CAOR 

0156 





13,6 264 

23336 

0 

OEC 

0157 

REF 

1 



13,6265 

6A527 

0 

CAOR 

0158 





13,6266 

7777 7 

0 

OCT 

01585 

REF 

1 



13,6267 

6A761 

0 

CAOR 

0159 





13,6270 

01130 

1 

A.IASPOT OEC 

0160 

REF 

2 

LAST 

129 

13,6271 

6A511 

0 

CAOR 

0161 





13,6272 

77777 

0 

OCT 

0162 

REF 

1 



13,6273 

65062 

0 

CAOR 

0163 





13,62 ^A 

00372 

i 

DEC 

016A 

REF 

2 

LAST 

129 

13,6275 

6A527 

0 

CAOR 

0165 





13,6276 

25000 

0 

OCT 

0166 

REF 

1 



13,6277 

6AA7A 

1 

CAOR 

0167 





13,6300 

010A6 

1 

OEC 

0168 

REF 

3 

LAST 

129 

13,6301 

6A527 

0 

CAOR 

0169 





13,6302 

25000 

0 

OCT 

01 70 

REF 

1 



13,6303 

6A A AO 

0 

CAOR 


(MAIN) PAGE 129 


NASA 1021108-021 DEC A, l966 


USER'S O^N PAGE NO, 5 


0 

0 

77777 

UPTASK 

11500 

PREAVGON 

06000 

UPJOB 

11500 

PREAVGON 

06000 

KEDOA.9 


600 

GiMPOWON 
77777 
HEDOA, 10 

200 

TARGTASK 

0 

170 

abrtwait 

25000 

SETSASEP 


9950 

ATTCNOFF 

77777 


REDOA. 13 


GiMPOWON 

77777 

redoa.ia 


250 

ATTCNOFF 

25000 

AbORTRPT - 3 

' s 

\ 

550 

ATTCNOFF 
25000 
RtD0A,l6 



A, 7 restart 


A, 8 restart 


A. 9 restart 

A. 10 restart 

A , 1 1 restart • 

A. 12 RESTART. 
IN 1,7 SEC. 

A. 13 RESTART 
IN 95.5 SEC. 

A.IA RESTART, 


A. 15 restart. 

IN 2.5 SEC 

WATCH THIS LOC 

A. 16 restart 


4«4ti78A YUL SYSTEM FOR AGC4: REVISION 0 Of- PROGRAM SOLRUM55 BY 


L SOI restart tables and rojtines 


0 W1 





13,6304 

25U6U 

0 


DEC 

U172 

REF 

3 

LAST 

129 

13,6305 

64511 

0 


CADR 

0173 





13,6306 

00000 

1 


2DEC 

CO 173 





13,6307 

00000 

1 



0174 





13,6310 

00000 

1 


2DEC 

C0174 





13,6311 

00000 

1 



0175 





13,6312 

7777 7 

0 


OCT 

0176 

REF 

4 

LAST 

129 

13,6313 

6452 7 

0 


C4DR 

0177 





13,631** 

00031 

0 


DEC 

0178 

REF 

1 



13,6315 

64545 

1 


CAOR 

0179 





13,6316 

00000 

1 


20EC 

C0179 





13,6317 

00000 

1 



0180 





13,6320 

00062 

0 


DEC 

0161 

ref 

1 



13,6321 

64562 

1 


cadr 

0182 





13,6322 

00000 

1 


2 DEC 

C0lb2 





13,6323 

00000 

1 



0183 





13,6324 

01750 

1 

4,21SP0T 

DEC 

0184 

REF 

1 



13,6325 

64663 

0 


CADR 

0185 





13 ,6326 

25000 

0 


OCT 

0186 

REF 

1 



13,6327 

64423 

0 


cadr 

0187 





13,6330 

00000 

1 


20EC 

C0187 





13,6331 

00000 

1 



0188 





13,6332 

77777 

0 


OCT 

0189 

REF 

1 



13,6333 

64654 

1 


CADR 

0190 





13,633h 

00536 

1 


DEC 

0191 

REF 

2 

LAST 

128 

13,6335 

64 710 

0 


cadr 

0192 





13,6336 

77777 

0 


OCT 

0193 

REF 

1 



13,6337 

64633 

0 


CADR 

0194 





13,6340 

00000 

1 


20EC 

C0194 





13,6341 

00000 

1 



0195 





13, 6342 

77777 

0 


OCT 

0196 

REF 

4 

LAST 

130 

13,6343 

64511 

0 


cadr 

0197 





13, 6344 

02176 

0 


DEC 

0198 

REF 

5 

LAST 

130 

13,6345 

6452 7 

0 


cadr 

□ 199 





13,6346 

00000 

1 


2DEC 

C0199 





13,6347 

00000 

1 



0200 





13,6350 

00000 

1 

4,26SP0T 

2DEC 

C0200 





13,6351 

00000 

i 



0201 





13,6352 

12000 

1 


OCT 

0202 

REF 

1 



13,6353 

57101 

0 


cadr 

0203 





13,6354 

27340 

0 

4,275P0T 

DEC 

0204 

REF 

1 



13,6355 

5035 7 

0 


cadr 

0205 





13,6356 

00000 

1 


2DEC 

C0205 





13,6357 

00000 

1 



1 « i . 1 

. • 

r 

*; ■ 

» 

< - 

- i 

1 

* _ 1 ' 
A 1 ' ' ■* 
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10000 

GIMPORON 


0 


USER'S OWN page NO. 6 


4,17 RESTART 


4,18 REST AR T • 


77777 

ATTCNOFF 

lb 

D V MODEON 
0 


50 

ENGINEON 

0 

1000 

PLUSXOFF 

25000 

RED04.21 



ENG I NOFF 

77777 

STEEROFF 

0 

77777 

GIMPOWON 

1150 

ATTCNOFF 

0 

0 




4.19 RESTART . 

4.20 REST ART . 

4.21 RESTART 

4.22 RESTART, 

4.23 RESTART 

4.24 RESTART, 

4.25 RESTART 

4.26 RESTSRT, 


12000 


UPTHETAl 


12000 

AVGON 

0 



LUwERED, 


4,27 RESTART 

120 SEC FROM UPTAStC, 


YUL system FOR AGCO-: REVISION 0 OF PROGRAM SOLRUMS5 BY 


U 501 RESTART TABLES AND ROJTINeS 


02051 
C02051 
02U5 2 
02053 

REF 

020532 

02U534 

REF 

020536 

020538 

REF 

02054 

020542 

REF 

0205A4 

C020544 

020546 

C020546 

020548 

02055 

REF 

020552 

C020552 

020553 

020554 

REF 

020555 

C020555 

020556 

020557 

REF 

R0206 

ANY 

R0207 

0208 

0209 

REF 

0210 

C0210 

0211 

C0211 

0212 

0213 

REF 

0214 

0215 

REF 

0216 

0217 

REF 

0218 

0219 

REF 

0220 

0221 

REF 


1 

3 LAST 129 
1 

I 


1 


1 


3 LAST 130 
MORE GROUP 


L 


1 


2 LAST 131 
1 

3 LAST 131 


13*6360 

00000 

1 

4,28SP0T 

20EC 

1 3 » 6 3b 1 

00000 

1 



13 * 6 362 

77777 

0 


OCT 

13*6363 

64774 

1 


CADR 

13*6 364 

26354 

1 

4.29SP0T 

DEC 

13*6365 

50335 

1 


CAOR 

13*6366 

06000 

1 


DCT 

13*6367 

50263 

0 


CAOR 

13,63 70 

21450 

0 

4.30SP0T 

DEC 

13*6371 

50463 

0 


CAOR 

13,6372 

00000 

1 


20EC 

13*6373 

00000 

1 



13,6374 

00000 

1 

4,313P0T 

2oec 

13*6375 

00000 

1 



13*63 76 

7777 7 

0 


OCT 

13*6377 

64062 

1 


CAOR 

13, 6400 

00000 

1 

4,32SP0T 

20EC 

13*6401 

00000 

1 



13 ,6402 

77777 

0 


OCT 

1 3 * 6403 

64054 

1 


CAOR 

1 3 * 6 404 

00000 

1 

4,335P0T 

20EC 

13*6405 

00000 

1 



13,6406 

77777 

0 


DCT 

13*6407 

64710 

0 


CAOR 

4 RESTART VALUES SHOULD 

GO here. 


13*6410 

00310 

0 

5.1 SPOT 

DEC 

13*6411 

65226 

1 


CAOR 

I3*64i2 

00000 

1 


20EC 

13*6413 

00000 

1 



13*6414 

00000 

1 

5*2SPOT 

20EC 

1 3 * 64 i 5 

00000 

1 



13,6416 

77777 

0 


OCI 

13*6417 

65157 

1 


CAOR 

13*6420 

00310 

0 


DEC 

13*6421 

65226 

1 


CAOR 

13*6422 

17000 

1 


DCT 

13,6423 

65276 

1 


CAOR 

13*6424 

0031U 

0 


DEC 

13,6425 

65226 

1 


CAOR 

13*6426 

17000 

1 


DCT 

13*642 7 

61620 

L 


CAOR 


I 


NASA 1021108-021 


1966 


(MAIN) PAGE 131 


DEG A, 


USER’S OWN page no. 7 


0 


4,28 RESTART SAyES ENgIN OFF SEgUENCE 


77777 

SPSITEST 

11500 

PREAVGOM 

06000 

RED04,29 



RED04.32 , 
0,0 


7777 7 
LNGlNOFF - 


WHILE TBA5E4 UPDATED 

4.29 restart 

4.30 RESTART 

4.31 RESTART 

4.32 RESTART 

4.33 RESTART 


200 5,1 RESTART 

REREADAC 
0 

0 

77777 
REDOS, 2 

200 5,3 restart 

REREADAC 
17000 
RED05,3 


200 5.4 restart 

REREADAC 

17000 

REFA2E6 


YUL SYSTtM FOR AGC4S REVISION 0 OF PROGRAM 50LRUMS5 BY 


L 501 restart tables AND HOJrlNLS 


0222 





13*6430 

00310 

0 


DEC 

0223 

REF 

4 

last 

131 

13*6431 

65226 

1 


cadr 

0224 





13*6432 

17000 

1 


DC! 

0225 

REF 

1 



13*6433 

660 1 4 

1 


CAOR 

0226 





1 3 * 6434 

00310 

0 


DEC 

0227 

REF 

5 

LAST 

132 

1 3 *6435 

65226 

1 


CADR 

022R 





13 *6436 

35000 

1 


DCT 

0229 

REF 

1 



13*6437 

504 7 7 

0 


CA3R 

0230 





13*6 440 

00000 

1 

5,7SPOT 

2DEC 

C0230 





13*6441 

00000 

1 



0231 





13*6442 

inn 

0 


DCT 

0232 

REF 

1 



1 3 * 6443 

66676 

0 


CADR 

0233 





1 3 * 6444 

OO 3 IO 

0 


DEC 

0234 

REF 

1 



13*6445 

66666 

1 


CADR 

0235 





1 3 * 6 446 

14000 

1 


DCT 

0236 

REF 

1 



13*6447 

66713 

1 


CADR 

0237 





13*6450 

00310 

0 


DEC 

02 38 

REF 

2 

last 

132 

13*6451 

66666 

1 


cadr 

0239 





13*6452 

13000 

0 


DCT 

0240 

REF 

2 

last 

131 

13*6453 

61620 

1 


cadr 

02^*1 





13*6454 

00000 

1 


2DEC 

C0241 





13 * 6455 

00000 

1 



0242 





13 * 6456 

12000 

1 


DCT 

0243 

REF 

1 



13*6457 

66734 

1 


CADR 

0244 





1 3 * 6460 

00310 

0 


DEC 

0245 

REF 

3 

LAST 

132 

1 3 * 6461 

66666 

1 


CADR 

0246 





1 3 * 6462 

00000 

1 


2DEC 

C0246 





1 3 * 6 4 1> 3 

00000 

1 



0247 





13 * 6 464 

00310 

0 

5.125P0T 

DEC 

0248 

REF 

1 



13*6465 

56001 

0 


CADR 

0249 





1 3 * 6466 

00000 

1 


2DEC 

C0249 





13*6467 

00000 

1 



0250 





13*6470 

00000 

1 


2DEC 

C0250 





13*6471 

00000 

1 



0251 





13*6472 

77777 

0 


DCT 

0252 

REF 

1 



13*6473 

56011 

1 


CADR 

0253 





13*64 ?4 

00310 

0 


DEC 

0254 

REF 

2 

LAST 

132 

13*6475 

56001 

0 


CADR 

0255 





13*6476 

17000 

1 


DCT 

0256 

REF 

1 



13*6477 

56036 

1 


cajr 

0257 





13*6500 

OO 3 IO 

0 


DEC 

1 ft ib. 

0258 

REF 

3 

LAST 

132 

13*6501 

56001 

0 


CA jR 


f 
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NASA 1021100-021 


DEC l9t6 


(MAIN) page 132 


USER'S OWN PAGE NO, 6 


200 

REREADAC 

17000 

REDU5.5 

200 

REREADAC 

35000 

M0DE26 

0 

77777 
REDOS. 7 

200 

SOAKTSKl 

14000 

SOAiCJOB 

200 \ 
SOAKTSKl \ 
13000 

REFAZE6 J 
0 

12000 
REDOS. 10 

200 

SOAKTSICl 

0 

200 

REPiPUP 

0 

0 


77777 
REDOS. 13 

200 

REPIPUP 

17000 

ENTRYTOP + 3 
200 

REPIPUP 


5.5 restart, 

5.6 restart 

5.7 restart 

5.8 restart 

5.9 restart, 

5.10 restart* 

5.11 restart 

5.12 RESTART, 

5.13 restart. 

5.15 RESTART, 





^8^578A YUL system FOR AGC<t: REVISION 0 OF PROGRAM SOURUMSS BY 


L 

501 

restart tables 

AND RDJTINES 




0259 





13t65U2 

17000 

1 


OCT 

0260 

REF 

1 



13 1 6 50 3 

56052 

0 


CAOR 

0261 





l3t650A 

00310 

0 


DEC 

0262 

REF 

A 

LAST 

132 

13»6505 

560Q1 

0 


CAdR 

0263 





13*6506 

16000 

0 


OCT 

02bA 

REF 

3 

LAST 

132 

13*6507 

61620 

1 


CAOR 

0265 





13*6510 

00310 

0 


DEC 

0266 

REF 

5 

LAST 

133 

13*651 1 

56001 

0 


CAoR 

0267 





13*6512 

17000 

1 


OCT 

0268 

REF 

1 



13*6513 

56057 

0 


CAOR 

02b9 





13*651A 

00310 

0 

s.ieSPOT 

DEC 

0270 

REF 

6 

LAST 

133 

13*6515 

56001 

0 


CAOR 

0271 





13*651t> 

17000 

1 


OCT 

0272 

REF 

1 



13*6517 

56174 

0 


CAOR 

0273 





13*6520 

00310 

0 

5.19SP0T 

DEC 

027A 

REF 

7 

LAST 

133 

13*6521 

56001 

0 


CAOR 

0275 





13*6522 

17000 

1 


OCT 

0276 

ref 

1 



13*6523 

61441 

1 


CAOR 

02761 





13*652A 

00000 

1 

5.205P0T 

20EC 

C02761 





13*6525 

00000 

1 



02762 





13 *6526 

34000 

0 


OCT 

02763 

REF 

1 



13*6527 

13150 

1 


CAOR 

0276A 





13 * 6530 

00000 

1 

5.21SP0T 

DEC 

0276A5 





13.6531 

26531 

1 


CAOR 

02765 





13*6532 

00000 

1 


OCT 

02766 





13*6533 

26533 

0 


CAOR 

02767 





13 * 65 3A 

00000 

1 

5,225POT 

OEC 

027675 





13*6535 

26535 

0 


CAOR 

02768 





1 3 * 6 536 

00000 

1 


OCT 

02769 





13*6537 

26537 

1 


CAOR 

027691 





13*6 540 

00310 

0 

5.23SPOT 

0£ C 

027692 

REF 

6 

LAST 

132 

13*6541 

65226 

1 


CAOR 

027693 





13*6542 

17000 

1 


OCT 

02769A 

REF 

1 



13*6543 

65551 

0 


CAOR 

0277 





13*6544 

00310 

0 


OEC 

02771 

REF 

7 

LAST 

133 

1 3 * 6 545 

65226 

1 


CAOR 

02772 





13*6546 

17000 

1 


OCT 

02 773 

REF 

X 



13*6547 

55744 

0 


CAOR 

0277A 





13*6550 

00310 

0 


OEC 

02775 

REF 

8 

LAST 

133 

13.6551 

65226 

1 


CAOR 


NASA 1021108-021 


DEC l96fe 


PAGE 133 


(MAIN) 


17000 

REFAZE4 

USER’S OWN PAGE NO, 9 

200 

REPIPUP 

16000 

KEFA2E6 

5,16 

200 

REPIPUP 

17000 

REFAZE8 

5.17 RESTART, 

200 

REPIPUP 

17000 

REFA2E10 

5*18 restart 

200 

REPIPUP 

5.19 RESTART. (PIPUP IN 2 SEC.) 

17000 

NUM0DE63 

StTS MODE 63 AND FINISHES ENTRY INITIAL. 

0,0 

34000 

REDOS, 20 

5,20 RESTART FOR VERB 76 

0. 

5.21 RESTART IS SPARE 


0*0 

5.22 RESTART IS SPAKE 


200 

REREADAC 

17000 

REDOS. 23 

5.23 RESTART 

200 \ 

REREADAC 

17000 

REDOS. 24 / 

REDO POINT AFTER AVG STATE VECTOR UPDATE 


200 

REREADAC 


j 


48^b78A YUL SYSTEM FOR AGc^f; REVISION 0 OF PROGRAM SOLRUM55 BY 


L 501 RESTART TABLES AND ROUTINES 


02776 

02777 REF A LAST 133 


13*6552 17000 1 
13*6553 61620 1 


OCT 

CAOR 


R02778 


ANY MORE GROUP 5 RESTARTS GO HERE. 


RO270 

0279 


13*655^ 00000 I 6.15P0T DEC 


R0280 

R0281 any more group 6 RESTART VALUES SHOULD GO HERE. 
R0282 


0283 

028A 

REF 

1 

13*6555 

13*6556 

00000 
0 0000 

1 

1 

SIZETAB DE 

TC 

0285 

REF 

1 

13*6557 

0 0024 

1 

TC 

0286 

ref 

1 

13*6560 

0 0200 

0 

TC 

0287 

REF 

1 

13*6561 

0 0404 

1 

TC 

0288 

REF 

1 

13 1 6562 

0 0550 

1 

TC 


NASA 1021108-021 


DEC A, 


1966 


(MAIN) PAGE 134 


17000 

REFA2E6 


0 


0 

2.1SP0T 
3.1SP0T 
A*lSPOT 
5.1SP0T 
6. 1 SPOT 


USER'S OWN PAGE NO. 10 


6.L RESTART (UNDEFINED) 


0 INCREMENT FOR GROUP l. 


-26004 

IlKREMENT 

TO 

index 

GROUP 

2 

TABLE 

-26004 

INCREMENT 

TO 

INDEX 

GROUP 

3 


-26004 

INCREMENT 

TO 

INDEX 

GROUP 

4 

TABLE, 

-26004 

IiKREMENT 

TO 

INDEX 

GROUP 

5 

TABLE. 

-26004 

Il^tCRFMENT 

TO 

INDEX 

GROUP 

6 

table. 


4a^b78A YUL system for AGC4: REVISION 0 OF PROGRAM SoLRUMSS BY NASA 102U08-021 


dec At 1966 


(MAlNl PAGE I3b 


L 501 restart tables AND RDJTINeS USER’S OWN PAGE NO. U 

P02B9 generalized RESTART ROJTINE. 


R0290 

R0291 

ft0292 

R0293 

R029A 

R0295 

R0296 

R02y7 

R029e 

RU299 

R0300 

RU301 

R0302 


FOR each FAZeBIT VALUE t THE ASUMPTION 15 MADE THAT THeRe NAY EXIST 
ONE waitlist QR LQNGCALL TASK TO BE RECALLED. AND QNe CURRENT TASK OR 

JOB TO BE Restarted, (special restarts are possible for situations 
which DONoT fit the general form.) for THE GENERAL CASEt FOUR TABLES 

Are used 

(RATHER* one TABLE .^ITH ENTRIES PER FAZEBIT VALUE.) 

1, wtdttab. waitlist dt table* 

2, wcadrtab waitlist cadr table* 

3, PRIOTA0 current JOB PRIORITY, (NeG NUMB IF TASK.) 

A, CADRTA6 CURRENT JOB (OR TASK) RESTART LOCATION, 

IN addition, there exists a size table that LISTS THE NUMBER OF 
LOCATIONS USED BY EACFt PROFRAM FOR RESTARTS, 

.**MORt TO COME LATER*.. (DJD 


0303 

REF 

161 

LAST 

123 

13 

, 6563 

030A 





13 

,656A 

0305 





13 

,6565 

0306 

REF 

le 

LAST 

109 

13 

• 5566 

0307 

REF 

1 



13 

• 6567 

0308 

REF 

1 



13 

*6570 

0309 

REfR 

1 



13 

• 6571 

0310 

REF 

1 



13 

• 6572 

0311 

REF 

1 



13 

*65 73 

0312 

REF 

2 

LAST 

135 

13 

♦ 657A 

0313 

REF 

2 

LAST 

135 

13 

• 65 75 

03IA 

REF 

1 



13 

* 6 5 7 6 

0315 

REF 

98 

LAST 

12 A 

13 

• 6577 

0316 

REF 

1 



13 

,6600 

0317 

REF 

1 



13 

t 6601 

U31B 

REF 

1 



13 

• 6602 

0319 

REF 

3 

LAST 

135 

13 

*6603 

0320 

REF 

1 



13 

f 6 bOA 

0321 

REF 

99 

LAST 

135 

13 

,6605 

0322 

REF 

1 



13 

,6606 

0323 

REF 

2 

LAST 

135 

13 

,6607 

032A 

REF 

2 

LAST 

135 

13 

,6610 

0325 

REF 

1 



13 

• 6611 

0326 

REF 

A A 

LAST 

122 

13 

• 6612 

0327 

REF 

A5 

LAST 

135 

13 

*6613 

0328 

REF 

1 



13 

• 661A 

0329 

REF 

4 

LAST 

135 

13 

• 6615 

0330 

ref 

2 

LAST 

135 

13 

,6616 


3 

0115 

1 

RESTARTS 

XCH 

MPAC 

6 

0000 

i 


DOUBLE 


6 

0000 

1 


double 


2 

0120 

0 


INDEX 

LOC 

6 

6555 

1 


AD 

SIZETAB 

5 

0115 

1 


T5 

POINTER 

3 

6607 

0 


caf 

TCURRENT 

5 

0123 

1 


1 5 

GOLOC + 1 

3 

322a 

0 


CAF 

TCWAIT 

5 

0121 

0 


TS 

GOLOC - 1 

2 

0115 

0 


I NDEX 

POINTER 

3 

6000 

1 


CAF 

WTDTTAB 

1 

0000 

0 


CCS 

A 

0 

6636 

1 


TC 

WTCALL 

0 

6676 

0 


TC 

CURNTJOB 

0 

6613 

0 


TC 

LONGCLER 

2 

0115 

0 


index 

POINTER 

3 

6001 

0 


caf 

WCADRTAB 

1 

0000 

0 


CCS 

A 

0 

6625 

0 


TC 

INDIRECT 

0 

667 6 

0 

tcurrent 

TC 

CURNTJOB 

0 

6612 

1 


TC 

LONGCLER 

0 

666A 

0 


TC 

SINUIR 

A 

A516 

0 


C5 

ONE 

6 

A5l6 

1 

LONGCLER 

AO 

ONE 

5 

0116 

1 


T5 

RECALL 

2 

0115 

0 


I MOEX 

POINTER 

A 

6001 

1 


C5 

WCADRTAB 


FAzE bits FOR ThIS prog in MpAc. 

MULTILY BY A, (A ITEMS PER ENTRY.) 

LUC contains the program NUMBER-1, (0-5) 


EXIT location. 

SET A WAITLIST CALL IN LRASABLE* 


+N = waitlist CALL 

+U = NO CALL 

-N = LONGCALL 

-0 = INDIRECT (PROBABLY) 


NO ZERO CALLS 

NEG OF TIME FOR SHORT LONG. 


Restore longtime 

s i OREO NEGATIVELY* 


^aAi)78A YUL SYSTEM FOR AGC^; REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 136 


L 


501 RE.STAHT TABLES AND ROJTlNES 


0331 

REF 

2 

LAST 

135 

13*661 7 

5 0117 

0 

T5 

RECALL + 

0332 

REF 

1 



13*6620 

0 5 742 

0 

TC 

IbNKCALL 

0333 

REF 

1 



1 3 * 662 1 

26724 

1 

CADR 

NULONGDT 

0334 

REF 

2 

LAST 

136 

13*6622 

0 5 742 

0 

TC 

IbNKCALL 

0335 

REF 

1 



13*6623 

10552 

1 

CADR 

LONGCALL 

0336 

REF 

3 

LAST 

135 

13*6624 

0 6676 

0 

TC 

CURNTjOB 


USER'S OWN PAGE NO. 12 


R0337 


R0338 indirect SeCTION TAKeS T^E Dp jlME PRON tHe ERASABLE LOCATIONS BY THe 


R0339 


NUMBER IN 

THE 

wCADRTAB. 


tWTDTTAB 

= -0.) 


0340 

REF 

1 



13*6625 

5 

0117 

0 

INDIRECT T5 

ecadtem 

0341 

REF 

100 

LAST 

135 

13*6626 

2 

0000 

0 

INDEX 

A 

0342 





13*6627 

4 

0001 

1 

C5 

1 

0343 





1 3 * 6630 

4 

OOOO 

0 

COM 


0344 

REF 

3 

LAST 

136 

13*6631 

5 

011b 

1 

TS 

RECALL 

034 5 

REF 

2 

LAST 

136 

13*6632 

2 

OUT 

1 

INDEX 

ECADTEM 

0346 





13*6633 

4 

0002 

1 

cs 

2 

0347 





13*6634 

4 

0000 

0 

COM 


0348 

REF 

3 

last 

135 

13*6635 

0 

6617 

1 

TC 

LONGCLER ♦ 


R0349 

ASSIGNMENTS 1 

ETC. 







0350 

REF 

12 

LAST 

105 



0122 

GO LOC 

EQUALS 

OVFIND 

0351 

REF 

162 

LAST 

135 



0117 

TEMDT 

equals 

MPAC ♦ 2 

0352 

ref 

163 

LAST 

136 



0116 

recall 

EQUALS 

MPAC + 1 

0353 

ref 

4 

LAST 

136 



0117 

ECADTEM 

equals 

RECALL + 1 

0354 

REF 

1 64 

LAST 

136 



0115 

POINTER 

equals 

MPAC 

R0355 

MPAC 

♦ 1 SAVED 

BECAUSE DF 1 

USE 

IN RESTART CONTROL. (CCS MPAC + 1) 

R0356 

THIS 

ROUT 

INE 

LEAVES the 

ITLIST call 

AS GIVEN 

BY t^CADRlAB, 

0357 

REF 

46 

LAST 

135 

13 t 6 6 3 6 

6 

4516 1 

wtcall 

AQ 

ONE 

03572 





13f 6637 

4 

0000 0 


CQM 


035B 

REF 

1 



13f 6640 

5 

0117 0 


TS 

TEMDT 

0359 

REF 

5 

LAST 

135 

13^6 64 1 

2 

0115 0 


INDEX 

POINTER 

0360 

ref 

3 

LAST 

135 

1 3 ♦ 6 6 ^ 2 

3 

6001 0 


CAF 

WCADRTAB 

0361 

REF 

3 

LAST 

135 

1 3 f 6643 

5 

0122 0 


1 5 

GOEOC 

0362 

ref 

19 

LAST 

135 

1 3 % 6644 

2 

0120 0 

WTCALL2 

index 

LOC 

03625 

REF 

1 



13^6645 

4 

0663 0 


CS 

TBASE2 -1 

0363 





1 3 t 6 646 

2 

5777 1 


EXTEND 


03635 

REF 

1 



1 3 1 6 64 / 

6 

0036 1 


SJ 

T IMEM 


CAOR-l IS STORED. (DUE TO CCS.) 

li NOT 0 BECAUSE CAdR OFF BY 1.) 

(NOT needed if NEC TIME STROEU. USAGE. . ) 
AND STORE MAJOR PART. 

Again one more than usual. 

STORE MINOR PART THERE 


Uses one LOCATION ON each side OF IT, 

MUNTZ NOW USINF LOC IN RESTART CONTROL. 
LOOKS OK. 


DUl IN A ON ENTRY, {FROM CCS.) 
510RE negative OF Dl IN TEMDT. 


Pick up CADR FOR THIS CALL. 
GOLOC+1 AND -1 ALREADY SET-UP. 

FIRST GET TBASE - TIMEI 
TbASE STORED NEGATIVELY 

TuASE - TIMEI 


<tb^‘jT8A YUU SYSTEM FOR AGC<t ! REVISION 0 Of- PROGRAM SOLRUM55 BY 


L 501 RESTART TABLES AND R0JT1NE5 


03bA 

ref 

101 

LAST 

136 

13 »6650 

1 

0000 

0 

CCS 

0364S 





13»6651 


0000 

0 

cdm 

0365 

REF 

1 



13,6652 

6 

6663 

1 

AO 

03655 

REF 

A7 

LAST 

136 

13,6653 

6 

A 5 1 6 

1 

AD 

0366 

REF 

2 

LAST 

136 

13,665A 

6 

011 7 

0 

AD 

0367 

REF 

102 

LAST 

13 7 

13 ,6655 

1 

0000 

0 

CCS 

036B 

REF 

A7 

LAST 

121 

13,6656 

3 

5501 

0 

caf 

0 3o9 





13*6657 

0 

6661 

0 

TC 

0370 





1 3 * 6660 

0 

6661 

0 

TC 

0371 

REF 

A8 

LAST 

137 

13,6661 

6 

A516 

1 

AD 

0372 

REF 

A 

LAST 

136 

1 3 * &&&2 

0 

0121 

0 

TC 


03 725 





13 »6663 

37776 

0 

OCT37776 

DCT 

0373 

REF 

1 



1 3 » 6 66^ 

3 

6707 

1 

SINDIR 

CAF 

037A 

REF 

5 

LAST 

137 

1 3 ^ 6 5b& 

5 

0123 

1 


TS 

0375 

REF 

6 

LAST 

136 

1 3 » 6 666 

2 

0115 

0 


INDEX 

03 76 

REF 

1 



1 3 % 6b6 7 

3 

600 3 

1 


CAF 

0377 

ref 

6 

LAST 

13 7 

13 t6670 

5 

0122 

0 


TS 

0378 

REF 

7 

LAST 

137 

13f 66/1 

2 

0115 

0 


INDEX 

0379 

REF 

1 



13f6672 

2 

6002 

1 


INDEX 

0380 





13t6573 

A 

0000 

0 


cs 

03805 

REF 

3 

LAST 

137 

1 3 f 6 6 7 4 

5 

0117 

0 


TS 

0381 

REF 

1 



1 3 f 66 7b 

0 

66 AA 

1 


TC 


(MAIN) PAGE 137 


NASA 1021108-021 DEC A, 1966 


A 

0CT37776 

ONE 

temdt 

A 

ZERO 
+ 2 
+ 1 

ONE 

GOLOC - 1 


377 76 


TCSWRET 
GOLOC + 1 
POINTER 

cadrtab 

GOLOC 

POINTER 

PRIOTAB 

0 

TEMDT 

WTCALL2 


USER'S OWN PAGE NO, 13 

THIS should be negative if ALL OK. 
GET POSMAx - A, 

1 BIT SHY OF POSMAX, 

RESTORE BIT LOST BY CCS, 

TiMEl - TBASE - DT NOW IN A, 

TEST IT. SHOULD BE NEGATIVE. 
EXCEEDED TIME. BAD,BAD,.. 

(+0 JUST POSSIBLE.) 

YESi everything OK . 

NOW IS THE TIME. 


PUSMAX - 1 


PICK UP CADR TO GO TO. 

M POINTS AT the erasable LOCATION OF DT 
NEG OF DT IN A, 

JOIN there TO RECOMPUTE TIME REMAINING. 


(MAIN) PAGE 138 


46^57bA YUL system FOR AGCAJ REVISION 0 OF PROGRAM SOLRUMbS BY NASA 1021106-021 


L 501 RESTART TABLES AND ROUTINES 

P0382 GETS CURRENT JOB (OR TASO RERUNNING. 


0383 

REF 

e 

LAST 

137 

13^6676 

2 

0115 

0 

CURNTJOB 

INDEX 

POINTER 

038A 

REF 

2 

LAST 

137 

13 i6677 

3 

6003 

1 


CAF 

CADRTAB 

0385 

pef 

7 

LAST 

137 

13*6700 

5 

0122 

0 


1 5 

GOLOC 

0386 

REF 

2 

LAST 

137 

13*6701 

3 

6707 

L 


CftF 

TCSWRET 

0387 

REF 

8 

LAST 

138 

13*6702 

5 

0123 

1 


T5 

GOLDC + 1 

0388 

REF 

9 

LAST 

138 

13*6703 

2 

0115 

0 


INDEX 

POINTER 

0389 

ref 

2 

LAST 

137 

13*6709 

3 

6002 

0 


CAF 

PRIDTAB 

0390 

REF 

103 

LAST 

137 

13*6705 

1 

0000 

0 


CCS 

A 

0391 

REF 

1 



13*6706 

0 

6713 

1 


TC 

ITSAPRIO 

0392 

REF 

2 

LAST 

123 

13*6707 

0 

5702 

1 

TCSWRET 

TC 

SwRLTURN 

0393 

REF 

1 



13*6710 

0 

6720 

1 


TC 

SHINDIRT 

039^ 

REF 

A9 

LAST 

137 

13*6711 

6 

9516 

1 


AD 

ONE 

0395 

REF 

9 

LAST 

138 

13*6712 

0 

0121 

0 


TC 

GOLOC -I 

0396 

ref 

50 

LAST 

138 

13*6713 

6 

^516 

1 

itsaprio 

AD 

ONE 

0397 

REF 

10 

LAST 

138 

13*6719 

5 

0121 

0 


TS 

GOLOC - 1 

0398 

REF 

1 



13*6715 

3 

322b 

1 


CAF 

TCF INDVC 

0399 

REF 

11 

LAST 

138 

13*6716 

3 

0121 

0 


XCH 

GOLOC - 1 

OAOO 

REF 

12 

LAST 

138 

13*6717 

0 

0121 

0 


TC 

GOLOC - 1 


RO^Ol 

SHORT 

INDIRECT 

SECTION IS 

NOT 

USED 

AS 

YET. 



0402 

ref 

109 

LAST 

138 

13*6720 

2 

0000 

0 

SHINDIRT 

INDEX 

A 

0903 





13.6721 

9 

0001 

1 


CS 

1 

09035 

REF 

9 

LAST 

137 

13*6722 

5 

0117 

0 


TS 

TEMDT 

0909 

REF 

2 

LAST 

137 

13*6723 

0 

6644 

1 


TC 

WTCALL2 


R0405 

jBaSE REGISTERS CONTAIN NEGATIVE OF 

time ai 

start of 

5E0UENCE. 

R0406 

routine 

; TO 

generate 

new delta 

T (LONGTIME) 

for 

LONG 

CALL. 

0407 

ref 

1 



13*6724 

0 

2677 

0 nulongdt 

TC 

READTIME + 

0408 

REF 

48 

LAST 

137 

13*6725 

3 

5501 

0 


CAP 

ZERO 

0409 

ref 

1 



13*672t> 

6 

1463 

1 


AD 

TCUIOFF + 1 

0410 

REF 

1 



13*6727 

6 

0573 

0 


AD 

RUPTSTOR + 

0411 

REF 

5 

LAST 

136 

13.6730 

6 

0117 

0 


AD 

RECALL + 1 

0412 

REF 

17 

LAST 

128 

13.6731 

5 

l46i 

0 


TS 

LONGTIME ♦ 

0413 

REF 

49 

LAST 

138 

13.6732 

3 

5501 

0 


CAP 

ZERO 

0414 

REF 

2 

LAST 

138 

13*6733 

6 

1462 

0 


AD 

tlutoff 

0415 

REF 

2 

LAST 

138 

13.6734 

6 

0572 

1 


AD 

RUPTSTOR 

0416 

REF 

6 

LAST 

138 

13*6735 

6 

0116 

1 


AD 

RECALL 

0417 

REF 

18 

LAST 

138 

13.6736 

3 

1460 

1 


XCH 

LONGTIME 

0418 

REF 

19 

LAST 

138 

13.6737 

1 

1460 

0 


CCS 

LONGTIME 

0419 

REF 

1 



13*6740 

0 

5761 

I 


TC 

ISWRETRN 


1 

1 

I 



DEC Af 1966 


u5ER*s Own page no. ia 


PUT ADDRESS THERE (CADR) 

WHERE TO WHEN DONE, 

PRIORITY table, 

test it, 

+N = priority. 

♦U = NO JOB OR task. 

-N = SHORT indirect FORM, 

-0 = IMMEDIATE WAITLIST CALL. 

-0 WILL CRASH OUT HERE.., 

Restore correct priority value. 
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0106 

REF 

A 

LAST 

143 

04*7074 

3 

0727 

0 

XCH 

0107 

REF 

2 

LAST 

140 

04*7075 

7 

7342 

1 

MASX 

01075 

REF 

2 

LAST 

141 

04*7076 

5 

0730 

D 

TS 

•H 

0106 

ref 

1 



04*7077 

3 

7004 

1 

CAF 

01081 

REF 

5 

LAST 

143 

04*7100 

7 

072 7 

1 

MASfC 

01062 

REF 

111 

LAST 

142 

04*7101 

1 

0000 

0 

CCS 

01083 

REF 

53 

LAST 

140 

04*7102 

4 

5501 

1 

CS 

0108A 





04*7103 

4 

0000 

0 

COM 

oloes 

REF 

1 



04*7104 

5 

0677 

1 

T 5 

0109 

REF 

2 

LAST 

142 

04*7105 

1 

0004 

1 

CCS 

Olio 

REF 

1 



04*7106 

0 

7114 

1 

TC 

0111 

REF 

2 

LAST 

143 

04*7107 

0 

7114 

1 

TC 

0112 





04*7110 

0 

7111 

1 

TC 

0113 

REF 

2 

LAST 

110 

04*7111 

4 

4503 

1 

CS 

OllA 

REF 

3 

LAST 

143 

04*7112 

7 

0730 

1 

MAS< 

0115 

REF 

A 

LAST 

143 

04*7113 

5 

0730 

0 

TS 


NASA 1021108-021 


DEC A, 1966 


tMAlN) page lAi 


phasechk 

USER'S OWN page no, 4 

taspcrjTf"\ 
UrtTERR y 

rtdocntr 

REDQCNTR 

ejmable vg display Grab 

NO restart fail. 

Ii*CREMENT REDOCNTR, 

BIT15 

DSPTAB + 13D 

BI T15 

DSPTAB + 13D 

PICK UP all but bit 15, 

SET BIT 15 TO FORCE RESETTING RELAYS. 
MIGHT take a while TO GET OUT. 

1N3 

IN3 

WASKSET 

L0^7 

WASiCSET 

OPTMODES 

WASOPSET 

PUT PRESENT modes INTO WAS REGISTERS, 

blTSb67 

WAS<SET 

IhU ATTITUDE CONTROL OR ENTRY MODE. 

A 

ZERO 

CDUIND 

INO 

GOJOMP 

GOJUMP 
+ 1 

BIT12 

WASOPSET 

InASOPSET 

IS IT IN ONE OF these MODES, 

YES,, PUT +0 INTO CDUIND. 

Nu.,. PUT -0 INTO CDUIND, 


^a^tj78A YUL SYSTEM FOR AGC^^; REVISION 0 Oh PROGRAM SOLRUM5S BY 


L FRESH start AND RESTART 


Ul 16 

ref 

3 

LAST 

142 

04*7114 

3 

4477 

1 

GOJUMP 

CAF 

0117 

REF 

20 

LAST 

136 

04,7llt> 

5 

0120 

1 


TS 

UUB 





0 4 * 7 1 1 1> 

2 

0016 

1 


RELINT 

0119 





04*7117 

2 

001 7 

0 


INHINT 

0120 

REF 

54 

LAST 

143 

04*7120 

6 

4 5 1 6 

1 


AD 

0121 

REF 

1 



04*7121 

5 

0573 

0 


TS 

0122 

REF 

112 

LAST 

143 

04*7122 

2 

0000 

0 


INDEX 

0123 

REF 

3 

LAST 

140 

04*7123 

1 

0647 

0 


CCS 

0124 

REF 

1 



04*7124 

0 

7154 

0 


1 c 

0125 

REF 

1 



04*7125 

0 

7166 

1 


TC 

0126 

REF 

113 

LAST 

144 

04 *7126 

1 

0000 

0 


CCS 

0127 

REF 

1 



04*7127 

0 

7175 

□ 


TC 

0128 

REF 

21 

LAST 

1 44 

04*7130 

1 

0120 

0 

GORE TURN 

CCS 

0129 

REF 

3 

LAST 

143 

04t7l3l 

0 

7115 

0 


TC 

0130 

ref 

1 



04*7132 

3 

2172 

1 


<AF 

0131 

REF 

2 

LAST 

114 

04*7133 

0 

2052 

1 

I 

TC 

0132 

REF 

1 



04*7134 

23725 

0 


VC A DR 

0133 





04*7135 

2 

0016 

1 

endfresh 

■n*. 

RcLI NT 

0134 

REF 

1 



04*7136 

0 

5654 

0 


TC 

0135 

REF 

2 

LAST 

122 

04*7137 


16003 

0 


CADR 

0136 

REF 

1 



04*7140 

0 

5720 

1 


TC 

0137 

REF 

1 



04*7141 


23415 

0 


CADR 

0136 

ref 

114 

LAST 

144 

04*7142 

1 

0000 

0 

ZEROTEST 

CCS 

0139 

REF 

3 

LAST 

192 

04*7143 

0 

671 7 

0 


TC 

01 aO 

REF 

99 

LAST 

123 

04 * 7 1 44 

0 

0001 

0 


TC 

0141 

REF 


LAST 

144 

04*7145 

0 

6717 

0 


TC 

0142 

REF 

5 

LAST 

144 

04 * 7 1 46 

0 

6717 

0 


TC 


1021100-021 


DEC 4, 1966 


(MAIN) PAGE 144 


maxprog 

LOG 


ONE 

PROG 

A 

PhASEI -1 
PROGON 
GOTERM 
A 

RSTFAIL2 

LOG 

GO JUMP +1 

PR 1 037 

NOvAC 

DOALARM 


BANXCALL 

DSPMM 

POSTJUMP 
DUMMY JOB 

N060 

0 

NOGO 

NUGO 


USER'S OWN PAGE NO. 5 
SGAN phase table FOR ACTIVITY. 


OPEN the interrupt gate so that each 

60 DISPATCH HAS 10 MS. 

GROUP NUMBER IN PROG, 

SEE IF GROUP active. 

Valid if phase less than 127 . 

DO reuuested phase terminate. 

INACTIVE IF phase = -1. 

BAD data if -0. 




Fire up job to display failreg 


display major Modes. 


this reverts to the idling JOB. 


restart from go impossible. 
OK so far 


4ti<*b78A YUL system FOR AGC^: REVISION 0 OF PROGRAM SOLRUMS5 BY NASA 1021108-021 


L FRESH START AnD RESTART 

P01A21 internal restart by program 


U1A22 
01 A23 

REF 

3 

LAST 

1A2 

o o 

o 

U1A27 

REF 

5A 

LAST 

IA3 

0A,7l5l 

01A28 

REF 

2 

LAST 

lAl 

0A,71S2 

01A29 

REF 

1 



0A,71S3 


control to flush out aAITLIST AND EXEC, 
2 0017 0 enema INHINT 


0 

7200 

1 

TC 

STARTSU8 

A 

5S01 

1 

CS 

ZERO 

5 

176A 

0 

T5 

SFAIL 

0 

7070 

1 

TC 

CHECK:IN3 


DEC A, 1966 (MAIN) PAGE IAS 
USER*S OWN PAGE NO. 6 

A Strange instruction to bear this name. 

ALL 7 IN SFAIL DENOTES PROGRAMMED REDO. 


YUL system EDR AGC4: revision U of PRDGHAM SOLRUM55 BY 


L FRESH start AnO ReSTARI 


P01A3 



DISPATCH 

OR TERMINATE 

RESTART 

GROUPS, 


0144 

REF 

55 

LAST 

144 

04f 7154 

6 

4516 

1 

PROGON 

AO 

0145 

REF 

169 

LAST 

142 

04 » 7 155 

5 

0115 

1 


TS 

0146 

REF 

9 

LAST 

143 

04*7156 

4 

4720 

1 


cs 

0147 

REF 

170 

LAST 

146 

04*715 r 

7 

0115 

0 


MAS< 

0148 

REF 

115 

LAST 

144 

04 * 7 160 

1 

0000 

0 


CCS 

0149 

ref 

2 

LAST 

144 

04*7161 

0 

7175 

0 


1 c 

0150 

REF 

22 

LAST 

144 

04 * 7 1 62 

2 

0120 

0 


1 "^OEX 

0151 

REF 

1 



04*7163 

3 

7350 

0 


caf 

0152 

REF 

3 

LAST 

121 

04 »716‘* 

0 

5662 

0 


TC 

0153 

ref 

1 



04*7165 

0 

7130 

1 


TC 

0154 

REF 

56 

LAST 

146 

04 * 7 1 66 

4 

4516 

0 

GOTERM 

C5 

0155 

ref 

23 

LAST 

146 

04,7167 

2 

0120 

0 


INOEX 

0156 

REF 

4 

LAST 

144 

04*7170 

5 

0650 

1 


TS 

0157 





04,7171 

4 

0000 

0 


COM 

0158 

REF 

24 

LAST 

146 

04,7172 

2 

0120 

0 


I MOEX 

0159 

REF 

3 

LAST 

140 

04*7173 

5 

0656 

1 


TS 

OlbO 

REF 

2 

LAST 

146 

04*7174 

0 

7130 

1 



0161 

REF 

16 

LAST 

142 

04*7175 

3 

5503 

1 

RSTFAILa 

\ CAF 

0162 

REF 

5 

LAST 

143 

04,7176 

5 

0726 

1 


X5 

0163 

REF 

6 

LAST 

144 

04,7177 

0 

6717 

0 


TC^ 


NASA 1021108-021 


DEC 1966 


(MAIN) PAGE 146 



USER'S OWN page no. 7 

ONE 

MPAC 

PHASE BITS TO MPAC, 

L0N7 

MPAC 

CHECK SUE. 

A 

RSTFAIL2 

RESTART fail - OUT OF RANGE, 

LOC 

gocadr 

SWCALL 

JUMP TO GOCADR LOC, 

GORETURN 

ON return from SWCALL, 

ONE 

LOC 

PHASEl 

IF A RESTART GROUP HAD BEEN REQUESTED TO 
TERMINATE, DO THE TERMINATE NOW, 

LOC 

-PHASEl 

CORETURN 


TNO _ p 

OLDERR //Vr" 

W bad DATA IN RESTART TABLES - FAIL, 


4bAi>78A YUL SYSTEM F3K AGC't; REVISION 0 Of PRdGRAM SOLf^UMsS BY NASA X021108-021 


dec A« 1966 


(MAIN) PAGE IA7 


L FRESH START AND RESTART USER»S OWN PA&e NO. b 


PQ 1 6A 



initialization SjbROUTlNt* CONTAINING 

initialization Common to 

Both fresh start (Keyboard request) and 

R0166 

RESTART 

(IN R 

esponse 

TO A GO 

SLQUENCE) . 





0167 

REF 

100 

LAST 

144 

04*7200 

3 

0001 

0 STARTSUb XCH 

0 



0168 

REF 

65 

LAST 

142 

04*7201 

5 

0077 

1 

TS 

buF 


EXEC TEMPS ARE AVAILABLE TO US, 

0 1 69 

REF 

11 

LAST 

118 

0A.7202 

3 

4476 

0 

CAF 

POSMAX 


T3 AND T4 overflow AS SOON AS POSSIBLE. 

0170 

REF 

7 

LAST 

119 

04*7203 

5 

0037 

0 

TS 

T 1ME3 


(POSMAX IS PSEUDO INTERRUPT SIGNAL IN 

0171 

REF 

1 



04 * 7 2 04 

5 

0040 

0 

T5 

TIME4 


CASE RUPT signalled BEFORE TS TIME3). 

01 72 

ref 

4 

LAST 

118 

04*7205 

3 

4520 

1 

CAF 

NEGI/2 


initialize WAITLIST DELTA-T3. 

01723 

ref 

24 

LAST 

118 

04,7206 

5 

0560 

1 

TS 

LSTl +6 



01726 

REF 

25 

LAST 

147 

04,7207 

5 

0557 

0 

TS 

LSTl +5 



0173 

REF 

26 

LAST 

147 

04,7210 

5 

0556 

1 

TS 

LSTl +A 



U17A 

REF 

27 

LAST 

147 

04,7211 

5 

0555 

1 

TS 

LSTl +3 



0175 

REF 

28 

LAST 

147 

04,7212 

5 

0559 

0 

TS 

LSTl +2 



0176 

REF 

29 

LAST 

147 

04,7213 

5 

0553 

1 

T5 

LSTl *1 



0177 

REF 

30 

LAST 

147 

04,7214 

5 

0552 

0 

TS 

LST 1 



0178 

REF 

3 

LAST 

119 

04,7215 

4 

2260 

0 

cs 

endtask 


SET ALL TASKS TO DUMMY TASK. 

01763 

REF 

17 

LAST 

119 

04 ,7216 

5 

0570 

0 

TS 

LST2 +7 



01786 

REF 

18 

LAST 

147 

04,7217 

5 

0567 

0 

TS 

UST2 +6 



0179 

REF 

19 

LAST 

147 

04,7220 

5 

0566 

1 

TS 

LST2 +5 



0180 

REF 

20 

LAST 

147 

04,7221 

5 

0565 

1 

TS 

LST2 +4 



0181 

REF 

21 

LAST 

147 

04,7222 

5 

0564 

0 

TS 

LST2 +3 



0182 

REF 

22 

LAST 

147 

04,7223 

5 

0563 

1 

TS 

LST2 +2 



0183 

REF 

23 

LAST 

147 

04 ,7224 

5 

0562 

0 

TS 

LST2 +1 



OlbA 

REF 

24 

LAST 

147 

04,7225 

5 

0561 

0 

TS 

LST2 



0185 

REF 

55 

LAST 

145 

04,7226 

4 

5501 

1 

CS 

Zero 


MAKE ALL EXECUTIVE REGISTER SETS 

0186 

REF 

22 

LAST 

109 

04,7227 

5 

0134 

1 

TS 

PRIORITY 

^aD 

available (EXCEPT THIS ONE). 

0167 

REF 

23 

LAST 

147 

04,7230 

5 

0144 

0 

TS 

PRIORITY 

+ 16D 


01b8 

REF 

24 

LAST 

147 

04,7231 

5 

0154 

1 

TS 

PRIORITY 

4-2AD 


0189 

REF 

25 

LAST 

147 

04,7232 

5 

0164 

1 

T5 

PRIORITY 

+ 32D 


0190 

REF 

26 

LAST 

147 

04,7233 

5 

0174 

0 

TS 

PRIORITY 

4-400 


0191 

REF 

27 

LAST 

147 

04,7234 

5 

0204 

1 

TS 

PRIORITY 

+ 48D 


0192 

REF 

28 

LAST 

147 

04 ,7235 

5 

0214 

0 

TS 

PRIORITY 

♦ 660 


0193 

REF 

1 



04 ,7236 

5 

0033 

1 

TS 

DSRJPTSW 


-0 GIVES US 40 MS TO GET READY FOR T4. 

0194 

REF 

2 

LAST 

143 

04,7237 

5 

0677 

1 

TS 

CUUIND 


MAKE IMU AND OPTICS AVAILABLE. 

0195 

REF 

1 



04 , 7 240 

5 

0703 

0 

TS 

OPT IND 




4a^b7flA YUL SYSTtM FOR aGC4: REVISION 0 OF PROGRAM SOLRUM35 BY 


L fresh start and Restart 


0196 

REF 

1 



04.7241 

3 

7356 

0 

CAF 

0197 

REF 

2 

LAST 

99 

04*7242 

5 

0216 

1 

T5 

0198 

REF 

1 



04,7243 

6 

735 r 

1 

A3 

0199 

REF 

2 

LAST 

99 

04 * 7244 

5 

02 7 2 

0 

T5 

0200 

REF 

2 

LAST 

148 

04, 

6 

7357 

1 

AD 

0201 

REF 

2 

LAST 

99 

04,72‘,6 

5 

0346 

0 

T5 

0202 

REF 

3 

LAST 

148 

04,724 I 

6 

7357 

1 

AD 

0203 

REF 

2 

LAST 

99 

04,7250 

5 

0422 

0 

TS 

020A 

REF 

4 

LAST 

148 

04,7251 

6 

7357 

1 

AD 

0205 

REF 

2 

LAST 

99 

04,7252 

5 

0476 

1 

T5 

0206 

ref 

3 

LAST 

141 

04,7253 

3 

4505 

0 

CAF 

0207 

REF 

29 

LAST 

147 

04,7254 

5 

0124 

0 

TS 

0210 

REF 

1 



04 ,7255 

3 

3232 

1 

CAF 

0211 

REF 

171 

LAST 

146 

04,7256 

5 

0115 

1 DSPOFF 

TS 

0212 

REF 

3 

LAST 

143 

04,7257 

4 

4503 

1 

C5 

0213 

REF 

172 

LAST 

148 

04,72b0 

2 

0115 

0 

INDEX 

0214 

REF 

6 

LAST 

143 

04,7261 

5 

0710 

1 

T5 

0215 

REF 

173 

LAST 

148 

04 ,7262 

1 

0115 

0 

r ^ c 

0216 

REF 

1 



04 ,7263 

0 

7256 

1 

TC 

02165 

REF 

2 

LAST 

142 

04 ,7264 

5 

1760 

1 

IS 

0217 

REF 

1 



04,7265 

5 

0041 

1 

TS 

0218 





04,7266 

5 

0056 

1 

TS 

0219 

REF 

1 



04,726/ 

5 

0706 

0 

TS 

0220 

REF 

15 

LAST 

100 

04,7270 

5 

0215 

1 

TS 

0222 

REF 

1 



04,7271 

5 

0627 

1 

TS 

0223 

REF 

1 



04,7272 

5 

0613 

0 

TS 

0224 

REF 

1 



04,7273 

5 

0633 

1 

TS 

0225 

REF 

1 



04,7274 

5 

0625 

0 

TS 

0226 

REF 

1 



04,7275 

5 

0626 

0 

TS 

0227 

REF 

1 



04,7276 

5 

0630 

1 

TS 

0228 

REF 

1 



04,7277 

5 

0602 

0 

TS 

0229 

REF 

1 



04,7300 

5 

0603 

1 

TS 

0230 

REF 

1 



04,7301 

5 

0634 

0 

TS 

0231 

REF 

2 

LAST 

148 

04,7302 

5 

0635 

1 

TS 

0232 

REF 

3 

LAST 

140 

04,7303 

5 

0636 

1 

TS 


NASA 1021108-021 


DEC A, 1966 


(Main) page iab 


USER'S OWN page no, 9 


VACIADRC MAKE ALL VAC AREAS AVAILABLE. 

VACIUSE 

LTHVACA 

VAC2U5E 

LTHVACA 

VAC3USE 

LTHVACA 

VACAUSE 

LTHVACA 

VAC5U5E 


BITIO THIS register SET BECOMES DUMMY JOB, 

PRIORITY 


TEN 

MPAC 


BIT12 

MPAC 

DSPTAB 

MPAC 

D5P0FF 

ERESTORE 

UPLINK 



56 

DSPCNT 

NEWJOB 

cadrstor 

REGRET 

CLFASS 

MONSAVE 

MONSAVE 1 

GRABLOCK 

VERBREG 

NOUNREG 

DSPLIST 

DSPLIST +1 

DSPLIST +2 


TURN OFF ALL DISPLAY SYSTEM RELAYS. 


these MIGHT PICK UP AN INCREMENT DURING 
A GO • 

Skips to here when finished with C(A)so. 


KILL MONITOR 


yul System for agca; revision o oh program solrumss by 


L fresh start and Restart 


0233 

REF 

1 



OA * 7 30A 

5 

076A 

1 

T5 

023A 

REF 

1 



0At7305 

5 

0756 

0 

TS 

023S 

REF 

2 

LAST 

1A9 

0At73Q6 

5 

0757 

1 

TS 

0236 

REF 

3 

LAST 

1A9 

0At7307 

5 

0760 

0 

TS 

0237 

REF 

A 

LAST 

1A9 

0A,7310 

5 

0761 

1 

TS 

0238 

REF 

5 

LAST 

1A9 

0At731i 

5 

0762 

1 

TS 

0239 

REF 

6 

LAST 

1A9 

0Ai73i2 

5 

0 763 

0 

TS 

02A0 

REF 

1 



0A» 7313 

5 

0731 

1 

TS 

02A1 

REP 

1 



0A»731‘t 

5 

07 32 

1 

TS 

02a2 

ref 

2 

LAST 

20 

0Ai73l5 

5 

0733 

0 

TS 

02A3 

REF 

1 



0Ai73l6 

5 

073A 

L 

T5 

02AA 

REF 

1 



0At73l 7 

5 

0675 

0 

TS 

02A5 

ref 

1 



0A»7320 

5 

0735 

0 

TS 

02A65 

ref 

2 

last 

136 

0Ai7321 

A 

0036 

0 

CS 

02 A66 

ref 

1 



0A»7322 

5 

1077 

0 

TS 

02A7 

REF 

3 

LAST 

61 

0A»7323 

3 

AA75 

0 

CAP 

02*»8 

REF 

1 



0Ai732A 

5 

0670 

0 

TS 

02h9 

REF 

1 



0A,7325 

3 

73A5 

1 

CAF 

02S0 

REF 

1 



0A»7326 

5 

0673 

0 

TS 

02S1 

REF 

1 



0AW327 

3 

2566 

0 

CAF 

02S2 

REF 

1 



0A.7330 

5 

0672 

1 

TS 

0253 

REF 

1 



0A,733i 

3 

73A7 

0 

CAF 

025A 

REF 

1 



0At7332 

5 

0707 

1 

TS 

0255 

REF 

1 



0At7333 

A 

73A6 

0 

CS 

0256 

REF 

16 

LAST 

141 

0A*733A 

7 

06A5 

1 

MAS< 

0257 

REF 

17 

LAST 

IA9 

OA » 7335 

5 

06A5 

0 

TS 

A0258 










0259 

REF 

1 



0At7336 

A 

3227 

1 

CS 

0260 

REF 

1 



OA»7337 

5 

06lA 

1 

TS 

0261 

REF 

66 

LAST 

IA7 

OAt73AO 

0 

0077 

1 

TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) page 1A9 


LGYKO 
GCOMP 
GCOMP +1\ 
GCOMP +2 
GCOMP +3j 
GCOMP +a[ 
GCOMP +51 
OES<SET ‘i 
DES0P5ET 
IMUCADR 

OPTCADR 

TMMARKER 

MARiCSTAT 

TlMEl 

REDOT I ME + 1 


SIX 

TELCOUNT 

LPHASEl 

dntmgoto 


LDNLSTl 

DNLSTADR 


NOUTCON 

NOUT 


BIT3/A 

STATE 

state 

VDl 

DSPCOUNT 

BUF 


USER’S OWN PAGE NO. lo 

MAKE GYRO ROUTINES AVAILABLE. 
ZERO COMPENSATING GYRO TORqUES. 


NO COMPUTER COMMAND, 

(SAME AS IMU) . 

INITIALIZE mode-switching. 

MAKE MARK SYSTEM AVAILABLE. 

Save time of last Restart, (minus value) 

(MAY NOT GET ANY ENDPULSES BEFORE TA) . 


ZERO ONLY DSPLOCK (BITA OF STATE) AND 
EXTVBACT (BIT3 OF STATE) FOR RESTART, 
UPLUCK (BITZ OF STATE) IS ZEROED ONLY 
IiM FRESH START. 


dune 


^ti^bTSA YUL SYSTEM FOR A&CA: HEVISijN U OF PROGRAM SOLRUMSb BY NASA 1021108-021 


DEC A, 1966 
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dsptab 

+ 10D 

12/62 

dsptab 

+ 9D 

U/61 

dsptab 

+ 8D 

10/60 

dsptab 

+ 7 

9/59 

dsptab 

+ 6 

8/58 

DSPTAB 

+ 5 

7/57 

dsptab 

♦ A 

6/56 

dsptab 

+ 3 

5/55 

dsptab 

+ 2 

A/ 54 

DSPTAB 

+ 1 

3/53 

DSPTAB 


2/52 



YUL SYSTEM FOR AGC^^: REVISIUN 0 OF PROGRAM SOLRUM&5 BY f4A5A 1021108-021 


DEC A* 1966 


(MAIN} PAGE 157 


L 001 down-telemetry program 


USER’S OWN PAGE NO, 7 


Poib3 particular data lists for flight 501, list 1 provides data For the entire plight except during 

R0165 state vector UPDATES. FOR WHICH LIST 2 IS USED, 


0186 


10.6000 SETLDC 20000 


0187 

REF 

1 



10.6000 

06006 

1 

0188 

REF 

1 



10.6001 

01117 

1 

0189 

REF 

1 



10*6002 

0Ul6 

Q 

0190 

REF 

1 



10*6003 

06119 

0 

0191 

REF 

2 

LAST 

157 

lOtSOO*. 

06114 

0 

0192 

REF 

3 

LAST 

157 

10.6005 

06119 

0 

0193 

REF 

1 



10.6006 

01115 

0 

019A 

REF 

2 

LAST 

157 

10,600/ 

01119 

1 

0195 

REF 

3 

LAST 

157 

10.6010 

01113 

0 

0196 

REF 

A 

LAST 

15 ^ 

1 0 , 6 0 U 

01112 

1 

0197 

REF 

5 

LAST 

157 

10*6012 

0 n 1 i 

1 

0198 

REF 

6 

LAST 

157 

10,6013 

01 110 

0 

0199 

REF 

7 

LAST 

157 

10.6019 

01107 

0 

0200 

REF 

8 

LAST 

157 

10.6015 

01106 

1 

0201 

REF 

9 

LAST 

157 

10.6016 

01105 

1 

0202 

REF 

10 

LAST 

157 

10. 601 / 

01109 

0 

0203 

REF 

11 

LAST 

157 

10.6020 

01103 

1 

020A 

REF 

12 

LAST 

15^ 

10,6021 

01102 

0 

0205 

REF 

13 

LAST 

157 

10,6022 

01 101 

0 

0206 

REF 

lA 

LAST 

157 

10.6023 

01100 

1 

0207 

REF 

1 



10. 602h 

01123 

0 

0208 

REF 

A 

LAST 

157 

10.6025 

061 19 

0 

0209 

REF 

1 



10 . 6026 

01211 

1 

0210 

REF 

2 

LAST 

157 

10,602 7 

01210 

0 

0211 

REF 

1 



10.6030 

01227 

1 

0212 

REF 

2 

LAST 

157 

10,6031 

01226 

0 

0213 

REF 

3 

LAST 

157 

10,6032 

01225 

0 

021A 

REF 

A 

LAST 

157 

10,6033 

01224 

1 

0215 

REF 

5 

LAST 

157 

10.6034 

01223 

0 

0216 

REF 

6 

LAST 

157 

10.6035 

01222 

1 

0217 

REF 

1 



10 .6036 

01221 

1 

0218 

REF 

2 

LAST 

157 

10,603 / 

01220 

0 

0219 

REF 

3 

LAST 

15/ 

10,6040 

01217 

1 

0220 

REF 

A 

LAST 

157 

10. 6041 

01216 

0 

0221 

REF 

5 

LAST 

157 

10.6042 

01215 

0 

0222 

REF 

6 

LAST 

157 

10.6043 

01214 

1 

0223 

REF 

3 

LAST 

138 

10.6044 

01463 

1 

022A 

REF 

A 

LAST 

157 

10.6045 

01462 

0 

0225 

REF 

1 



10.6096 

01467 

0 

0226 

REF 

1 



10.6047 

0 1466 

1 

0227 

REF 

1 



10.6050 

01465 

1 

0228 

REF 

2 

LAST 

157 

10.6051 

01464 

0 

0229 

REF 

1 



10.6052 

01000 

0 

0230 

REF 

2 

LAST 

15/ 

10.6053 

0077 / 

0 



ADRE5 

501LSTB2 . 

501LSTA2 

AORES 

COMPNUMB A 


ADRE5 

UPOLDMD y\ 


A3RES 

DNSPARE ' 


AORES 

DNSPARE 


ADRES 

DNSPARE 

501L5TB2 

adres 

STBJFF +13D 


ADRE5 

STBUFF +12D 


AORES 

STBJFF +11D 


A3RE5 

STBUFF +10D 


A3RES 

STBUFF +90 


ADRES 

STBUFF +8D 


ADRES 

STBUFF +7 


ADRES 

STBUFF +6 


A3RES 

STBUFF +5 


A3RES 

STBUFF *4 


ADRES 

STBUFF *3 


ADRES 

STBUFF +2 


ADRES 

STBUFF +1 


ADRES 

STBUFF 


ADRES 

STCNTR 


ADRES 

DNSPARE ' 

50lLSTBi 

ADRES 

TAVEGON +1 


ADRES 

TAVEGON 


ADRES 

VAVEGON +5 


ADRES 

VAVEGON -t-9 


ADRES 

VAVEGON +3 


ADRES 

VAVEGON *2 


ADRES 

VAVEGON ♦! 


ADRES 

VAVEGON 


ADRES 

RAVEGON +5 


ADRES 

RAVEGON +4 


ADRES 

RAVEGON +3 


ADRES 

RAVEGON +2 


ADRES 

RAVEGON +1 


ADRES 

RAVEGON 


ADRES 

TCUTOFF +l 


ADRES 

TCUTOFF 


ADRES 

TimEIGR 


ADRES 

TIME2GR 




COMMON TO LISTS I AND 2 


EVENT TIME 



ADRES piptime +1 
AORES piptime 
AORES VN +5 
ADRES VN ♦A 


<tB^578A YUL SYSTEM FOR AGC4; REVISION 0 OF PROGRAM SOLRUM55 BY 


L 001 oown-telemetRy program 


0231 

REF 

3 

LAST 

157 

10»6J54 

00776 

1 


ADRES 

0232 

REF 

4 

LAST 

158 

10,6055 

00775 

1 


AD^^ES 

0233 

REF 

5 

LAST 

158 

10,605b 

00774 

0 


A3RE5 

U23A 

REF 

6 

LAST 

158 

10,6057 

00773 

1 


AD-iES 

0235 

REF 

1 



10,6060 

00772 

0 


A3RES 

0236 

REF 

2 

LAST 

15b 

10,6061 

00771 

0 


A3RE5 

0237 

REF 

3 

LAST 

158 

10,6062 

00/70 

1 


A3RE5 

0230 

REF 

4 

LAST 

158 

10, 6063 

0076/ 

1 


AORES 

0239 

REF 

5 

LAST 

158 

10, 6064 

00766 

0 


ADRES 

02a0 

REF 

6 

LAST 

158 

10,6065 

00/65 

0 


A3RE5 

02**1 

REF 

1 



10,6066 

06026 

0 


A3RE5 

02A2 

REF 

1 



10,6067 

0145 / 

0 

501LSTA1 

A3RES 

0243 

REF 

2 

LAST 

158 

10,60 ?0 

01456 

1 


A3RES 

0244 

REF 

1 



10,6071 

01113 

0 


A3RE5 

0245 

REF 

2 

LAST 

158 

10,6072 

01112 

1 


ADRES 

0246 

REF 

3 

LAST 

158 

10,6073 

01111 

1 


ADRE5 

0247 

REF 

4 

LAST 

158 

10,6074 

OHIO 

0 


ADRES 

0248 

REF 

5 

LAST 

158 

10,6075 

01107 

0 


A3RE5 

0249 

REF 

6 

LAST 

158 

10,6076 

01106 

1 


AORES 

0250 

REF 

1 



10,6077 

01105 

1 


A3RES 

0251 

REF 

2 

LAST 

158 

10,6100 

01104 

0 


A3RE5 

0252 

REF 

3 

LAST 

158 

10,6101 

01103 

1 


ADRES 

0253 

REF 

4 

LAST 

158 

10,6102 

01102 

0 


AORES 

0254 

REF 

5 

LAST 

158 

10,6103 

OllOl 

0 


A3RES 

0255 

REF 

6 

LAST 

158 

10,6104 

01100 

1 


A3RE5 

0256 

REF 

1 



10,6105 

00702 

1 


A3RE5 

0257 

REF 

2 

LAST 

158 

10,6106 

00/01 

1 


A3RE5 

0258 

REF 

3 

LAST 

158 

10,610^ 

00700 

0 


AORES 

0259 

REF 

1 



10,6110 

01005 

0 


A3RES 

0260 

REF 

2 

LAST 

158 

10,6111 

01003 

0 


A3RES 

0261 

REF 

3 

LAST 

158 

10,6112 

01001 

1 


ADRE5 

02fa2 

REF 

4 

LAST 

143 

10,6113 

01075 

1 


AORES 

0263 





^o 

o 

52525 

1 

0N5PARE 

DCT 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 158 


USER'S OlwN page no, 8 


VN +3 
VN *2 
VN +1 
VN 

RN +5 
RN ♦A 
RN +3 
RN +2 
RN +1 
RN 

501LSTB1 
TFF +1 
IFF 

VRECT +5 
VRECT ♦A 
VRECT +3 
VRECT +2 
VRECT +I 
VRECT 
RRECT +5 
RRECT +A 
RRECT +3 
RRECT +2 
RRECT +l 
RRECT 
THETAD +2 
ThETAD ♦! 
ThETAD 
DELVX +A 
OELVX +2 
DELVX 
REDOCNTR 

52525 


AT FDD'S REQUEST, 


YUL SYSTEM POR AGC<V: REVISION 0 OF PROGRAM SOLRUMSS BY 


L oul tarupt output Control programs 


0001 

0002 REF 
00U3 REF 

0004 REF 

0005 REF 

0006 REF 

0007 REF 

0008 REF 

0009 REF 

0010 REF 

0011 REF 

0012 REF 

0013 REF 

0014 REF 

0015 REF 

0016 REF 

0017 REF 

0018 REF 

0019 

R0020 
R0021 

0022 

0023 

0024 

0025 

0026 
0027 
0026 

0029 

0030 

0031 

0032 

0033 

0034 

0035 


57 

LAST 

154 

1 

2 

LAST 

147 

1 

2 

LAST 

159 

57 

LAST 

146 

3 

LAST 

159 

1 

2 

LAST 

147 

5 

LAST 

154 

2 

LAST 

95 

4 

LAST 

159 

1 

36 

LAST 

154 

4 

LAST 

154 

1 

2 

LAST 

159 


2630 


2630 

3 

5501 

0 

2631 

5 

0010 

0 

2632 

1 

0033 

0 

2 633 

0 

2643 

1 

2634 

0 

2642 

0 

2635 

6 

4516 

1 

2636 

5 

0033 

1 

2637 

3 

2651 

1 

2640 

5 

0040 

0 

2641 

0 

2266 

1 

2642 

3 

5362 

0 

2643 

5 

0033 

1 

2644 

3 

2650 

0 

2645 

3 

0015 

0 

2646 

5 

0030 

1 

2 647 

0 

6115 

1 

2650 


20115 

0 

2651 


37774 

1 


265 2 

04025 

1 

2653 

10003 

0 

2654 

14031 

0 

2655 

20033 

0 

2656 

24017 

1 

2657 

30036 

1 

2660 

34034 

1 

2661 

40023 

1 

2662 

44035 

1 

2 66 3 

50037 

0 

2 664 

5AOOU 

0 

2665 

60000 

1 

2 666 

6AOOO 

0 

266 7 

70000 

0 


BASi< 

T4RUPT CAF 

TS 

CCS 

TC 

TC 

A3 

T5 

CAF 

TS 

TC 

REGRUPT CAF 
♦ 1 TS 

CAF 

XCR 

TS 

TC 

LT4RUPTA CAOR 
40M5RUPT OCT 


RELTAB OCT 

OCT 

OCT 

OCT 

DCT 

OCT 

OCT 

OCT 

OCT 

OCT 

OCT 

RELTABll OCT 

OCT 

7 OK OCT 


RELTAB IS A PACKED TABLE. RELAYWORO CODE IN UPPER 4 B1 
IN LOWER 5 BITS. 


NASA 1021108-021 


1 

ZERO 

OUTO 

DSRUPTSW 
REGRUPT ♦! 
REGRUPT 

ONE 

DSRUPTSW 

40MSRUPT 

TIME4 

nbresume 

Seven 

DSRUPTSW 

LT4RUPTA 

bankreg 

BANKRUPT 

T4RUPTA 

T4RUPTA 

37774 

TS, RELAY Code 


04025 

100Q3 

14031 

20033 

24017 

30036 

34034 

40023 

44035 

50037 

54000 

60000 

64000 

70000 


DEC 4, 1966 (MAIN) PAGE 159 


USER*S OWN page NO. 1 


ALONSO thinks THIS SHOULD BE TURNED OFF 
EVERY 60 MS AS A MATTER OF COURSE. 

SEE IF THIS IS A SPECIAL RUPT TO 
ZERO OUTO 20MS AFTER IT WAS DRIVEN BY 
DSPOUT. IF SO, DSRUPTSW IS NNZ. 

RESTORE DSRUPTSW TO ITS POSITIVE VALUb. 


SET TIME4 TO INTERRUPT 40 MS FROM NOW, 

Re-establishing the regular 60 ms 
Pattern, then do nq-bank-switch resume. 

REGULAR 60 MS RUPT - COUNT DOWN ON 
DSRUPTSW. 

Call in APPROPRIATE BANK, 

SAVE bankreg For resume. 


Interrupt in 4o ms. 


ALSO useful as A BANK-Sw I TCHING MASK, 


48^b78A YUL SYSTEM FOR AGC4; REVISION o Of- PROGRAM SOLRUMSS &Y NASA l021l08*021 


Dec a* 1966 


(MAIN) 


Page i6o 


L 001 taRupt output Control programs user*s own page no, 2 


P0036 

routine to 

zero (OR pseudo- 

ZERO) the 

OPTICS 

counters. 


0037 

REF 58 LAST 159 

2670 3 5501 

0 

ZEROOCTR CAF 

ZERO 


0038 

REF 1 

26/1 5 0052 

0 


T5 

OpTX ^ 

n 

R0039 

RIGHT Here we used to test bit 13 OF 

WASOPSET* 

NOrt ASSUME 

-s 

ROOAO 

unconditionally that 

5XT POWER IS ON 

(BIT 13 = 

1) * 



00A2 

ref 1 

2672 A 2675 

0 


C5 

20DEGS 

SET OPTY APPROX -20 PEGS (SXT ON) 

OOA3 

REF 1 

2673 5 0053 

1 


TS 

OPTY 


OOAA 

REF 103 LAST 155 

267a 0 0001 

0 


TC 

Q 


OOAS 


2675 16037 

i 

20DEGS 

DEC 

7199 




^ !> 78 A 


L OUl 

P00^7 

00^8 
00 <4 9 
00i>0 

00 bl 

0032 

00321 

00522 

00323 

00324 
00323 

00326 

00327 

00528 

00329 

0033 

00331 

0034 

0035 

0056 

0057 


00571 


YUL system fop AGC4: REVISION 0 OP PROGRAM 50LRUf^55 By 


T4RUPT OUTPUT CqNtROL PROGRAMS 


SWITCHeD-BANK portion of T4RJPT. 








10,611 

5 


bank 

REF 

18 

LAST 

119 

10»6U3 

3 

0034 

0 

T4RUPTA 

XCH 

REF 

3 

LAST 

119 

10*6116 

3 

0031 

0 


T5 

REF 

1 



10*611 1 

3 

704? 

0 


CAF 

REF 

3 

LAST 

159 

10*6120 

5 

0040 

0 


TS 

REF 

4 

LAST 

136 

10,6121 

3 

0004 

0 


XCR 

REF 

1 



10,6122 

3 

6140 

1 


CAP 

REF 

5 

LAST 

161 

10*6123 

7 

0004 

1 


MASK 

REF 

120 

LAST 

154 

10*6124 

1 

0000 

0 


CCS 

REF 

1 



10*6125 

0 

6133 

0 


TC 





10,6126 

0 

6130 

0 


TC 

REF 

2 

LAST 

161 

10 *612 ^ 

0 

6133 

0 


TC 

REF 

3 

LAST 

141 

10*6130 

4 

4312 

1 


C5 

REF 

19 

LAST 

156 

10,6131 

7 

0645 

1 


MASK 

REF 

20 

LAST 

161 

10,6132 

3 

0645 

0 


TS 

ref 

3 

LAST 

147 

10*6133 

1 

067? 

0 

DSKYON 

CCS 

REF 

1 



10*6134 

0 

6142 

0 


TC 

REF 

2 

LAST 

161 

10,6135 

0 

6141 

0 


TC 

REF 

1 



10*6136 

0 

6223 

1 


TC 

REF 

2 

LAST 

161 

10*613 f 

0 

6223 

1 


TC 





10*6140 


40037 

1 

DSKYMASK 

OCT 


(MAIN) page 161 


NASA 1021108-021 DEC 4, 1966 

USER’S OWN PAGE NO. 3 


10 

OVCTR SAVE OVCTR, 

OVRUPT 

60M3RUPT T4 NORMALLY INTERRUPTS EVERY 60 MS. 

TIME4 


INO 

DSKYMASK 

INO 

A 

DSKYON 

♦ 2 

dskyon 

biT5 

STATE 

STATE 



COUIND 
DOIMUCOU *1 
OOIMUCDJ 


RESET INO TO present VALUE OF 0E5CRETES. 
RESET double-entry INTERLOCK IF KEYCODE 
HAS DISAPPEARED, 


RESET « 

}0 


DO AN IMU.CDU IF DESIRED. 
WITH NEW CDUIND IN A. 

SET COUNT TO 2. 


DSRJPT6R NU CDU. NNZ MEANS CDUS ARE RESERVED. 

DSRUPTBR -U MEANS THEY ARE AVAILABLE. 


40037 


Includes keycode and mark bit. 


4bA^78A YUL SYSTEM FOR AgC4j REVISION 0 OF PRDgKAM 50LRUM55 BY NASA 1021108-021 


dec At 1966 


(MAIN) page 162 


L 001 TaRUPT output control PRD5RAMS USER’S ONN PAGE NO, A 


poose 



TAkUPT IMJ 

CDU DRIVE 

— 

SERVI 

CED 

EVERY 60 vis. 



00S9 

REF 

17 

LAST 

146 

10t61vl 

3 

5503 

L 

DOIMUCDU CAF 

TWO 

Set CDUIND back TO 2, 

0060 

REF 

A 

LAST 

161 

1 0 t 6 1 A2 

5 

0677 

1 

+ 1 TS 

CDUIND 


0061 

REF 

9 

LAST 

97 

10 » 6 1 A3 

3 

0003 

1 

xch 

LP 

SAVE LP For IMU CDU DRIVE ONLY. 

0062 

REF 

1 



1 0 t 6 1 A A 

5 

0032 

0 

TS 

LPRUPT 


0063 

REF 

5 

LAST 

162 

lOtblAS 

2 

06 7 7 

0 

INDEX 

CDUIND 

0 FOR X. 1 FOR Y. And 2 FOR Z. 

006A 

REF 

A 

LAST 

I5a 

10 1 6 1 A6 

A 

0700 

1 

C5 

TMETAD 

PICK UP DESIRED ANGLE. 

0065 

REF 

1 



10t61A7 

5 

ObOO 

1 

T5 

1TEMP2 


0066 

REF 

6 

LAST 

162 

10t6150 

2 

0677 

0 

INDEX 

CDUIND 


0067 

ref 

2 

LAST 

156 

10t615i 

A 

OOA7 

0 

C5 

cdux 

Read and save cdu counter. 

0068 

REF 

1 



10t6152 

0 

7A10 

0 

TC 

2SCUMDIF 

Difference with -o unequal to +o. 

0069 





10»6153 

2 

5777 

1 

EXTEND 


RLTURNS with DIFFERENCE IN A. 

0070 

REF 

1 



lOtSlSA 

A 

6215 

0 

VI? 

K G 


0071 

ref 

A 

LAST 

119 

I0t6l55 

5 

0577 

1 

TS 

ITEMPI 

COMMAND TO TEMP STORAGE 

00 iz 

REF 

121 

LAST 

161 

10 1 6 1 56 

1 

0000 

0 

CCS 

A 

check signum OF command 

0073 

REF 

1 



10»6157 

0 

6166 

0 

TC 

P0SC0M2 


007A 

REF 

1 



10 1 6160 

0 

6220 

1 

TC 

CDURSM 


0075 

REF 

1 



10.6161 

0 

6163 

D 

TC 

NEGC0M2 


0076 

REF 

2 

LAST 

162 

10.6162 

0 

6220 

1 

TC 

CDURSM 




YUL SYSTEM FOR AGC^t REVISION 0 OF PROGRAM SOLRUMS5 BY 


L 001 

TaRUPT OUTPUT 

Control 

PROGRAMS 






00 f7 

REF 

5 

LAST 

162 

10,6163 

5 

0577 

1 

NEGC0M2 

TS 

00/8 

ref 

7 

LAST 

162 

1 0 , 6 1 6 A 

A 

0677 

0 


cs 

0079 

REF 

1 



10,6165 

0 

6171 

0 


TC 

UObO 

ref 

6 

LAST 

163 

10,6166 

5 

0577 

1 

P05C0M2 

TS 

OObl 

REF 

58 

LAST 

159 

10,6167 

3 

A516 

1 


CAP 

U0b2 

REF 

8 

LAST 

163 

10,6170 

6 

067 7 

1 


AD 

0083 

REF 

19 

LAST 

161 

10,6171 

5 

00 3 A 

0 

CDUOUT 

TS 

008A 

REF 

1 



10,61 12 

3 

6200 

0 


CAP 

OObS 

REF 

1 



10,6173 

3 

0012 

1 


XCH 

00B6 

REF 

1 



10,617A 

7 

7A65 

0 


MASK 

0087 

REF 

2 

LAST 

163 

10,6175 

3 

0012 

1 


XCH 

00b8 

REF 

1 



10,6176 

6 

6201 

1 


AD 

0089 

REF 

122 

LAST 

162 

10,6177 

1 

0000 

0 


r c 

c. ^ 

U090 





10,6200 

02OA0 

1 

DUMCODE 

OCl 

0091 





10,6201 

75737 

0 

-DUMCODE 

OCT 

0092 

REF 

1 



10,6202 

0 

7377 

0 


TC 

0093 

REF 

7 

LAST 

163 

I0i6203 

A 

0577 

0 


CS 

009A 

REF 

12 

last 

1A7 

10,620A 

6 

AA76 

0 


AD 

0095 

REF 

1 



10,6205 

5 

00A2 

1 


TS 

0096 

REF 

2 

LAST 

163 

10»6206 

3 

6200 

0 


CAF 

0097 

REF 

3 

LAST 

163 

10,6207 

3 

0012 

1 


XCH 

0098 

REF 

20 

LAST 

163 

10,6210 

2 

003 a 

1 


INDEX 

0099 

REF 

1 



10,6211 

6 

7A52 

0 


AD 

0100 

REF 

A 

LAST 

163 

10,6212 

3 

0012 

1 


XCH 

0101 

REF 

2 

LAST 

163 

10,6213 

6 

6201 

1 


AD 

0102 

REF 

123 

LAST 

163 

10,621A 

1 

0000 

0 


CCS 

0103 





10,6215 


05605 

1 

kg 

DEC 

OlUA 

REF 

15 

LAST 

12a 

10,6216 

0 

3062 

D 


TC 

0105 

REF 

2 

LAST 

163 

10,6217 

0 

7377 

0 


TC 

0106 

REF 

59 

LAST 

163 

10^6220 

3 

A5 1 6 

1 

cdursm 

CAF 

0107 





10,6221 

2 

5777 

1 


EXTEN 

0106 

REF 

2 

LAST 

162 

10,6222 

A 

0032 

1 


M P 
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(MAIN) PAGE 163 


1 TEMPI 
CDUIND 
CDUOUT 


ITEMPi 

ONE 

CDUIND 


OVCTR 

DUMCODE 

0UT2 

UOI^B 

0UT2 

-DUMCODE 

A 

020A0 

-20A0 

JAC<POT 


USER’S OWN page NO. b 

SAVE CCS OF COMMAND. 

USE NEGATIVE TO SELECT 0UT2 PATTERN. 

SAME AS Above except ucouind selects. 


CUOE WHICH interrupts 0UT2 PULSES DURING 
UUT2 modification, BUT ALLOWS DETEC- 
TION OF THE VERY RARE EVENT THAT THE 
PULSE THAT RESETS ANOTHER FIELD OF 0UT2 
WAS REQUESTED DURING THE ORIGINAL 
ACH 0UT2. 

Ii>tCOMPLETE OUTz SETTINGS (X AND OPTX). 
THE PROBABILITY OF THIS IS ABOUT ZERO. 


ITEMPi 

POSMAx 

OUTCRl 


DUMCODE 

0UT2 

OVCTR 

CDUCODES *2 
0UT2 

-DUMCODE 

A 


. le 

CCSHOLE 

jackpot 

ONE 


FORM l.O - ABS (COMMAND) . 


NUW ENABLE OUTCRl BY SETTING 0UT2. 


CuU DRIVING gain 


RESTORE LP. 


LPRUPT 


^b^b78A YUL SYSTEM pOW AGC^; REVlSIuN 0 Op pR:JGRAm SOLRumSS By NASA 1021108-021 


UEC a f 1 9fe6 


(MAIN) page 164 


L Oul 

T4RUPT 

output 

Control 

PROGRAMS 





USER»S OWN page no. 6 

P0109 



branch according to 

DSRUPl S^J 

AND PERFOR'^ THE 

APPROPRIATE 

D5RUP( FUNCTIONS, 

0111 

REF 

5 

last 

159 

10,6223 

2 

0033 

0 

DSHUPTBR INDEX 

DSRUPTSrt 

JUMP ON DSRUPTSw, 

0112 





10,6224 

0 

6225 

1 

TC 

+ 1 


0113 

REF 

1 



10,6225 

0 

6701 

1 

TC 

TMCHECK 

=0 

0114 

REF 

1 



10,6226 

0 

6447 

0 

TC 

LOSCAN 

LOOK FOR lift OFF EVERY 480 MS. 

0115 

REF 

2 

LAST 

1 64 

10,622 7 

0 

6701 

1 

TC 

The HECK 


0116 

REF 

1 



10,6230 

0 

63 55 

1 

TC 

NWALM 

Ii^ITIATE NIGHT wATCHMAN JOB, 

0U7 

REF 

3 

LAST 

164 

10,6231 

0 

6701 

1 

1 C 

TMCHECK 

*4 

0118 

ref 

1 



10,6232 

0 

6501 

0 

TC 

OPTTEST 

=5 SERVICE OPTICS CDU5, 

0119 

REF 

4 

LAST 

164 

10,6233 

0 

6701 

1 

TC 

Tmcheck 

sb 


4b4j378A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUMss SY NASA 1021108-021 


DEC ^ f l9b6 
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L 001 

P0120 

0122 

0123 

012A 

0125 

0126 
0127 
0 1 2 (i 

0129 

0130 

0131 

0132 

0133 
013A 

0135 

0136 

0137 

0138 


0139 

QIAO 

OlAl 

01A2 


01A3 

0194 

0145 

0146 

0147 
0146 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 


T4RUPT output Control programs 


USER'S OWN page no* 


REF 

REF 

REF 

REF 


6 

1 

2 

1 


system failure input bits MONliOR - entered every 400 


last 146 

LAST 165 


10*6234 1 0726 0 

10*6235 0 6240 I 

I0*623b 0 6240 1 

10*6237 0 6463 0 


ERRORMON 



OLDER 

5n 

ERRMON 

ENDT4ERR 


BY T4RUPT* 


Ignore bits if C(olderR) = 40 uou 

ORDINARILY POSITIVE. 


REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

ref 

REF 

REF 

REF 

ref 

REF 

REF 


8 

4 
9 

1 

21 

9 

22 

18 

5 

125 
4 

10 

126 
I 


LAST 

LAST 

LAST 


165 

165 

165 


LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 


156 

143 

165 

162 

165 

165 

148 

165 

165 


6 last 165 
1 

3 LAST 165 


ref 

2 

Last 

1 56 

10*6240 

3 

0006 

1 

ERRMON XCH 

1N2 

Refresh last-sampled-erhors register 

REF 

3 

LAST 

165 

10*6241 

3 

0006 

1 

xCh 

IN2 


REF 

I 



10 f 6 242 

7 

6252 

0 

viAS< 

ERRMASK 


REF 

2 

LAST 

162 

10,6243 

5 

OfeOO 

1 

TS 

ITEMP2 


REF 

2 

LAST 

165 

10,624^ 

3 

6252 

1 

CAF 

E_KRMASK 


REF 

7 

LAST 

165 

10,6245 

7 

0726 

0 


oldei?^ 






10*6246 

4 

0000 

0 




REF 

3 

LAST 

165 

10*624/ 

6 

0600 

1 

AD 

ITEMP2 


REF 

124 

LAST 

163 

10*6250 

1 

0000 

0 

CCS 

A 


REF 

1 



10*6251 

0 

6255 

0 

TC 

ERRCHANG 

CHANGED* 





10*6252 

07000 

0 

ERRMASK DC! 

07000 

IMU, COU* AND PIPA FAIL. 

ref 

2 

LAST 

165 

1 0 f 6 2 f> 3 

0 

6255 

0 

TC 

LRRCHANG 


REF 

2 

LAST 

165 

10*6254 

0 

6463 

0 

TC 

ENDI4ERR 

EXIT - NO change HAS TAKEN PLACE, 

REF 

3 

last 

165 

10*6255 

4 

6252 

0 

errchang cs 

^^RMASK 

UPDATE IMU FAIL BITS IN OLDeRR. 


10*6256 

10,6257 

10,6260 

10*6261 
10,6262 
10,6263 
10* 6264 

10*6265 

1 0 * 6 2 6fc» 

10*6267 
10*6270 
10,6271 
10*6272 
10*62 73 

10*6274 
10*62 75 


7 

6 

5 

3 

7 

6 

5 

3 

5 

2 

3 

7 

1 

0 


0726 

ObOO 

0726 

6277 

0723 

4500 

0723 

5503 

0600 

0000 

4503 

0726 

0000 

6300 


I 0600 
0 6266 


0 

I 

1 

0 

0 

0 

1 

1 

1 

0 

0 

0 

0 

1 

0 

0 


OLD 


ERRSCAN 


AD 

'~~fcfEMP2 

OLDER^ 

C4F 

LITESOUT 

MASK 

DSPTAB +11D 

AD 

bIT15 

T5 

DSPTAB +110 

CAF 

TWO 

TS 

nEMP2 

INDEX 

A 

CAF 

BiXiZ. 


TU INDICATE CHANGE* 


TURN ON lights ACCORDING TO CIOLDERR) 


select bit in olderr. 



ERRSCAN3 CCS 

tc 


10,6276 0 6463 0 


ITEMP2 

ERRSCAN 

ENDT 4ERR 


BIT IS PRESENT. 

LOOP THREE TIMES THROUGH 


F iNl SHED* 


I0t6277 37437 0 LITESOUT OCT 


37437 
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L 001 

Ruise 

R0160 

0161 
U 162 
0163 

0 1 6A 
0165 

0 1 66 

0167 

0168 

0169 

0170 

0171 

0172 

0173 

01 7A 

0175 

0176 

0177 
01 78 

0179 

0180 
0181 
0182 
0183 

OIBA 

0185 

0186 
0187 
0168 

0189 

0190 

0191 

0192 

0193 
019A 

0195 

0196 

0197 

0198 

0199 

0200 


(MAIN) PAGE 166 


TAUuPT OUTPUT Control programs user's own page no. e 

process error signals preSlnt. note that C(rtASKStT) indicates the State of the system since no Relays 

have been switched in the last IZO MS, AND KSAMP rtAS EXECUTED 60 MS AGO, 


REF 

7 

LAST 

165 

10,6300 

2 

0600 

0 

BITON index 

ITEMP2 

2* If OR 0. 





10»630i 

0 

6302 

0 

TC 

+ 1 


REF 

1 



10,6302 

0 

6305 

1 

TC 

IMUFAIL 


REF 

1 



10,6303 

0 

6 346 

0 

TC 

PIPAFAIL 


REF 

1 



10,6 304 

0 

6327 

1 

TC 

CUUFAlL 


ref 

6 

LAST 

IA3 

10,6305 

1 

0727 

1 

IMUFAIL CCS 

waskset 

Failure not legitmate if in cuakse align 

REF 

1 



10,6306 

0 

63l6 

0 

TC 

IFiUFAl L2 

PURSUE THIS ONE. 

ref 

1 



10,6307 

0 

6350 

1 

TC 

nofail 

No MODE-DEPENDENT FAILURE MONITORING 

REF 

2 

LAST 

166 

10*6310 

0 

6350 

1 

TC 

NOFAIL 

IF MODINO failure OR PROCEDURAL FAILURE. 

REF 

3 

LAST 

166 

10,6311 

0 

6350 

1 

TC 

NOFAIL 


REF 

2 

LAST 

39 

10,6312 

3 

4507 

1 

IMUFA1L3 CAF 

blTB 

TURN ON IMU FAIL LIGHT, 

REF 

23 

LAST 

165 

10,6313 

6 

0723 

1 

failiton ad 

dsptab +ud 

(WHICH HAD BEEN ZEROED IN ALL LIGHT 

REF 

2A 

LAST 

166 

10,6314 

5 

0723 

1 

T5 

DSPTAB +11D 

PUSITIONS) , 

ref 

1 



10,6315 

0 

6274 

0 

TC 

ERRSCAN3 

PROCESS NEXT INPUT BIT. 

ref 

60 

LAST 

163 

10*6316 

6 

4516 

1 

IMUFAIL2 AD 

ONE 

SEE IF COASE ALIGN ACHIEVED. 

REF 

2 

LAST 

74 

10*6317 

7 

4515 

0 

viAS< 

bm 


REF 

127 

LAST 

165 

10*6320 

1 

0000 

0 

^ ^ c 

^ ^ w 

A 


REF 

A 

LAST 

166 

10*6321 

0 

6350 

1 

TC 

nofail 


ref 

5 

LAST 

155 

10*6322 

3 

4513 

1 

.X4F 

>1T4 ^ 

SEE IF within 5 SECONDS OF COARSE ALIGN. 

REF 

11 

Last 

165 

1 0 , 6 32 3 

7 

0726 

0 

t MA5< 

1 

/OLDER^^' 


REF 

128 

LAST 

166 

10,632^* 

1 

0000 

0 




REF 

5 

LAST 

166 

10*6325 

0 

6350 

1 

TC 

NOFAIL 

IF 50* 

REF 

1 



10*6326 

0 

6312 

1 

TC 

iMUFAIL3 

Failed, 

REF 

7 

LAST 

166 

10*6327 

1 

0727 

1 

CDUFAIL CCS 

waskset 


REF 

1 



10*6330 

0 

6336 

1 

TC 

CDUFATL2 

Failure only if in fine align. 

REF 

6 

LAST 

166 

10*6331 

0 

6350 

1 

TC 

NOFAIL 

(oEE NOTE FOR IMUFAIL) . 

REF 

7 

LAST 

166 

10*6332 

0 

6350 

1 

TC 

nofail 


REF 

8 

LAST 

166 

10,6333 

0 

6350 

1 

TC 

nofail 


REF 

2 

LAST 

104 

lO ,6334 

3 

4511 

0 

C0UFAIL3 CAF 

BIT6 

cuu fail light on. 

REF 

1 



10*6335 

0 

6313 

0 

TC 

failiton 


REF 

■a 

LAST 

166 

10*6336 

4 

4511 

1 

CDUFAIL2 CS 

En6 

TURN ON Fail light only if in fine align 

REF 

6 

LAST 

166 

10*633? 

7 

0727 

1 

MA5< 

WASKSET 


REF 

1 



10,6340 

6 

6 343 

0 

AD 

-BIT4 


REF 

129 

LAST 

166 

10,6341 

1 

ouoo 

0 

CCS 

A 


REF 

9 

LAST 

166 

10 , 6342 

0 

6350 

1 

TC 

nofail 






10*6343 

7776 7 

1 

-BIT4 OCT 

-10 


REF 

10 

LAST 

166 

10*6344 

0 

6350 

1 

TC 

NOFAIL 


REF 

1 



10,6345 

0 

6334 

0 

TC 

CDUFAIL3 

TURN ON the light. 

ref 

1 



10,6346 

3 

45 1 0 

1 

PIPAFAIL CAF 

bIT7 

TURN ON Fail light unconditionally. 

REF 

2 

LAST 

166 

10*6347 

0 

6313 

0 

TC 

failiton 
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L 001 TARUPT OUTPUT CONTROL PROGRAMS 


USER'S OWN page NO. 9 


0201 

ref 

8 

LAST 

166 

10*6350 

2 

0600 

0 

0202 

REF 


LAST 

165 

10,6351 

A 

A503 

I 

0203 

ref 

r^i 

last 

166 

10*6352 

7 

0726 

0 

02aA 

REF 

Uaj 

Last 

167 

10,6353 

5 

0726 

1 

0205 

REF 


LAST 

166 

10*635A 

0 

627A 

0 


NOFAIL 



MPz 

bPT 

OLDy«R 
\Oy>eRR 
RRSCAN3 


CUMES here if present MODE INHIBITS FAIL 
BITS, this maintains PRESENT ACTUAL 
ERRORS IN OLDERR FOR THE NIGHT WATCH- 
MANS BENEFIT! IN PARTICULAR. 


D 


^b^t?78A YUL SYSTEM FoR AGC4; REVISIor4 0 Of- P'^oGRAM SoLRUMbS 6Y NaSA 1021108-021 


DEC A* 1966 


(Maim) page i6fi 


L 001 TARUPT OUTPUT CONTROL PRDoRAMS 


USER»S OtiN page no. 10 


P0206 


NIGHT-WAtChMAN alarm, serviced every A80 '^S BY TaRUPT, 


0207 

REF 

1 



10»6355 

3 

2171 

U20B 

REF 

3 

LAST 

1 A4 

10^6356 

0 

2052 

0209 

REF 

1 



10*635 f 

20364 

02091 

REF 

6 

LAST 

151 

10 * 6360 

4 

4505 

02092 

REF 

lA 

LAST 

156 

10,6361 

7 

0011 

02093 

REF 

15 

LAST 

168 

10,6362 

5 

0011 

0210 

REF 

1 



10,6363 

0 

6463 

R02U 



niohj-^atChman Job - 

DiDDLtS 

0213 

REF 

1 



10,6364 

3 

7503 

021A 





10,6365 

2 

0017 

0215 

REF 

lA 

LAST 

167 

10,6366 

7 

0726 

0216 

REF 

130 

LAST 

166 

10,636 ? 

1 

0000 

0217 

REF 

1 



10,6370 

0 

6405 

0218 

REF 

6 

LAST 

166 

10,6371 

4 

4513 

0219 

REF 

16 

LAST 

168 

10,63 fl 

7 

0011 

0220 

REF 

lOA 

LAST 

160 

10,6373 

5 

0001 

0221 

REF 

17 

LAST 

168 

10,6374 

4 

0011 

0222 

REF 

7 

LAST 

168 

10,6375 

7 

4513 

0223 

REF 

105 

LAST 

168 

10,63 76 

6 

0001 

022A 

REF 

18 

LAST 

168 

10,6377 

3 

OOi 1 

0225 

REF 

19 

LAST 

168 

10,6400 

5 

0011 

0226 

REF 

1 



10,6AOl 

4 

45 14 

0227 

REF 

15 

LAST 

168 

10,6402 

7 

0726 

0228 

REF 

16 

LAST 

168 

10,6A03 

5 

0726 

0229 

REF 

5 

LAST 

150 

10, 6404 

0 

2124 

0230 

ref 

3 

LAST 

101 

10,6AO5 

6 

2261 

0231 

REF 

131 

LAST 

168 

10,6A06 

1 

0000 

0232 

REF 

1 



10,6<t07 

0 

6427 

0233 

REF 

2 

LAST 

168 

10,6410 

0 

6h27 

023A 

REF 

3 

LAST 

168 

10,6411 

0 

642 7 

0235 

REF 

3 

LAST 

159 

10,6412 

4 

5362 

0236 

REF 

5 

LAST 

lAO 

10,6413 

7 

0612 

0237 

REF 

1 



10,6414 

6 

6417 

0238 

REF 

132 

LAST 

168 

10,6415 

1 

0000 

0239 

REF 

A 

LAST 

168 

10,6416 

0 

642 7 

02 aO 





10,641 7 

77757 

02AI 

REF 

5 

LAST 

166 

10,6420 

0 

6427 

02A2 

REF 

1 



10,6421 

4 

6425 

02A3 

REF 

6 

LAST 

168 

10,6422 

6 

0612 


NWALM 


CAP 

TC 

CAOR 


PR1036 

novac 

NWJOB 


cs 


1 


MAS< 

T5 


BITIO 

Out I 
OUT 1 




RtSET BLOCK-ENDPULSe EVERY HALF SECOND 


TC 


sabscan 


0 

0 

Q 

0 

0 

0 

0 

0 

0 

0 

0 

1 

1 

1 

0 

1 

1 


0 

0 

0 

0 

D 


i 

0 

0 

0 

0 

1 

0 


NWJOB 


CAP 

I M H I NT 

"^''tArsic 


nwmask 


(f CCS 


‘OLDEfW 
A 


DONW 


NONNWJOB 


-MODE20 


-ft 

—NONNWJOB 

CS 

eiT4 

MASK 

OUTl 

T5 

Q 

CS 

OUT! 

MASK 

BIT4 

AD 

Q 

XCH 

OUT! 

T5 

OUTl 

CS 


MASK-' DTDtRR ) 

fs 

TC 

ENOOFJOB 

AD 

BANKMASK 

CCS 

A 

TC 

NO I NH 

TC 

NOINH 

TC 

NO I NH 

CS 

SEVEN 

MASK 

MODREG 

AD 

-M0DE20 

^ c 

V ^ ^ 

A 

TC 

NOINH 

OCT 

-20 

TC 

NOINH 

CS 

MUDE21 

AD 

MODKEG 





DuNT ISSUE signal IF IMU, PiPA, OR 


RESTART FAIL IS ON. 


RESET INHIBIT INDICATOR. 


SEE IF PIPA FAIL ONLY PROBLEM. 


CHECK FOR MODES 22 - 27. 


NO MODE 20. 


6 • 


i • ''' 'lit 
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DEC 4, 
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024A 

REF 

133 

LAST 

168 

10.6423 

1 

0000 

0 

0245 

REF 

1 



10.6429 

0 

6371 

1 

0246 





10.6925 

00021 

1 

0247 

REF 

2 

LAST 

169 

10*6926 

0 

6371 

1 

0248 

Ref 

2 

LAST 

168 

10 * 6 A2 7 

4 

9514 

1 

0249 

REF 

17 

LAST 

168 

10.6A30 

7 

0726 

0 

0250 

REF 

3 

LAST 

169 

10,6431 

6 

4514 

0 

0251 

REF 

18 

LAST 

169 

10*6932 

3 

0726 

1 

0252 

REF 

4 

LAST 

169 

10*6933 

7 

4514 

1 

0253 

REF 

134 

LAST 

169 

10*6939 

1 

0000 

0 

0254 





10*6935 

0 

6437 

1 

0255 

REF 

6 

LAST 

168 

10*6936 

0 

2124 

i 

0256 





10*6937 

2 

0016 

1 

0257 

REF 

2 

LAST 

124 

1 0 * 6 990 

0 

2346 

1 

0258 





10*6991 


00077 

1 

0259 





10*6992 

0 

6949 

0 

0260 

REF 

7 

LAST 

169 

10*6993 

0 

2129 

1 

0261 

REF 

1 



1 0 * 6994 

0 

2362 

1 

0262 





10*6995 


00077 

1 

0263 

REF 

8 

LAST 

169 

10*6996 

0 

212h 

1 


M0DE21 


NOINH 


CCS 

A 

TC 

DDNw 

DCT 

21 

TC 

DQNW 


B1T3 ' N 
OLDtRR 
bIT3 
OLDLRtK 


CCS 

A 

TC 

♦ 2 

TC 

relint 

endofjoq 

TC 

ChECKMM 

OCT 

77 

TC 

♦ 2 

TC 

END0FJ08 

TC 

NEwMODE 

DCT 

77 

TC 

ENDOFJOB 


O' 



USER'S OWN PAGE NO. 11 


SEE IF WE HAVE HAD TWO CONSECUTIVE 
CONSECUTIVE INHIBITS. 


SET MM 77 IF REQUIRED. 


G AND N flushed. 


^t5At)78A YUL SYSTEM EDR AGCi»; REVlbiON 0 OE RRJGRAM 50LRUM&5 BY 


L 001 T4RUPT OUTPUT CONTROL PROGRAMS 

P02fcA SCAN FOR LIFT-OFF EVERY ^80 MS. 


0265 

REF 

A 

LAST 

165 

l0t6AA7 

4 

ooOb 

0 

L05CAN 

CS 

0266 

REF 

5 

LAST 

170 

10*6450 

4 

000t> 

0 


CS 

0267 

REF 

A 

LAST 

161 

10,6A51 

7 

4512 

1 


MA5< 

0268 

REF 

135 

LAST 

169 

10*6452 

1 

0000 

0 


CCS 

0269 

REF 

2 

LAST 

168 

10*6453 

0 

6463 

0 


TC 

0270 

REF 

3 

LAST 

166 

10 * 6 A5A 

3 

4515 

1 


CAF 

02 n 

REF 

3 

LAST 

156 

10*6455 

7 

0646 

1 


MAS< 

02 12 

REF 

136 

LAST 

170 

10*6456 

1 

0000 

0 


CCS 

0273 

REF 

3 

LAST 

170 

10*6457 

0 

6463 

0 


TC 

02 ^A 

REF 

1 



1 0 1 6460 

3 

2157 

0 


CAF 

0275 

REF 

A 

LAST 

lAl 

1 0 * 6461 

0 

2046 

1 


TC 

0276 

REF 

1 



10 * 6462 

64000 

0 


CA3R 

R02/7 



CD 

SEPARATE 

scanner 

- 

entered 

every 12C 

1 MS. 

0278 

REF 

6 

LAST 

170 

10 *6463 

3 

0006 

1 

S4B5CAN 

XCH 

0279 

REF 

7 

last 

170 

10*6464 

3 

0006 

1 


XCH 

0280 

REF 

3 

LAST 

166 

10*6 465 

7 

4507 

0 


MAS< 

0281 

REF 

137 

LAST 

170 

10*6466 

1 

0000 

0 


CCS 

0282 





1 0 * 6467 

0 

6471 

0 


TC 

0283 

REF 

1 



10*6470 

0 

6534 

0 


TC 

028A 

ref 

A 

LAST 

170 

10*6471 

3 

4507 

1 


CAF 

0285 

REF 

21 

LAST 

161 

10*64/2 

7 

0646 

1 


MAS:< 

0286 

REF 

138 

LAST 

170 

10*64/3 

1 

0000 

0 


CCS 

0287 

REF 

2 

LAST 

170 

10*6474 

0 

6534 

0 


TC 

0288 

REF 

2 

LAST 

141 

10*6475 

3 

2160 

1 


CAF 

0209 

REF 

5 

LAST 

170 

10*6476 

0 

2046 

1 


TC 

0290 

REF 

1 



10*6477 


64336 

0 


CADR 

0291 

REF 

3 

LAST 

170 

10*6500 

0 

6534 

d 


TC 

0292 

ref 

A 

last 

170 



10.6463 

NOOPTCDU 

E3JAL5 

0293 

REF 

5 

LAST 

170 



10,6463 

ENDT4ERR 

ecijals 


ASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 170 


USER’S OWN page NO. 12 


IN2 

iN2 

BITS 

A 

S4BSCAN 

BIT2 

FLAGWRDl 

A 

S4BSCAN 

PRI024 

FINDVAC 

LIF lOFF 

SEE IF signal already RECEIVED. 

1N2 

IN2 

BITS 

A 

+ 2 

CDRVE 

IF BIT ON, 

NORMAL CASE. 

BITS 

STATE +1 

See if first time bit on. 

CDRVE 

PRI025 

FINDVAC 

S4BSMSEP 

CDRVE 

NO ACTION UNLESS FIRST TIME ON, 


SaBSCAN 

sabscan 



<tb^b78A YUL SYSTtM FOR AGC^t: REVISION 0 01- PROGRAM S0LRUM55 BY 


L 001 

T4RUPT OUTPUT 

Control programs 






P02gA 



OPTICS CDU 

driving program. 

SER 

VICED EVERY 48^ 

0295 

ref 

2 

LAST 

147 

10,6501 

1 

0703 

1 

OPTTEST 

CCS 

0296 





10,6502 

0 

6507 

0 


TC 

0297 





10,6503 

0 

6506 

1 


TC 

0298 

REF 

1 



10,6504 

0 

6463 

0 


TC 

0299 

REF 

2 

LAST 

171 

10,6505 

0 

6463 

0 


TC 

0300 

REF 

61 

LAST 

166 

10,6506 

3 

4516 

1 

♦ 3 

CAP 

0301 

REF 

3 

LAST 

171 

10,6507 

5 

0 703 

0 

+ 5 

T5 

0302 

REF 

2 

LAST 

17 

10,6510 

5 

0637 

0 


TS 

0303 

REF 

62 

LAST 

171 

10,6511 

3 

4516 

1 


CAP 

0304 

REF 

2 

LAST 

17 

10,6512 

5 

0640 

0 


TS 

0305 

ref 

4 

LAST 

171 

10,6513 

1 

0703 

1 


CCS 

0306 

ref 

1 



10 ♦ 65 14 

0 

6525 

0 


TC 

0307 

ref 

5 

LAST 

171 

10,6515 

2 

0703 

1 

REGDIFF 

INOEX 

0308 

REF 

1 



10,6516 

4 

0704 

0 


C5 

0309 

REF 

9 

LAST 

167 

10,6517 

5 

0600 

1 


TS 

0310 

REF 

6 

LAST 

171 

10,6520 

2 

0703 

1 


I NDEX 

0311 

REF 

2 

LAST 

160 

10,6521 

4 

0052 

i 


CS 

0312 

REF 

2 

LAST 

162 

10,6522 

0 

7410 

0 


TC 

0313 

REF 

1 



10*6523 

0 

6631 

0 

OPTQUT 

TC 

0314 

REF 

6 

LAST 

170 

10,6524 

0 

6463 

0 


TC 

0315 

ref 

2 

LAST 

160 

10,6525 

4 

0053 

0 

BLIV0T3 

CS 

0316 

ref 

2 

LAST 

171 

10,6526 

6 

0705 

0 


AD 

0317 

REF 

106 

LAST 

168 

10,6527 

5 

0001 

0 


TS 

031B 

REF 

1 



10,6530 

0 

6515 

0 


TC 

0319 

REF 

139 

LAST 

170 

10*6531 

2 

0000 

0 


INDEX 

0320 

REF 

1 



10,6532 

4 

44 77 

0 


CS 

0321 

REF 

1 



10,6533 

0 

6523 

0 


TC 


NASA L02U08-021 


dec At 1966 (MAIN) PAGE 171 


MS by OSRUPT. 

USER'S OWN page no* 13 

OPTIND 
+ 5 
+ 3 

NOOPTCOU 

NOOPTCDJ 

Pt*2 FOR ACTIVE, NEGATIVE FOR INACTIVE. 
drive CDU. 

Drive cdu. 

NNZ means reserved. 

-0 means AVAILABLE. 

ONE 

OPTIND 

GUES 1(-1)0. 

RUPTREGi 

ONE 

RUPTREG2 

SET UP 0UT25UB TO START OUT, COUNTER. 

(TO ADDRESS 0UTCR2), 

OPTIND 

BLI V0T3 

DRIVE OPTICS Y different THAN OTHERS. 
OVF UNCORRECTIoN wont work for OPTY. 

OPTIND 

DESOPTX 

ITEMP2 

DESIRED ANGLES. 

OPTIND 

OPTX 

2SC0MDIF 

RLAD counter. 

TAKES difference WITH -0 UNEQUAL TO +0. 

0UT2SUe 

S4BSCAN 

OPTY 

DeSUPTX +1 

0 

REGDIFF 

ih the difference overflows, the error 

ERROR SIGNAL IS GREATER THAN 16383* SO 
JUST THROW IN POSMAX WITH THE RIGHT 
:jIGN and CALL IT A DAY. OTHERWISE POLL 

A 

LIMITS 

OPTOUT 

THE usual procedures. 


yul System for agca: revision o oh program solrumss bv 


L 001 T4RUPT OUTPUT CoNTROL PROGRAMS 


P0322 



cdrve changes a bank 

oF c relays if any 

CHAN< 

0324 

REF 

25 

LAST 

166 

10*6534 

1 

0725 

0 

CDRVE 

Q 

0325 

REF 

1 



10*6535 

0 

6544 

I 


TC 

0326 

REF 

2 

LAST 

172 

10 * 6 536 

0 

6544 

1 


TC 

0327 

REF 

3 

LAST 

151 

10*6537 

3 

4302 

1 


CAP 

0328 

REF 

26 

LAST 

172 

10*6540 

7 

0725 

0 


^AS< 

0329 

REF- 

27 

LAST 

172 

10*6541 

5 

0 72 5 

1 


TS 

0330 

REF 

1 



10*6542 

6 

2667 

1 


AD 

0331 

REF 

1 



10 * 6 543 

0 

6623 

0 


TC 

0332 

REF 

28 

LAST 

172 

1 0 * 6 544 

1 

0723 

0 

CDRVEl 

CCS 

0333 

REF 

1 



10*6545 

0 

6554 

0 


TC 

0334 

REF 

2 

LAST 

172 

10 * 6546 

0 

6554 

0 


TC 

0335 

REF 

4 

LAST 

172 

10*654 f 

3 

4302 

1 


CAP 

0336 

REF 

29 

LAST 

172 

10*6550 

7 

0723 

0 


MASK 

0337 

REF 

30 

LAST 

172 

10*6551 

5 

0723 

1 


TS 

0338 

REF 

2 

LAST 

172 

10,6552 

6 

2665 

0 


AD 

0339 

REF 

2 

LAST 

172 

10,6553 

0 

662 3 

0 


TC 

0340 

REF 

31 

LAST 

172 

10*6554 

1 

0724 

1 

CDRVE2 

CCS 

0341 

REF 

1 



10*6555 

0 

6564 

0 


TC 

0342 

REF 

2 

LAST 

172 

10*6556 

0 

6564 

0 


TC 

0343 

REF 

5 

LAST 

172 

10,655 r 

3 

4302 

1 


CAP 

0344 

REF 

32 

LAST 

172 

10*6 560 

7 

0724 

1 


MASK 

0345 

REF 

33 

LAST 

172 

10,6561 

5 

0/24 

0 


TS 

0346 

REF 

3 

LAST 

172 

10*6562 

6 

2666 

0 


AD 

0347 

REF 

3 

LAST 

172 

10*6563 

0 

6623 

0 


TC 

0348 

ref 

2 

LAST 

149 

10*6564 

i 

0707 

0 

DSPOUT 

CCS 

0349 





10*6565 

0 

656 7 

0 


TC 

0350 

REF 

1 



10*6566 

0 

2262 

0 


TC 

0351 

REF 

3 

LAST 

172 

10,656 7 

5 

0707 

1 


TS 

0352 

REF 

59 

LAST 

160 

10,6570 

4 

5501 

1 


C5 

0353 

REF 

1 



10*65/1 

5 

0600 

1 


TS 

0354 

REF 

2 

LAST 

148 

10,6572 

3 

0706 

0 


XCH 

0355 

REF 

1 



10*6573 

6 

5504 

0 


AD 

0356 

REF 

3 

LAST 

172 

10,6574 

5 

0706 

0 


TS 

0357 

ref 

4 

LAST 

172 

10*65 75 

2 

0 706 

1 

DSPSCAN 

INDEX 

0358 

REF 

34 

LAST 

172 

10,6576 

1 

0710 

D 


CCS 

0359 

REF 

5 

LAST 

172 

1 0 * 6 5 7 7 

1 

0 706 

1 


CCS 

0360 

REF 

1 



10*6600 

0 

6573 

0 


TC 

0361 

REF 

1 



10*6601 

0 

6612 

1 


T w 

0362 





1 0 * 6602 


00012 

1 

TABLNTH 

OCT 

0363 

REF 

2 

LAST 

172 

10,6603 

1 

0600 

0 


CCS 

0364 

REF 

16 

LAST 

163 

10*6604 

0 

3062 

0 


TC 

0365 

REF 

4 

LAST 

172 

10*6605 

5 

0707 

1 


T5 


NASA 1021108-021 


OEc A| 1966 


(MAIN} page 172 



USER'S OWN PAGE NO. 14 

IS indicated 

IN THE C-RELAY PORTION oF DSPTAB. 

D5PTAB +13D 
CDRVEl 

CDRVEl 

LO^U 

DSPTAB *130 
D5PTAB +13D 
RELTABII *2 
DSPLAYC 

Spacecraft relays have highest priority 

DSPTAB +11D 
CDRVE2 

CDRVE2 

LOW 1 1 

DSPTAB +11D 
DSPTAB *11D 
RELTABII 
DSPLAYC 

IMU AND caution LIGHTS, 

DSPTAB +120 
DSPOUT 

DSPOUT 

LOW 11 

DSPTAB +12D 
DSPTAB +12D 
RELTABII +1 
DSPLAYC 

optics. 

NOUT 

+ 2 

LVDSRUPT 

NOUT 

ehtfred in interrupted state at end of 

DSRUPT 

ZERO 

DSRUPTEM 

SET TO -0 FOR 1ST PASS THRU DSPTAB 

DSPCNT 

NEGO 

DSPCNT 

DSPCNT 

Tu prevent +0 

DSPTAB 

DSPCNT 

DSPSCAN -2 
DSPLAY 

12 

DSRUPTEM 

CCSHOLE 

NOUT 

IF DSPTAB entry +* SKIP 

IF DSPCNT +, again 

IF DSPTAB entry -* DISPLAY 

Dec 10 length of DSPTAB 

IF DSKUPTEM=+0,2ND PASS THRU DSPTAB 
(uSPCNTsOJ, +0 INTO NOUT* RESUME. 


YUL SYSTEM FOR A&C^: REVISION 0 Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 173 


OUl 

TARUPT OUTPUT 

control 

PROSRAMS 







USER'S OWN page NO. 15 

0366 

REF 

2 

LAST 

172 

10 i6506 

0 

2262 

0 


TC 

LVDSRUPT 


0367 

REF 

3 

LAST 

172 

10»66O7 

5 

0600 

1 


TS 

D5RUPTEM 

IF D5RUPlEM=-0* 1ST PASS THRU DSPTAB 

036F 

REF 

1 



10*6610 

3 

6602 

0 


CAF 

TABLNTH 

tu5PCNT=0). +0 INTO DSRUPTEM. PASS AGAIN 

0 36 9 

REF 

2 

LAST 

172 

10*6611 

0 

6b7A 

1 


TC 

D5PSCAN -1 


0370 

REF 

63 

LAST 

171 

10*6612 

6 

4516 

I 

DSPLAY 

A3 

ONE 


03 71 

REF 

6 

LAST 

172 

10,6613 

2 

0706 

1 


IMDEX 

DSPCNT 


0372 

REF 

35 

LAST 

172 

10*6614 

5 

0?10 

1 


TS 

dsptab 

REPLACE POSITIVELY 

0373 

REF 

6 

LAST 

172 

10*6615 

7 

4302 

0 


MAS< 

LOU 1 1 

REMOVE BITS 12 TO 15 

037A 

REF 

A 

LAST 

173 

10,6516 

5 

0600 

1 


TS 

DSRUPTEM 


037S 

REF 

1 



10,661 T 

3 

2261 

0 


CAF 

HI5 


0376 

REF 

7 

last 

1 1 ^ 

10*6620 

2 

0706 

1 


IN13E)( 

DSPCNT 


0377 

REF 

1 



10,6621 

7 

2652 

0 


MAS< 

reltab 

PICK UP BITS 12 TO 15 OF RELTAB ENTRY 

0378 

REF 

5 

LAST 

173 

10,6622 

6 

0600 

1 


A3 

DSRUPTEM 


03 T9 

REF 

2 

LAST 

159 

10*6623 

5 

0010 

0 

DSPLAYC 

TS 

OUTO 


0380 

REF 

1 



1 0 * 6 6 2 A 

3 

7126 

0 


CAP 

20MSRUPT 

SET Ta TO interrupt IN 20 MS SO OUTO MAY 

0381 

ref 

A 

LAST 

161 

10,6625 

5 

0040 

0 


TS 

T IME4 

Bt turned off as SOON AS POSSIBLE. WHEN 

0382 

ref 

6 

LAST 

16a 

10 * 6626 

A 

0033 

0 


C5 

dsruptsu 

THIS RUPT OCCURb, Ta IS RESET TO FIRE 

0383 

ref 

7 

LAST 

173 

10*6627 

5 

0033 

1 


TS 

DSRUPTSw 

IN AOMS* re-establishing the REGULAR 60. 

038A 

ref 

3 

LAST 

173 

10*6630 

0 

2262 

0 


TC 

LVDSRUPT 


0385 

ref 

1 





2262 

LVD5RUPT 

E3JALS 

OVRLSUME 



7 ? 3 ' f^A& — ► 



yul System kor agca: revision o Of- program solrumss by nasa 1021108-021 


DEC At 1966 


(MAIN) page 17A 


L 001 

T4RUPT OUTPUT 

Control programs 







USER'S 

OWN PAGE NO. 16 


P03b6 



0UT2SUB IS 

USED BY THE 

GYRO 

DRIVE AND 

THE OPTICS CDU DRIVE 

To SET THE 

PROPER SECTION OF 0UT2 AND 

THE 

R038e 

proper out-counter 

TO deliver 

THE COMMAND ARRIVING IN 

A, 




0389 

ref 

8 

LAST 

163 

10 1 6 63 1 

5 

0577 

1 

0UT25U8 

T5 

ITEMPI 

SIGNED 

COMMAND. 


0390 

REF 

107 

LAST 

171 

10*6632 

3 

0001 

0 


XCH 

Q 




0391 

REF 

10 

LAST 

171 

10*6633 

5 

0600 

1 


T5 

ITEMP2 




0392 

REF 

9 

LAST 

174 

1 0 * 663*t 

1 

0677 

0 


CCS 

ITEMPI 




0393 

REF 

1 



10*6636 

0 

66‘+A 

1 


TC 

POSCOM 




039A 

REF 

11 

LAST 

174 

10*6636 

0 

0600 

1 


TC 

ITEMP 2 

RtTURN 

TO caller on either ZERO, 


039S 

REF 

1 



10*663 J 

0 

6641 

1 


TC 

NEGCOM 




0396 

REF 

12 

LAST 

174 

10*6640 

0 

0600 

1 


TC 

ITEMP2 




0397 

REF 

JO 

LAST 

174 

10*6641 

5 

0577 

1 

negcom 

T5 

iTEMPi 

CcS OF 

command left in ITEMPi 


0398 

REF 

3 

LAST 

171 

10*6642 

4 

0t337 

1 


CS 

RUPTREGl 

0 AND 1 

FOR OPTICS - 2, 3, AND 4 

FOR GYR 

0399 

REF 

1 



10*6643 

0 

6647 

1 


TC 

SET0UT2 




OAOO 

REF 

11 

LAST 

174 

10*6644 

5 

067 7 

1 

POSCOM 

T5 

ITEMPi 

CCS OF 

COMMAND. 


0401 

REF 

64 

LAST 

173 

10,6646 

3 

4516 

1 


CAF 

ONE 




0402 

REF 

4 

LAST 

174 

10,6646 

6 

0637 

0 


AO 

RUPTREGl 






YUL SYSTEM FOR AGCAl REVISION 0 OF PROGRAM SOLRUMSS BY NASA 1021108-021 


DEC A, 19fa6 


(MAIN) PAGE 17S 


L 001 

T4RUPT OUTPUT 

Control 

PROGRAMS 






0403 

REF 

5 

LAST 

121 

10*664/ 

5 

0642 

i 

5ET0UT2 

15 

RUPTREG4 

0404 

ref 

3 

LAST 

163 

10*6650 

3 

6200 

0 


CAF 

DUMCODE 

040S 

REF 

5 

LAST 

163 

10*6651 

3 

0012 

i 


X V H 

OUT 2 

0406 

REF 

3 

LAST 

171 

10*6652 

2 

0640 

i 


INDEX 

RUPTREG2 

0407 

REF 

1 



10*6653 

7 

7465 

0 


MAS< 

0UT2MA5.< 

0406 

REF 

6 

LAST 

175 

10*6654 

3 

0012 

1 


XCH 

0UT2 

0409 

REF 

3 

LAST 

163 

10*6655 

6 

6201 

1 


AD 

-DUMCODE 

0410 

REF 

140 

LAST 

171 

10*6656 

1 

0000 

0 


CCS 

A 

0411 

REF 

1 7 

LAST 

172 

10*6657 

0 

3062 

0 


TC 

CCSHOLE 

0412 

REF 

18 

LAST 

175 

10*6660 

0 

3062 

0 


TC 

CCSHOLE 

0413 

ref 

3 

LAST 

163 

10*6661 

0 

7377 

0 


TC 

JACKPOT 

0414 

REF 

12 

LAST 

174 

10*6662 

4 

0577 

0 


C5 

ITEMPl 

0415 

REF 

13 

last 

163 

10*6663 

6 

4476 

0 


AD 

POSMAx 

0416 

REF 

4 

LAST 

175 

10*6664 

2 

0640 

1 


index 

kUPTREG2 

0417 

REF 

2 

LAST 

163 

10 * 6 665 

5 

0042 

1 


T5 

OUTCRl 

0418 

REF 

4 

LAST 

175 

10 * 6 666 

3 

6200 

0 


CAF 

DUMCODE 

0419 

REF 

7 

LAST 

175 

10*666/ 

3 

0012 

1 


XCH 

0UT2 

0420 

REF 

6 

LAST 

175 

10*6670 

2 

0642 

0 


1 NDEX 

RUPTREG4 

0421 

REF 

1 



10*6671 

6 

7473 

0 


AD 

OPTCODES +1 

0422 

REF 

6 

LAST 

175 

10*6672 

3 

0012 

1 


XCH 

OUT 2 

0423 

REF 

4 

LAST 

175 

10*6673 

6 

6201 

1 


AD 

-DUMCODE 

0424 

REF 

141 

LAST 

175 

10*66 / 4 

1 

0000 

0 


CCS 

A 

0425 

REF 

19 

LAST 

175 

10 * 66 /5 

0 

3062 

0 


TC 

CCSHOLE 

0426 

REF 

20 

LAST 

175 

10*6676 

0 

3062 

0 


TC 

CCSHOLE 

0427 

REF 

4 

LAST 

175 

10*66 / / 

0 

737/ 

0 


TC 

JACKPOT 

0428 

REF 

13 

LAST 

174 

10*6700 

0 

0600 

1 


TC 

ITEMP2 

0429 







10*6701 

nogyroc 

edjals 


0430 







o 

O 

ENDGYROC 

edjals 



USER’S OWN page NO. 17 


FOR A description OF THIS 0UT2 PROCEDURE 

See the imucou drive program eaklier in 

T**RUPT. 


ADS (COMMAND) - 1. 

FORMS 1.0 - ABSicOMMANdJ . 


enable the appropriate outcr by setting 

THE PROPER CODE IN 0UT2 


4h^570A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM 50LRUM55 BY 


L 001 TARUPT output CoNyRoL PROjRAHS 


P0A31 ALTERNATE 120 MS LEG OF T^tRUPT. 


0A3? 

ref 

A 

LAST 

168 

10 » 6 701 

3 

5362 

0 

TMCHECK 

CAF 

0A33 

ref 

A 

LAST 

151 

10 ♦6702 

3 

0670 

0 


XCH 

UA3i. 

REF 

1 



10»6703 

6 

6705 

0 


AD 

QA35 

REF 

IA2 

LAST 

175 

1 0 ♦ 6 ? 0 *♦ 

1 

0000 

0 


CCS 

0A36 





10»6705 

77770 

1 

NEG7 

DEC 

0A37 

REF 

21 

LAST 

175 

10*6706 

0 

3062 

0 


TC 

0A38 





10*6707 

0 

6 711 

0 


TC 

0A39 

REF 

2 

LAST 

151 

10*6710 

0 

2571 

0 


TC 

OA^O 

REF 

6 

LAST 

156 

10*6711 

3 

0007 

0 

MODESAMP 

XC4 

0A41 

REF 

7 

LAST 

176 

10*6712 

3 

0007 

0 


XCH 

0A42 

REF 

1 



10*5713 

5 

0637 

0 


TS 

0A^3 

REF 

10 

LAST 

IA6 

1 0 * 6 7 i A 

7 

A720 

1 


MASX 

OAAA 

REF 

2 

LAST 

176 

10*6715 

3 

0637 

0 


XCH 

OA'tS 

REF 

1 



10*6716 

7 

6770 

0 


'1AS< 

0A<»6 

REF 

1 



10*6717 

5 

06A0 

0 


TS 

0AA7 

REF 

6 

LAST 

161 

10*6720 

3 

OOOA 

0 


XCH 

AOAAe 











0AA9 

REF 

21 

LAST 

163 

10*6721 

5 

003A 

0 


TS 

0A50 

REF 

2 

LAST 

166 

10*6722 

7 

A510 

0 



OAbl 

REF 

1A3 

LAST 

176 

10,6723 

1 

0000 

0 


CCS 

0A52 

ref 

3 

LAST 

176 

10*&72a 

0 

2571 

0 


TC 

0AS3 

REF 

22 

LAST 

176 

10*6725 

1 

0034 

i 


r r a 
vs. a 

0A5A 

REF 

1 



10*6726 

0 

673a 

1 


TC 

0AS5 

REF 

2 

LAST 

176 

10*6727 

0 

673A 

1 


TC 

0AS6 





10*6730 

0 

6731 

1 


TC 

0AS7 

ref 

1 



10*6731 

3 

7003 

0 


CAF 

0AS8 

REF 

2 

LAST 

176 

10*6732 

7 

06 AO 

1 


MA5< 

0A59 

REF 

3 

LAST 

176 

10*6733 

5 

06AO 

0 


TS 
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USER'S OWN PAGE NO. U 

SEVEN 

TELCOUNT 

NEG7 

A 

ALLOW UP TO SEVlN TM WORDS UNTIL NF^^T 

DSRUPTO EXECUTION, CHECK LAST TM PERIOD 

To SEE IF AT least ONE WORD WENT OUT, 

THIS SATISFIES BOTH HIGH- AND LOW-POWER. 

-7 

CCSHOLE 
♦ 2 

TMFAIL 

Ok — PROCEED* 

TURN ON TM FAIL LIGHT BEFORE K5AMP, 

1N3 

IN3 

SAMPLE mode bits AND TUCK THEM AwAY 

Fur ksamp and optsamp. 

K5AMPTEM 

LOW? 

KSAMPTEM 

OPTBITS 

OSAMPTEM 

INO 

THIS clears the KEY CODE WITHIN 120MS 

OF the TIME the key WAS RELEASED. 

OVCTR 

SEE IF INHIBIT UP-SYNC BIT IS ON. 

B1T7 

A 

TMFAIL 

IF SO* TURN ON TELEMETRY FAIL LIGHT. 

OVCTR 

OPT SAMP 
DPTSAMP 

sle if mark button down. 

+ 1 

NOMKACPT 

OSAMPTEM 

OSAMPTEM 

DuNT include mark ACCEPT INFORMATION. 


^P-V 


1 


4 


^84b78A YUL SYSTEM FOR AGCA: REVISION 0 OF PROGRAM SOLRUMSS BY 


L 001 

T4RUPT OUTPUT 

Control 

programs 






PUAbO 



OPTICS MODE 

sampling. 






OAfa 1 

ref 

2 

LAST 

149 

10,6734 

1 

0732 

0 

OPTSAMP 

CCS 

0462 

REF 

1 



10,6735 

0 

6 751 

1 


TC 

0463 

REF 

1 



10,6736 

0 

7043 

1 


TC 

0464 

REF 

6 

LAST 

167 

10,673 1 

3 

4503 

0 


CAP 

0465 

REF 

4 

LAST 

176 

10,67^,0 

7 

0640 

1 


Mi\5< 

0466 

REF 

5 

Last 

143 

10,6741 

6 

0730 

0 


AD 

0467 

REF 

7 

LAST 

177 

10,6742 

7 

4503 

I 


MAS< 

0468 

REF 

144 

LAST 

176 

10,6743 

1 

0000 

0 


CCS 

0469 





10,6744 

0 

6746 

1 


rc 

0470 

REF 

1 



10,6745 

0 

7074 

0 


TC 

0471 

REF 

3 

LAST 

141 

10,6746 

0 

3007 

0 


TC 

0472 





10,6747 

OOlOl 

1 


DCT 

0473 

REF 

2 

LAST 

177 

10,6750 

0 

7074 

0 


TC 

0474 

ref 

5 

LAST 

117 

10,6751 

3 

4501 

1 

OPTCOMM 

CAF 

0475 

REF 

6 

Last 

177 

10,6752 

7 

0730 

i 


MAS< 

04 76 

REF 

108 

LAST 

174 

10,6753 

5 

0001 

0 


TS 

0477 

ref 

6 

LAST 

177 

10,6754 

3 

4501 

1 


CAF 

0478 

REF 

5 

LAST 

177 

10,6755 

7 

0640 

1 


MA5< 

04 79 





10,6756 

4 

0000 

0 


COM 

04B0 

REF 

109 

LAST 

177 

10,6757 

6 

0001 

0 


AD 

0481 

REF 

145 

LAST 

177 

10,6760 

1 

0000 

0 


CCS 

0462 

REF 

1 



10,6761 

0 

7010 

1 


TC 

0463 





10,6762 

34760 

1 

0FFMA5K 

DC? 

0484 

REF 

1 



10 ,6763 

0 

7017 

0 


TC 

0465 

ref 

3 

LAST 

177 

10,6764 

4 

0732 

0 

0PTC0MM2 

C5 

0466 

REF 

6 

LAST 

177 

10,6765 

6 

0640 

0 


AD 

0467 

REF 

146 

LAST 

177 

10,6766 

1 

0000 

0 


CCS 

0468 

ref 

1 



10,6767 

0 

67 73 

1 


T C 

0469 





10,6770 

35000 

L 

OPTBITS 

OCT 

0490 

ref 

1 



10,6771 

0 

7000 

0 


TC 

0491 

ref 

3 

LAST 

177 

10,6772 

0 

7074 

0 


T C 

0492 

REF 

36 

LAST 

173 

10,6773 

1 

0724 

1 

OPTCTEST 

CCS 

0493 

REF 

1 



10,6774 

0 

7027 

0 


T C 

0494 

REF 

2 

LAST 

177 

10,6775 

0 

702 7 

0 


1 w 

0495 

ref 

60 

LAST 

172 

10,6776 

3 

5501 

0 


caf 

0496 

REF 

4 

LAST 

177 

10,6777 

0 

7075 

1 


TC 

0497 

ref 

1 



10,7000 

6 

7176 

0 

0PTC0MM3 

AD 

0498 

REF 

147 

LAST 

177 

10,70UI 

1 

0000 

0 



0499 

ref 

2 

LAST 

177 

10,7002 

0 

6773 

1 


TC 

0500 





10,7003 


31000 

0 

nomkacpt 

OCT 

0501 

REF 

3 

LAST 

177 

10,7004 

0 

6773 

i 


TC 


NASA 1021100-021 
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USER *5 OWN PAGE NO, I 9 


desopset 

QPTLOMM 

NOOPCOM 

IS COMPUTER COMMANDING 

YES 

Nu 

BIT12 

05AMPTEM 

WASOPSET 

&IT12 

A 

+ 2 

LVOPTSMP 

MAKE SURE WE ARE STILL ZEROING 
(IHIS PORTION entered FOR 30 SEC. DURING 
manual optics ZERO) , 

SEE IF CPU-ZERO BIT HAS CHANGED. 

Alarm if so. 

ALARM 

00101 

LVOPTSMP 

If not, alarm on 

OPTICS alarm no, 1, 

B1T14 

WASOPSET 

SEE IF COMPUTER-ON SWITCH JUST CHANGED. 
FURM was BIT14 - IS BIT14. 

U 

bIT14 

OSAMPTEM 

present INPUT BITS. 

Q 

A 

COMP, OFF 

34760 

COMP. ON 

SWITCH JUST turned OFF, 

Used FOR SETTING IMU C-RELAYS. 

Switch just turned on. 

Desopset 

OSAMPTEM 

StE IF desired mode ACHIEVED, 

A 

OPTCTEST 

CuMMANO NOT EQUAL TO ACTUAL 

35000 

0PTC0MM3 

LVOPTSMP 

Nu MATCH - SEE IF CUMP ON ONLY MISMATCH. 
DUNE IF MODES AGREE, 

DSPTAB +12D 

OpTCFAlL 

OPTCFAIL 

IS CHANGE coming. 

NU - C-RElAY failure UR UNWANTFD MANUAL 

Intervention, 

zlro 

LVOPTSMP ,1 

llave waiting flag in wasopset. 

-bl T14+1 

A 

OPTCTEST 

31000 

OPTCTEST 

Nu error if computer-on only one diff. 


<»tj^»b7aA YUL SYSTLM FDR AGC<t; REVISIDM 0 OF PROGRAM 50LRUM55 BY 


OUl 

T9RUPT OUTPUT 

Control 

programs 






05U2 

ref 

7 

CAST 

177 

10* ?005 

3 

9501 

1 


C'^F 

U5u3 

REF 

7 

LAST 

177 

10*7006 

6 

069u 

0 


AO 

OS 09 

REF 

5 

LAST 

177 

10*7007 

0 

707 5 

1 


TC 

0SU5 

REF 

7 

LAST 

171 

10*7010 

1 

0703 

1 

COMP, OFF 

CCS 

0506 





10*7011 

0 

7013 

1 


TC 

0507 





10*7012 

0 

7013 

1 


TC 

0508 

REF 

65 

LAST 

179 

10*7013 

3 

9516 

1 


CAF 

0509 





10*7019 

9 

0000 

0 


COM 

0510 

REF 

8 

LAST 

178 

10*7015 

5 

0703 

0 


T5 

0511 

REF 

1 



10*7016 

0 

6/69 

1 


TC 

0512 

ref 

9 

LAST 

178 

10*701 7 

1 

0/03 

1 

comp.on 

CCS 

0513 

REF 

1 



10*7020 

0 

7023 

1 


TC 

0519 

REF 

2 

LAST 

178 

10,7021 

0 

7023 

1 


TC 

0515 

REF 

1 



10*7022 

0 

7091 

0 


TC 

0516 

REF 

1 



10*7023 

0 

7039 

1 

ONALARM 

TC 

0517 

REF 

9 

LAST 

177 

10*7029 

0 

3007 

0 


TC 

0518 





10,7025 

00109 

L 


OCT 

0519 

REF 

1 



10,7026 

0 

7032 

1 


TC 

0520 

REF 

2 

LAST 

178 

10*702 7 

0 

7039 

1 

OPTCFAIL 

TC 

0521 

REF 

5 

LAST 

178 

10,7030 

0 

3007 

0 


TC 

0522 





10*7031 

00102 

1 


OCT 

0523 

REF 

61 

LAST 

177 

10*7032 

9 

5501 

1 

OFAILSET 

CS 

0529 

ref 

6 

LAST 

178 

10*7033 

0 

7075 

1 


TC 

0525 

REF 

7 

LAST 

177 

10,7039 

1 

0730 

1 

OFAILTST 

CCS 

0526 

REF 

110 

LAST 

177 

10*7035 

0 

0001 

0 


T 'k- 

0527 

REF 

111 

LAST 

178 

10*7036 

0 

0001 

0 


TC 

0528 

REF 

1 



10*7037 

0 

7076 

1 


r c 

0529 

REF 

2 

LAST 

178 

10*7090 

0 

7076 

i 


TC 

0533 

REF 

10 

LAST 

178 

10*7091 

5 

0703 

u 

ONOK 

TS 

0539 

REF 

2 

LAST 

178 

10,7092 

0 

6769 

1 


TC 

0593 

REF 

8 

last 

178 

10*7 093 

9 

0730 

1 

NOOPCOM 

CS 

0599 

REF 

8 

LAST 

178 

10*7099 

6 

0690 

0 


A D 

0595 

REF 

198 

LAST 

177 

10*7095 

1 

0000 

0 


CCS 

0596 

REF 

1 



1 0 * 7096 

0 

7052 

1 


1 w 

0597 





10*709/ 

37772 

1 

60M5RUPT 

OCI 

0598 

REF 

2 

LAST 

178 

10*7050 

0 

7052 

1 


TC 

0599 

REF 

7 

LAST 

178 

10*7051 

0 

7079 

0 


TC 

0550 

ref 

9 

LAST 

178 

10,7052 

9 

0730 

1 

NOOPCOMl 

CS 

0551 

REF 

8 

LAST 

177 

10*7053 

7 

9503 

1 


MASK 

0552 

REF 

9 

LAST 

178 

10*7059 

7 

0690 

1 


MftSK 
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blTlA 

osamptem 

LVOPTSMP +1 

optind 

+ 2 
+ 1 
ONt 

optind 

0PTG0MM2 

DPI IND 
ONALARM 
ONALARM 
0N0< 

OFAILTST 

ALARM 

00109 

OFAILSET 

OFAILTST 

alarm 

00102 

ZERO 

LVOPTSMP +1 

V.AS0P5ET 

0 

Q 

NOOPRSET 

NOOPRSET 

optind 

0PTC0MM2 

V^ASOPSET 

05AMPTEM 

A 

NOOPCOMl 

37772 

NOOPCOMl 

LVOPTSMP 

WASUPSET 

BIT12 

OSAMPTEM 


USER'S OWN PAGE NO. 20 

iH this Case* set comp, on bit to i in 

WASOPSET to prevent +0 FOR CORRECT MODES 


TAKE AGC OUT OF CDU LOOP IF APPROPRIATE. 

positive means COMPUTER WAS IN LOOP, 
LEAVE CDUS RESERVED (RARE), 

-u reverts to -0. 


DU MODE CHECK. 

Put AGC BACK INTO CDU LOOP IF DESIRED. 
(IHIS SHOULD never HAPPEN). 

CDUS HAD BEEN RESERVED. 

SEE IF FAIL FLAG ALREADY SET. 

Alarm and Set failure flag. 


See if alarm already sounded, 
alarm and Set fail flag if not. 


SET FAIL flag AND EXIT. 


Returns to caller if no failure alarm 

GIVEN. EXITS without CHANGING WASOPSET 

if so. 


Set OPTIND to +0 TO ACTIVE CDU DRIVE. 

DU MODE Agreement check, 

enters here if computer not COMMANDING, 

SEE IF ANY CHANGES SINCE EAST LOOK. 


Changed* 

unused CCS branch. 

Changed. 

NO change - NORMAL EXIT IN MANUAL, 

SEE IF MANUAL CDU-ZERO JUST REQUESTED. 


^bAi)78A YUL system FOR AGCA; REVISION 0 OF PROGRAM 50LRUM55 By NASA 1021106-021 


DEC 1966 


(MAIN) PAGE 179 


L 001 

TARUPT output 

control programs 







USER'S OWN PAGE NO. 21 

0SS3 

REF 

1A9 

LAST 

178 

10*7055 

1 

0000 

0 


r- c 

V. vb 

A 


OSSA 

REF 

1 



1 0 1 70 56 

0 

7360 

0 


TC 

manoptz 

CALL MANUAL OPTICS ZERO SUBROUTINE. 

AOSSS 











/ 

(THIS RECONCILES OPTICS-ZERO C-KeLAY), 

R0556 

WE used 

TO TEST Here 

TO SEE IF 

THt bXT- 

ON SWITCH 

HAS changed. ^ 


ROSS? 

SINCE IN 

1 block 50 - 

100 IT IS 

ALWAYS 

ON 

* WE DON;T 

NOw . 



0S62 

ref 

7 

LAST 

168 

10*7057 

3 

A506 

0 

RECONTRK 

CAP 

BITIO 

RECONCILE TRKR-ON C-RELAY, 

(}S63 

REF 

10 

LAST 

178 

10*7060 

7 

ObAO 

1 


MASK 

OSAMPTEM 


056A 

REF 

150 

LAST 

179 

10*7061 

1 

0000 

0 


CCS 

A 


0565 

REF 

A 

LAST 

170 

10*7062 

3 

As 1 5 

1 


CAF 

BIT2 

TURN ON TRKR-ON C-RELAY, 

0566 

REF 

10 

LAST 

165 

10,7063 

6 

ASOO 

0 


AO 

eiT15 


0567 

REF 

37 

LAST 

177 

l0*70bA 

3 

072a 

0 


XCH 

DSPTAb +12D 


0568 

REF 

1 



10*7065 

7 

725A 

1 


MASK 

OCT37775 

Change bits 2 and is. 

0569 

REF 

38 

LAST 

179 

1 0 * 7066 

6 

072A 

0 


AO 

OSPTAB +12D 


0570 

REF 

39 

LAST 

179 

10,7067 

5 

072A 

0 


T5 

DSPTAB +120 


05 71 

REF 

11 

LAST 

179 

10*7070 

3 

06A0 

0 


XCH 

OSAMPTEM 

SET WASOPSET ANU CALL SETZLIT TO 

0572 

REF 

10 

LAST 

178 

10*7071 

5 

0730 

a 


T5 

WASOPSET 

SET zero-encoder LIGHT. 

0573 

REF 

1 



10*7072 

0 

2 7 A3 

0 


TC 

SETZLIT 


057A 

REF 

3 

LAST 

178 

10*7073 

0 

7076 

i 


TC 

NOOPRSET 


0575 

REF 

12 

LAST 

179 

10*707A 

3 

06A0 

0 

LVOPTSMP 

XCH 

OSAMPTEM 


0576 

REF 

11 

LAST 

179 

10*7075 

5 

0730 

0 


T5 

WASOPSET 


0577 







10*7076 

nooprset 

EOJALS 


DUNT RESET WASOPSET. 


YUL system FOR AGC^: REVISION 0 Of- PROGRAM SOLRUM55 BY nAsA 1021108-021 


OEC A, 1966 


(MAIN) page 180 


L 001 tarupt output control programs 

PU578 K5AMP ENTERED EvERY 120 MS DURING TARUPT. SAMPLES STATUS OF 

R0579 IMJ MODE St^ITCHES, 

Hosbo Sets c (wask-set) =C(Des<5ET) for successeul comp. comm. 


RUSBI 







R05b2 







RU5b3 







OSbA 

REF 

9 

LAST 

166 

10 

70 T6 

0585 





10 

7077 

0586 





10 

7100 

05B7 

REF 

1 



10 

7101 

0588 

REF 

2 

Last 

149 

10 

7102 

0589 

REF 

1 



10 

7103 

0590 

REF 

1 



10 

7104 

0591 

ref 

3 

LAST 

123 

10 

710S 

0592 

REF 

3 

LAST 

176 

10 

7106 

0593 

REF 

10 

LAST 

180 

10 

7107 

0594 

REF 

4 

LAST 

180 

10 

7110 

0595 

PEF 

151 

LAST 

179 

10 

7111 

0596 





10 

7112 

0597 

REF 

1 



10 

7113 

0598 

REF 

6 

LAST 

178 

10 

7114 

0599 





10 

7115 

0600 

REF 

2 

LAST 

180 

10 

7U6 

0601 

REF 

4 

LAST 

180 

10 

7U7 

0602 

REF 

11 

LAST 

160 

10 

7120 

0603 

REF 

5 

LAST 

180 

10 

7121 

0604 

REF 

152 

LAST 

180 

10 

7122 

0605 

REF 

12 

LAST 

180 

10 

7123 

0606 

REF 

153 

LAST 

180 

10 

7124 

0607 

ref 

1 



10 

7125 

0608 





10 

7126 

0609 

REF 

1 



10 

7127 

0610 

REF 

2 

LAST 

180 

10 

7130 

06il 

REF 

4 

LAST 

166 

10 

7131 

0612 

REF 

13 

LAST 

180 

10 

7132 

0613 

REF 

154 

LAST 

180 

10 

7133 

0614 

REF 

1 



10 

7134 

0615 

ref 

14 

LAST 

180 

10 

7135 

0616 

REF 

1 



10 

713b 

0617 

REF 

155 

LAST 

180 

10 

7137 

0618 

REF 

1 



10 

7140 




=♦0 FOR WAITING (START-JP»C0NTACT BOUNCE) 
=-X EOR astronaut comm. IGNORE 
5-0 FDR SYSTEM FAILURE 


1 0727 

1 

KSAMP 

CCS 

WASXSET 

0 7102 

0 


TC 

+ 3 

0 7102 

0 


TC 

+ 2 

0 2262 

0 


TC 

endksamp 

1 0731 

0 


CCS 

deskset 

0 7250 

1 


TC 

KSAMPl 

0 7117 

1 


TC 

XSAMP4 

3 4516 

1 


CAF 

Bin 

7 063 7 

1 


MAS< 

KSAMPTEM 

6 072 7 

0 


AD 

waskset 

7 4516 

0 


MAS< 

BITl 

1 0000 

0 


CCS 

A 

0 7114 

1 


TC 

♦2 

0 7260 

1 


TC 

LV KSAMP 

0 3007 

0 


TC 

ALARM 

00201 

1 


OCT 

00201 

0 7260 

1 


TC 

LVKSAMP 

3 0637 

0 

KSAMP4 

XC3 

KSAMPTEM 

3 0727 

0 


XCH 

WASKSET 

5 0637 

0 


TS 

KSAMPTEM 

4 0000 

0 


cs 

A 

6 0727 

0 


AO 

WASKSET 

1 0000 

0 


CCS 

A 

0 7211 

1 


TC 

K5AMP2B 

37776 

0 

20MSRUPT 

OCT 

37776 

0 7131 

0 


TC 

KSAMP2 

0 2262 

0 


TC 

ENDKSAMP 

3 4511 

0 

KSAMP2 

CAF 

bU6 

7 0727 

1 


MA5< 

WASKSET 

1 0000 

u 


CCS 

A 

0 721 7 

1 


TC 

TRNSWON 

4 0727 

1 


C5 

WASKSET 

7 7336 

1 


MASX 

FINE+CRS 

1 OOOO 

0 


CCS 

A 

0 7145 

0 


TC 

MANZTEST 


USER’S OWN page NO. 22 


test for ignore 


C(DE5KSET}=DESlkED K RELAY SETTING 

s+0 FOR COMPUTER NOT COMM, 

-desired k Setting for man o. 

ENTERS HERE TO BE SURE MANUAL CDU ZERO 
LASTS AT LEAST 30 SEC, 

alarm if cdu-zero Switch changed state. 


CDU NOT ZEROED PROPERLY. 


NU COMPUTER COMMAND, 

CURRENT STATUS TO WASKSET 

(FOR EVENTUAL USE BY MANUAL ZERO TEST). 


SEE IF TRNSW OUST ON AND IS ONLY CHANGE. 
UNUSED CCS BRANCH - USED TO CAUSE 0 OUTO 

EXIT ON NO change IN MODE. 

CHANGE IN MODE 
Is TRNSW ON MANUAL 

SEE IF START-UP OR PILOTS BUTTON ON, 

TEST FOR START UP SEQUENCE 

51 art-up=fine and Coarse in manual. 




YUL 

5YSIEM FOR AGC4: 

REVISION 

0 

OF PROGRAM SOLRUM55 BY 

NASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE Ifil 

L OUl 

T4RUPT OUTPUT 

CONTROL 

programs 






USER'S OWN PAGE NO, 23 

0619 

REF 

1 



I0t7l41 

3 

6762 

1 

SETC0AR5 

CAP 

OFFMASK 


0620 

REF 

40 

LAST 

179 

10,7142 

7 

0723 

0 


MA5< 

USPTAb +11D 


0621 

REF 

1 



10,7143 

6 

4656 

U 


AO 

OCT40002 


0622 

REF 

1 



10,71a4 

0 

7206 

1 


TC 

SLTC ^3 


0623 

REF 

6 

LAST 

180 

10,7145 

4 

063 f 

1 

MANZTEST 

C5 

KSAMPTEM 

SEE IF MANUAL ZERO SWITCH JUST ON. 

0624 

REF 

5 

LAST 

180 

10.7146 

7 

4516 

0 


viA5< 

BITl 


0625 

REF 

15 

LAST 

180 

10,7147 

7 

072 7 

1 


MASK 

WASKSET 


06Z6 

REF 

156 

LAST 

180 

10,7150 

1 

0000 

0 


CCS 

A 


0627 

REF 

1 



10,7151 

0 

7337 

1 


TC 

mancdu 

MANUAL IMU CDU ZERO JUST REQUESTED. 

0628 

REF 

7 

LAST 

181 

10,7152 

4 

063 7 

1 


C5 

ksamptem 

IF PREVIOUS mode WAS COARSE ALIGN, 

0629 

REF 

5 

last 

179 

10,7153 

7 

4515 

0 


mas< 

BIT2 

DISABLE iMU FAIl FOR ThE NEXT 5 SEcS. 

0630 

REF 

157 

LAST 

181 

10 ,7154 

1 

0000 

0 


CCS 

A 


0631 

REF 

1 



10,7155 

0 

7 L65 

1 


TC 

PRERECON 


0632 

REF 

A 

last 

168 

10,7156 

4 

4513 

0 


cs ^ 

bitT^ 


0633 

REF 


LAST 

169 

10,7157 

7 

0726 

0 


MASK 

OLDER^ 


0634 

REF 


LAST 

181 

10,7160 

b 

4513 

1 


AD , 

BIT 4 / 


0635 

REF 

20 

LAST 

181 

10,7161 

5 

0726 

1 



~~~tHr&CRR 


0636 

REF 

8 

LAST 

179 

10,7162 

3 

4505 

0 


CAF 

BITIO 


0637 

REF 

6 

LAST 

141 

10,7163 

0 

2173 

0 


TC 

waitlist 


0638 

REF 

2 

last 

141 

10,716a 

30201 

1 


CA3R 

IFAILOK 


0639 

ref 

2 

LAST 

181 

10,7165 

3 

blbi 

1 

PRERECON 

CAF 

OFFMASK 

Manual mode change 

0640 

REF 

41 

LAST 

181 

10,7166 

7 

0723 

0 


MASK 

OSPTAB +11D 

SU THE C-RELAYS must BE UPDATED. 

0641 

REF 

11 

LAST 

179 

10,7167 

6 

4500 

0 


AO 

eiTi5 

ALL ARE TURNED OFF AND THE RIGHT ONES 

0642 

ref 

4 2 

LAST 

181 

10,7170 

5 

0723 

1 


T5 

USPTAB +IID 

Ak£ turned on by SCANNING IN3. 

0643 

REF 

16 

LAST 

161 

10,7171 

4 

0727 

1 


C5 

WASKSET 

UPDATE C-ReLAYS SO THEY AGREE WITH THp 

06^4 

REF 

23 

LAST 

176 

10,7172 

5 

0034 

0 


TS 

OVCTR 

Current mode, the scan is from left to 

0645 

REF 

4 

LAST 

149 

10,7173 

3 

4475 

0 


CAP 

SIX 

RIGHT so the pilots BUTTON WORKS OK. 

0646 

REF 

8 

LAST 

181 

10,7174 

5 

063 7 

0 

RECONCIL 

TS 

KSAMPTEM 


0647 

REF 

24 

LAST 

181 

10,7175 

3 

0034 

0 


XCH 

OVCTR 

next BIT INTO POSITION. 

0648 





10,7176 

6 

0000 

1 

-BIT14+1 

DOjBLt 


0649 

REF 

25 

LAST 

lei 

10,7177 

5 

0034 

0 


TS 

OVCTR 


0650 

REF 

5 

LAST 

170 

10,7200 

1 

4507 

□ 


MASK 

blT8 


0651 

REF 

158 

LAST 

181 

10,7201 

1 

0000 

0 


CCS 

A 


0652 

REF 

1 



10,7202 

0 

7243 

0 


TC 

RECONLUP 

LOOP TO examine next BIT. 

0653 

REF 

9 

LAST 

181 

10,7203 

2 

063 7 

1 

5ETC 

IMOEX 

KSAMPTEM 


0654 

REF 

1 



10,7204 

3 

7456 

1 


CAF 

MODLChNG 

NEW IMU C-RELAY SETTINGS. 

0655 

REF 

43 

LAST 

181 

10,7205 

6 

0723 

1 


AO 

DSPTAB +UD 


0656 

REF 

44 

LAST 

181 

10,7206 

5 

0723 

1 

+ 3 

TS 

DSPTAB +11U 


0657 

ref 

2 

LAST 

179 

10,720 7 

0 

2 743 

0 


TC 

setzlit 

UPDATE THE ZERO ENCODER LAMP. 

0658 

REF 

3 

LAST 

180 

10,7210 

0 

2262 

0 


TC 

ENDK5AMP 


0659 

ref 

1 



10,7211 

6 

7214 

1 

KSAMP2B 

AO 

Low5 Bar 

No error IF TRNSW JUST ON IS ONLY CHANGE 
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0660 

REF 

159 

LAST 

lai 

10,7212 

1 

0000 

0 


r' r Cl 

^ w b 

066 1 

REF 

2 

LAST 

180 

10,7213 

0 

7131 

0 


TC 

0662 





10,721'+ 

77740 

1 

L0W5BAR 

DCT 

0663 

REF 

3 

LAST 

182 

10,7215 

0 

7131 

0 


TC 

066 A 

ref 

A 

LAST 

181 

10,7216 

0 

2262 

0 


TC 

0665 

REF 

1 



10*7217 

3 

7335 

0 

TRNSWON 

CAF 

0666 

REF 

17 

LAST 

181 

10,7220 

7 

0727 

1 


MA5< 

0667 

ref 

10 

LAST 

181 

10,7221 

6 

0637 

0 


A3 

0666 

REF 

2 

LAST 

182 

10,7222 

7 

7335 

1 


MAS< 

0669 

REF 

160 

LAST 

182 

10,7223 

1 

0000 

0 


CCS 

06 70 





10,722A 

0 

7226 

0 


TC 

06 n 

REF 

1 



10,7225 

0 

7233 

1 


TC 

0672 

REF 

5 

LAST 

1 70 

10,7226 

3 

4512 

0 


CAF 

06 73 

ref 

18 

LAST 

182 

10,7227 

7 

072 7 

1 


v|A5< 

067A 

REF 

11 

LAST 

182 

10,7230 

7 

0637 

1 


v|A5< 

0675 

REF 

161 

LAST 

182 

10,7231 

1 

0000 

0 


CCS 

0676 

ref 

5 

LAST 

162 

10*7232 

0 

2262 

0 


TC 

0677 

REF 

12 

LAST 

182 

10,7233 

4 

06 3 7 

1 

startchk 

CS 

0678 

REF 

6 

LAST 

181 

10,723A 

7 

4515 

0 


MA5< 

0679 

REF 

19 

LAST 

182 

10,7235 

7 

0727 

1 


MAS< 

0680 

REF 

162 

LAST 

182 

10,723b 

1 

0000 

0 


CCS 

06B1 

ref 

1 



10,7237 

0 

7141 

1 


TC 

0682 

ref 

7 

LAST 

180 

10,72AO 

0 

3007 

0 

modalarm 

TC 

0683 





10,72A1 


00204 

1 


DCT 

06BA 

ref 

6 

LAST 

182 

10,72A2 

0 

2262 

0 


TC 

0685 

REF 

13 

LAST 

182 

10,7243 

1 

0637 

1 

RECONLUP 

CCS 

06B6 

REF 

1 



10,7244 

0 

7174 

1 


TC 

0687 

REF 

8 

Last 

182 

10,7245 

0 

3007 

0 


TC 

0688 





10,7 246 


00203 

0 


OCT 

0689 

REF 

7 

LAST 

182 

10,7247 

0 

2262 

0 


TC 


0690 

REF 

3 

LAST 

100 

10,7250 

4 

0 731 

0 

K5AMP1 

CS 

0691 

REF 

14 

LAST 

182 

10,7251 

6 

063 7 

0 


AD 

0692 

REF 

163 

LAST 

182 

10,7252 

1 

0000 

0 


CCS 

0693 

REF 

1 



10,7253 

0 

7263 

1 


TC 

0694 





10,7254 


37775 

0 

0CT37775 

OCT 

0695 

REF 

2 

LAST 

102 

10,7255 

0 

7263 

1 


TC 

0696 

ref 

21 

LAST 

181 

10*7256 

1 

0726 

0 


CCS 

0697 

REF 

1 



10,7257 

0 

7331 

1 


TC- 

0698 

REF 

15 

LAST 

182 

1 0 , 7260 

3 

0637 

0 

LVKSAMP 

XCH 
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USER’S OWN PAGE HO. 24 

A 

KSAMP2 

-37 

KSAMP2 

ENDXSAMP 

ORIGINAL difference WAS JUST BIT 6 . 

0CT14 

as<sft 

ksamptem 

0CTi4 

A 

THE PILOTS BUTTON HAS CHANGED If- THERE 
HAS been a change IN THE FINE ALIGN OR 

Luck cdu bits with the system in atti- 
tude CONTROL AS WELL. 

+ 2 

STARTCH< 

NU - SEE IF system CYCLING UP. 

BITS 

waskset 

KSAMPTEM 

A 

OK 30 FAR ON PILOTS BUTTON. SEE IF 
system was AND IS IN ATTITUDE CONTROL. 

ENDKSAMP 

YES - LEAVE THE C-RELAYS IN ATTITUDE C. 

ksamptem 

BiT2 

waskset 

SEE IF COARSE-ALIGN JUST ON. IF SO, 

IF SO, the system is cycling UP SO SET 
THE C-RELAYS FOR COARSE ALIGN. 

A 

SETC0AR5 

USUAL RECONCILING WQULDNT WORK HERE. 

ALARM 

00204 

ENDK5AMP 

KSAMPTEM 

RECONCIL 

Uiwcalled-fdr mode change with Computer 

DOING MODE switching. 

ALARM 

00203 

LNDKSAMP 

NU IMU MODE INDICATION BITS GIVEN, 

ueskset 

ksamptem 

A 

Is present mode = Commanded 

H 

KSAMPIA 

37775 

KSAMPIA 

Ui><UbED CCS BRANCH - USED TO SET TRKR-ON 

PiBjJIQrF 

/ 

TURN OFF the PILOTS BUTTON BIT IF ON. 

KSAMPTEM 

Yes 
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0699 

REF 

20 

LAST 

182 

10*7261 

5 

072 7 

0 


TS 

0700 

REF 

8 

LAST 

182 

10*7262 

0 

2262 

0 


TC 

0701 

ref 

6 

LAST 

181 

10*7263 

3 

4516 

1 

KSAMPlA 

CAP 

0702 

REF 

4 

LAST 

1B2 

10,7264 

7 

0731 

□ 


MA5< 

0703 





10*7265 

6 

0000 

1 


DDJBLL 

070^ 

REF 

16 

LAST 

182 

10*7266 

7 

063 7 

1 


MAS2 

0705 

REF 

i6A 

LAST 

182 

10,7267 

I 

0000 

0 


^ r 

Q 

0706 

REF 

1 



10*7270 

0 

7322 

0 


TC 

0707 

REF 

1 



10*7271 

3 

7315 

1 


CAP 

0708 

REF 

5 

LAST 

183 

10*7272 

7 

0731 

0 


MASA 

0709 

REF 

17 

LAST 

183 

10*7273 

7 

0637 

1 


MA5< 

0710 





10*72/4 

4 

0000 

0 


COM 

0711 

REF 

2 

LAST 

183 

10,7275 

7 

7315 

0 


MAS< 

0712 

REF 

165 

LAST 

183 

10*7276 

1 

0000 

0 


CCS 

0713 

ref 

1 



10*7277 

0 

7312 

0 


TC 

071A 

ref 

3 

LAST 

182 

10*7300 

3 

7335 

0 


CAR 

0715 

REF 

18 

LAST 

183 

10*7301 

7 

0637 

i 



0716 

REF 

166 

LAST 

183 

10,7302 

1 

0000 

0 


CCS 

0717 





10,7303 

0 

7305 

0 


TC 

0718 

REF 

2 

LAST 

183 

10*7304 

0 

7312 

0 


TC 

0719 

REF 

66 

LAST 

178 

10*7305 

4 

4516 

0 


c 

0720 

REF 

22 

LAST 

182 

10,7306 

7 

0/26 

0 

C. '^A5< 

0721 

REF 

67 

LAST 

183 

10*7307 

6 

4516 

1 




0722 

REF 

23 

LAST 

183 

10,7310 

5 

0726 

1 


T^ 

0723 

REF 

3 

LAST 

180 

10,7311 

0 

7260 

1 


TC 

072A 

ref 

21 

LAST 

183 

10,7312 

1 

0727 

1 

KSAMPzA 

r ^ r 

1.. V b 

0725 

REF 

1 



10,7313 

0 

731/ 

Q 


TC 

0726 

REF 

2 

LAST 

183 

10,7314 

0 

7317 

0 


TC 

0727 





10*7315 

00060 

1 

OCT60 

OCT 

0728 

REF 

9 

LAST 

183 

10*7316 

0 

2262 

0 


TC 

0729 

ref 

A5 

LAST 

181 

10*7317 

1 

0723 

D 

K5AMP3A 

CCS 

0730 

REF 

1 



10*7320 

0 

7324 

0 


TC 

0731 

REF 

2 

LAST 

183 

10*7321 

0 

7 324 

0 


TC 

0732 

REF 

1 



10,7322 

3 

5501 

0 

IMUSTART 

CAF 

0733 

REF 

4 

LAST 

183 

10*7323 

0 

7261 

0 


TC 

073A 

REF 

62 

LAST 

178 

10*7324 

4 

5501 

1 

sysfail 

CS 

0735 

REF 

22 

LAST 

183 

10*7325 

5 

072 7 

0 


T S 

0736 

REF 

9 

LAST 

182 

10^7326 

0 

300 7 

0 


TC 

0737 





10,732 / 

00202 

1 


OCT 

0738 

REF 

10 

LAST 

183 

10*7330 

0 

2262 

0 


rc 

0739 

REF 

68 

LAST 

183 

10*7331 

4 

45 1 6 

0 

pibutoff 


0740 

ref 

24 

LAST 

183 

10*7332 

7 

0726 

0 

/ 
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WASK5ET 

ENDASAMP 

USER’S OWN PAGE NO. 25 

bit 1 

OESASET 

IS computer trying TO zero cdu and 

GETTING COARSE ALIGN, 

K5AMPTEM 

A 

IMUSTART 

YES. 

OCT60 

desaset 

KSAMPTEM 

0CT60 

A 

KSAMP2A 

0CT14 

KSAMPTEM 

A 

+ 2 

ASAMP2A 

OL^RR 

WE y 

LVKSAMP 

SEE IF PILOTS BUTTON IS ON. 

CHECK THAT JRNSW ON AND ATTITUDE CONTROL 
ARE desired AND ACTUAL AND THAT EITHER 
FINE align (FOLLOW) OR LOCK CDU (HOLD) 

Are present in addition, if so, set bit 

1 OF OLDERR TO INDICATE THIS CONDITION. 
MISSION PROGRAMS WILL DETECT THIS CON- 
DITION when they test olderr as they Do 

periodically. 

wasaset 

KSAMP3A 

KSAMP3A 

CHECK ON PREVIOUS ACTIVITIES 

NORMAL OPERATION 

Waiting 

60 

endasamp 

system FAILURE 

USPTAB +11D 
SYSFAlL 

syspail 

SEE IF BANK IS TO Be CHANGED, 

NU - SYSTEM failure. 

^JAllFLAc 
LVKSAMP +1 

SLT WAITING FLAG AND EXIT, 

ZERO 

IhU SYSTEM FAILURE. 

WASASET 

ALARM 

00202 

ENDASAMP 

Call ALARM SUBROUTINE FOR DISPLAY, 

OLDfefT^ 

BiT 1 OF OLDERR IS i IF THE PILOTS 
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USER’S OWN PAGE NO. 26 

074 1 

ref 

25 

Last 

183 

10»7333 5 

0726 1 


15 

OLDERR 

BUTTON IS ON WHILE THE COMPUTERS 

0742 

REF 

5 

LAST 

183 

10t7334 0 

7260 1 


TC 

lvksamp 

COMMAND I NG. 

0743 





10»7335 

00014 1 

0CT14 

OCT 

14 


0744 





10»7336 

00012 1 

fine+crs 

OCT 

12 


0745 

REF 

63 

LAST 

183 


5501 

WAITFLAG 

EOJALS 

ZERO 


0746 

REF 

4 

LAST 

173 


2262 

ENDK5AMP 

EOJALS 

LVDSRUPT 
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P07A7 



manual C0J-2ER0 PROGRAMS FqR 


IMU AND 1 

OPTICS 

CPUS, 


07AB 

ref 

19 

LAST 

165 

10i7337 

4 5503 

0 

MANCOU 

CS 

TWO 

Initiate manual cdu zero monitor. 

07A9 

ref 

6 

LAST 

183 

10»7340 

5 0731 

1 


TS 

DESKSET 

(C-RELAYS WILL BE SET BY RECONClL). 

0750 

REF 

1 



10,7341 

3 7501 

1 


CAP 

36SCNDS 


0751 

REF 

7 

LAST 

181 

10,7342 

0 2173 

0 


TC 

WAITLIST 


0752 

REF 

1 



10,7343 

21350 

1 


cadr 

MANIZD 


0753 

ref 

3 

LAST 

lai 

10,7344 

3 6 762 

1 


CAP 

OFFMASK 

ucjUal reconciling wouldnt work Here 

075A 

REF 

A 6 

last 

183 

10,7345 

7 0723 

0 


MASK 

USPTAB +11D 

since Th£ scan is from left to right. 

0755 

REF 

2 

LAST 

181 

10,7346 

6 7456 

1 


AD 

MOOECHNG 


0756 

REF 

2 

LAST 

181 

10,734? 

0 7206 

1 


TC 

SETC +3 


R0757 



waitlist 

TASK TD complete MAVUAL ZeRO 

, TJ^MS 

OFF LIGHT TO 

INDICCmte completion. 

0759 

REF 

1 



10»7350 

0 2731 

0 

MAN 1 2D 

TC 

2ER0ICTR 

ZERO counters. 

0760 

REF 

7 

last 

185 

10,7351 

1 0731 

0 


CCS 

DESKSET 

set DESkSET to +0 TO RESUME MANuAl 

0761 





10,7352 

0 7356 

0 


TC 


MODE monitoring UNLESS THE SYSTEM WAS 

0762 





10,7353 

0 7356 

0 


TC 

+ 3 

PLACED UNDER COMPUTER CONTROL BY ANOTHER 

0763 

REF 

64 

LAST 

184 

10,7354 

3 5501 

0 


CAP 

ZERO 

PROGRAM DURING THE 35 SEC. WAIT, 

076 A 

REF 

8 

LAST 

185 

10,7355 

5 0731 

1 


T5 

DESKSET 


0765 

REF 

3 

LAST 

101 

10,7356 

0 2743 

0 


TC 

setzlit 

TURN OFF LIGHT IF APPROPRIATE, 

0766 

REF 

5 

LAST 

141 

10,7357 

0 2256 

1 


TC 

TASKOVER 
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P0767 MANUAL OPTICS ZEROING PRoCLOjRES. 


0768 

ref 

1 



10*7360 

3 

7502 

1 MANOR TZ 

CAF 

0769 

REF 

8 

LAST 

185 

10*7361 

0 

2173 

0 

TC 

0770 

REF 

1 



10.7362 

21372 

1 

CAOR 

0771 

REF 

20 

LAST 

185 

10*7363 

A 

5503 

0 

C5 

0772 

REF 

A 

LAST 

177 

10.736A 

5 

0732 

1 

TS 

07 73 

ref 

2 

LAST 

111 

10,7365 

A 

A66 A 

0 

CS 

U77A 

REF 

A7 

LAST 

185 

10*7366 

7 

072a 

1 

MASK 

0775 

REF 

3 

LAST 

186 

10*7367 

6 

A66A 

1 

AD 

0776 

REF 

A8 

LAST 

106 

10*7370 

5 

072A 

0 

TS 

0777 

REF 

1 



10.7371 

0 

7057 

1 

TC 


R0778 WAITLIST TASK TO COMPLETE MANUAL OPTICS 2ER0. 


0779 

REF 

65 

LAST 

185 

10,7372 

3 

5501 

0 MANOZD 

CAF 

0780 

REF 

5 

LAST 

186 

10,7373 

5 

0732 

1 

TS 

0781 

REF 

1 



I0,737A 

0 

2671 

0 

TC 

0782 

ref 

A 

LAST 

185 

10*7375 

0 

2 7A3 

0 

TC 

0783 

REF 

6 

LAST 

185 

10*7376 

0 

2256 

1 

rc 
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USER* 5 OWN page NO, 28 


60SCNDS 

WAITLIST 

MANOZD 

Two 

DESOPSET 

CSQ 

USPTAB +120 
CSQ 

USPTAB +12D 
RECONTRK 


MANUAL OPTICS ZEROING ROUTINE, 
Call WAITLIST FuR 30 SEC. WAIT 

SET zeroing flag IN DESOPSET, 

RECONCILE ZERO OPTICS C RELAY 


ZERO 

DESOPSET Leave manual zero monitor 

2ER00CTR +l SET OPTICS COUNTERS. 

SETZLIT turn off light (POSSIBLY) AS SIGNAL, 

TASKOVER 
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L 001 taRupt output Control programs u5bR*s own page no, 29 


P07BA procedure TO TURm OFF AN OUTER WHOSE RESET PJLSE WAS INITIATED DURING THE FIRST OF TWO XCH 0UT2 IN- 


Ru786 

Struct IONS used in 

UPDATING 

the 

Contents 

OF 0UT2 

. the 

occurence OF 

this is extReMely rare- 

0708 

ref 

5 

last 

180 

10*7377 

7 

4511 

1 

JACKPOT 

MASK 

blT6 

See which field turned off unexpectedly. 

0789 

REF 

167 

LAST 

183 

10*7400 

1 

0000 

0 


CCS 

A 


0790 

REF 

1 



10*7401 

3 

7406 

1 


caf 

OCT00767 

IMU - MAKE UP MASK OCT 00377 . 

0791 

REF 

1 



10*7a02 

6 

740 1 

0 


AD 

OCT77407 

optics - MAKE UP MASK OCT 77407 , 

0792 

REF 

9 

LAST 

175 

10*7403 

7 

0012 

0 


MASK 

0UT2 

The problem will not recur here SINCE 

0793 

REF 

10 

LAST 

187 

10*7404 

5 

0012 

1 


T5 

0UT2 

THIS IS WITHIN 26 MCT OF THE LAST PULSE. 

079A 

REF 

112 

LAST 

178 

10*7405 

0 

0001 

0 


TC 

0 


0795 





10*7406 


0076 7 

1 

OCT00767 

3CT 

00767 


0796 





10*7407 


77407 

1 

0CT77407 

ocr 

77407 
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L 001 taRupt output Control prdsrams user»s own page no, 30 

Pu797 the following PROGRAM TAkE^ A 25 COMPLEMENT DIFFERENCE BETWEEN THE ACTUAL CDU COUNTER AND tHe DeBIReD 

Ro799 Setting, the agc ad instruction by itself cannot be used since +o = -o tHeRe* to compensate* if the signs of 

Rqhoi the operands are different and tHe rotation Necessary to null out tHe eRRor passes through zeRo (no overflow 

R08U3 occurs in DIFFERENCING THe DeSIReD AMO ACTUAL), A ONE WITH THe SIGN OF jHt DeSIReD ANGLe IS ADDeDtO THe DIFFeR- 

R08iJ5 ENCt. 


0806 

REF- 

13 

LAST 

175 

10,7410 

5 

0577 

1 

2SC0MDIF 

T5 

iTEMPi 

negative of CDU counter ARRIVES IN A. 

0807 

REF 

113 

LAST 

187 

10,7411 

3 

0001 

0 


XCH 

G 


0808 

REF 

1 



10,7412 

5 

0574 

1 


TS 

1TEMP3 


0809 

ref 

14 

LAST 

175 

10,7413 

4 

0600 

0 


cs 

1 temp? 

CdTEMPz) = -THE APPROPRIATE DeS, ANGLE. 

0810 

REF 

14 

LAST 

188 

10,7414 

6 

0577 

1 


AD 

ITEMPI 


0811 

REF 

26 

LAST 

181 

10,7415 

5 

0034 

0 


TS 

OVCTR 


0812 

REF 

1 



10,7416 

0 

7423 

0 


TC 

2SC0M2 

IF NO OVERFLOW, SEE IF +-1 MUST BE ADDED 

0813 

ref 

168 

LAST 

187 

lOilttl 7 

2 

0000 

0 

UNCUROVF 

INDEX 

A 

IF overflow, simply do OVERFLOW UNCOR- 

0814 

REF 

2 

last 

171 

10,7420 

3 

4477 

1 


C^F 

LIMITS 

Rlctiun and exit. 

0815 

REF 

27 

LAST 

188 

10,7421 

6 

0034 

0 


AD 

OVCTR 


0816 

REF 

2 

LAST 

168 

10,7422 

0 

0574 

1 


TC 

n EMP3 


0817 

ref 

15 

LAST 

188 

10,7423 

1 

0577 

0 

23COM2 

CCS 

ITEMPl 

NO OVERFLOW - SEE IF SIGNS OF INPUTS ARE 

0818 

REF 

1 



10,7424 

0 

7435 

1 


TC 

EXAM2 

DIFFERENT, 

0819 

REF 

2 

LAST 

188 

10,7425 

0 

7435 

1 


TC 

EXAM2 


0820 





10,7426 

0 

742 7 

1 


TC 

+ 1 


0821 

REF 

15 

LAST 

188 

10,7427 

1 

0600 

0 


CCS 

ITEMP2 


0822 

REF 

1 



10,7430 

0 

7443 

0 


TC 

INCEX- 

ADD -1 AND EXIT HERE. 

0823 

REF 

2 

LAST 

18B 

10,7431 

0 

7443 

0 


TC 

INCtX- 


0824 





10,7432 

0 

7433 

1 


TC 

+ 1 


0825 

REF 

28 

LAST 

lee 

1 0 , 7 433 

3 

0034 

0 

DIFEX 

XCrl 

OVCTR 

ORIGINAL DIFFERENCE IS OK IF SIGNS SAME. 

0826 

REF 

3 

LAST 

188 

10,7434 

0 

0574 

1 


TC 

1TEMP3 


0827 

REF 

16 

LAST 

18b 

10,7435 

1 

0600 

0 

ExAM2 

CCS 

ITEMP2 


0828 

REF 

1 



10,7436 

0 

7433 

1 


TC 

DIFEX 

SIGNS SAME HERE. 

0829 

REF 

2 

LAST 

188 

10,743 7 

0 

7433 

1 


TC 

DIFEX 


0830 





1 0 t 7 440 

0 

7441 

1 


TC 

+ 1 

Add *i TO difference here. 

0831 

REF 

69 

LAST 

183 

10,7441 

3 

4516 

1 


CAF 

ONE 


0832 





10,7442 

0 

744*, 

1 


TC 

+ 2 


0833 

REF 

70 

LAST 

188 

10, 74^,3 

4 

4516 

0 

INCEX- 

CS 

ONE 


0834 

REF 

29 

LAST 

188 

10,7444 

6 

0034 

0 


AD 

OVCTR 


0835 

REF 

30 

LAST 

188 

10,7445 

5 

0034 

0 


TS 

OVCTR 


0836 

REF 

4 

LAST 

188 

10,7446 

0 

0574 

1 


TC 

1TEMP3 

NORMAL TRAIN OF EVENTS, 

0837 

ref 

1 



10,7447 

0 

7417 

i 


TC 

UNCUROVF 

THIS ONLY HAPPENS AT 180 DEGREES. 





# • I 





. J * 
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^e4t>78A YUL SYSTEM FQR A&C^: REVISION 0 0^ PROGRAM SqLRUMSS bY 


L 001 

tarupt OUTPUT Control programs 




P0838 

outCtR Settings for out2, and c 

-relay Setting 

08^0 

10*7A50 

50A00 0 

CDUCODES 

qct 

08AI 

1 0 * 7 AS 1 

51000 0 


OCT 

08A2 

10,7A52 

52000 0 


OCT 

08A3 

10.7A53 

32UU0 0 


OCT 

08AA 

1 0 , T ASA 

31000 0 


OCT 

USAS 

10,7a55 

30AOO 0 


OCT 

08A6 

1 0 ♦ 7 AS6 

AOOll 0 

modechng 

oci 

08A7 

1 0 1 7 A 5 / 

00002 0 


OCT 

08A8 

10,7 A60 

OOOOa 0 


OCT 

08A9 

1 0 , 7 A6 1 

OOOlO 0 


OCT 

0850 

10,7A62 

01000 0 


OCT 

0851 

10 , 7 A63 

00000 1 


OCT 

0852 

1 0 * 7 A6‘, 

02000 0 


OCT 

R0853 

ZERO-ENCoDeR light not 

■ covered 

here. 


085A 

10*7 A65 

00377 1 

LOWS 

OCI 

0855 

REF 2 LAST 163 

10,7a65 

0UT2MA5K 

eojal: 

0856 

10,7 A66 

77A07 1 

0PTMA3K 

OCT 

0857 

10»7A6 I 

AAAOO 0 


OCT 

0858 

10,7A7Q 

A5000 0 


OCT 

0059 

lO,7A7l 

A 60 OU 0 


OCT 

0860 

iO,7A72 

00220 1 

OPTCODES 

OCT 

0861 

10,7A73 

002A0 1 


OCT 

0862 

10,7A7A 

OOIAO 1 


OCT 

0863 

10,7A75 

00120 1 


OCT 

096 A 

10»7A76 

26000 0 


OCT 

0865 

10,7A77 

25000 0 


OCT 

0666 

10,7500 

2AA00 0 


OCT 

0667 

10*7501 

0665a 0 

35SCNDS 

DEC 

0666 

10,7502 

13560 0 

60SCNDS 

dec 

0869 

0 

c 

06022 1 

nwmask 

OCT , 

0870 

ref a last 168 

22 61 

HIS 

eojal: 


NASA 1021108-021 


L966 


(MAIN) Page ib9 


user*s Own page no. 31 


constants for IMU modes 


SOAOO 
Si 000 
52000 
32000 
31000 
30A00 

AOOl 1 
00002 
OOOOA 
OOOlO 
01000 
00000 
02000 


-2 

-Y 

-X 

+x 

+ Y 
+ Z 


CDU 

CUU 

CDU 

CDU 


CDU 


(THIS CONSTANT IS NEVER USED BY RECONCIL 

buT only by The manual zeroing prog.) 


(TRANSFER switch - i^JOT USED), 




377 

LOwb 

77A07 


COMPLEMENT OF OUTCR 2 ACTIVITY BITS. 


AAAOO 

-Z 

GYRO 


A5000 

-Y 

GYRO 


A6000 

-A 

GYRO. 


00220 

-Y 

OPTICS 

CDU. 

0O2A0 

-A 

OPTICS 

CDU. 

OOIAO 

+ X 

OPTICS 

CDU. 

00120 

♦ Y 

OPTICS 

CDU. 

26000 

+ A 

GYRO 


25000 

+ Y 

GYRO 


2AA00 

+ Z 

gyro. 



35 . E 2 

i>0. £ 2 

oTo^ 

TTWtMASX 


\xkj 


For MANUAL 
FOR manual 
IMU, PIPA, 


IMUCDU Zeroing. 

OPTICS ZEROING, 

restart FAIL AND CURTAINS 


4bAt)78A YUL System for AGCA; revision O of program bOLRuMSS By NASA 1021106-021 


DEC A, 1966 (MAIN) PAgE 190 


ROOOl 

R0003 


MoDe switching and MARK ROUTINES 


USER'S OWN page no. i 


THE following SET uF PROGRAMS ARE USED To SELECT THE VARIOUS MqDES qR THe IMU ANO qPTICS, THE FoLLqWING 
MODES ARE POSSIBLE: 


ROOOA 

ROOOS 

R0006 

R0007 

Rooob 

KOOiO 
RUOl 1 
R0012 


imufinnw 


IMUZERO 

IMUCOARS 

imurecor 

imufine 


zeros IMU CDUS. 
COARSE ALIGNS IMJ, 
RETURNS IMU 
PREPARES TO 


imuattc 

IMUREENT 

IMULOCK 


FROM fine align TO CqARSe ALIGN 
pulse torque THE GYROS. 

Switches to fine with no delay for irig center ing-dont enter from coarse align mode 

S/C attitude CONTROLt 

ROLL RE-ENTRY. 


USE 


IMU 

IMU 


FOR 

FOR 


LOCKS IMU CDUS. 


R0013 

KOOIA 


IMuFlNlS(*»)REL£AStS IMU 

IMUSTALU*) IMU MOOE IDLING AND ERROR CHECKING 


ROOIS 

OPTZERO 

R0016 

OPTCoARS 

R00i7 

OPTTRKON 

ROOiS 

sctmark 

R00i9 

SXTMARK 

R0020 

MKRELEAS(«*) 

R0021 

OPTFINISI*#) 

R0022 

optstalli*) 


ZERO OPTICS CDUS. 

dummy optics COARSE-ALIGN MODE. 

OPTICS THACKER ON. 


request n scanning telescope marks, 

REQUEST N SEXTANT MARKS. 

RELEASE MARK SYSTEM. 

RELEASE optics. 

OPTICS MODE- IDLING AND ERROR CHECKING. 


K0023 OPTICS and iMU MODE ROUTINES MAY BE USED CONCURRENTLY. 

R002A IN addition* A ROUTINE WHICH INCREMENTS ANY DeSIReU 2 S CoMPLeMENI ANGLE BY AN INPUT AMOUNT IS 

R0026 included (CDJINCJ . 


R0027 


CAlLI 

NG sequence 15 AS FOLLOWS : 

R0028 

L-1 

CAF 

No.MARKS 

(FOR sctmark 

R0029 

L 

TC 

BANKCALL 


R0030 

L+1 

cadr 

(SUBRO) 

Ar4Y OF THE lA 

R0031 


{*) 

The stall rout 

INES are called 

ROO 33 

the mode 

-SWITCHING IS complete 

(WITH VAC-AREA 

R0035 

desired 

MODE WAS successfully 

ACHIEVED. 

R0036 


(X*) 

No STALL ROUTI 

NE necessary in 


and SXTMARK ONLY) . 

MODE ROUTINES OR CDUINC, 


TO terminate any mode Request 

PROTECTED) AND RETURN IS TO L 
CONUUnCTION WITH THIS REQUEST 


. THE requesting JOB IS STALLED UNTIL 
+ 2 IF unsuccessful AND L 4.3 IF THE 




^e^578A YUL SYSTEM FDR AGCA: REVISION 0 OF PROGRAM SOLRUMS5 BY NASA 1021108-021 


DEC A* 1966 


(MAIN) PAGE 19 1 


L mode switching and mark Routines user’s own page no, 2 


P0038 



SPECIAL 

DP 

TIME COUNTER 

READING ROUTINE. 






0039 








26 7 6 


BANK 

1 




OOAO 






26 7b 

2 

001 7 

0 

READTIME 

INHlNT 


Entry if under executive. 



OOAl 

REF 

2 

LAST 

156 


267 7 

4 

0035 

0 


cs 

TIME2 

EimTRY if in interrupt. 



00A2 

REF 

3 

LAST 

I3b 


2 700 

5 

0572 

1 


T5 

RUPTSTOR 




00A3 

REF 

4 

LAST 

156 


2/01 

4 

0036 

0 


CS 

TlMEl 




ooaa 

REF 

4 

LAST 

191 


2702 

5 

0573 

0 


T5 

RUPTSIOR +1 




0045 

REF 

169 

LAST 

188 


2703 

1 

0000 

0 


CCS 

A 

IF MINOR PART Zero, MAJOR 

part 

COULD 

0046 

REF 

114 

LAST 

188 


2/04 

0 

0001 

0 


1C 





0047 

REF 

170 

LAST 

191 


2705 

1 

0000 

0 


V. w D 

A 




0048 

REF 

115 

LAST 

191 


2706 

0 

0001 

0 


1 C 

Q 




0049 

REF 

3 

LAST 

191 


2 70 7 

4 

0035 

0 


CS 

T IME2 

UP, SO READ IT AGIN, 



0050 

REF 

5 

LAST 

191 


2710 

5 

0572 

L 


IS 

RUPTSTOR 




0051 

REF 

116 

LAST 

191 


2 711 

0 

0001 

0 


TC 

Q 




R0052 



ROUT 

INe 

TD 

Read fine 

time in 

IN2 even if 

■ n change^ as Its 

Being read, call in inhint. 



0054 

ref 

8 

LAST 

170 


2712 

3 

0006 

1 

FINETIME 

XCH 

IN2 

May be called under exec 

OR RUPl, 

0055 

REF 

9 

LAST 

191 


2713 

3 

0006 

1 


xch 

IN2 




0056 

REF 

1 




2714 

7 

2356 

1 


MASK 

FINEMASK 

NuTE THAT THE OR OF TWO STATES 

A AND B 

0057 

REF 

16 

LAST 

188 


2715 

5 

0577 

1 


TS 

ITEMPI 

Ib not LESS than EUHER A 

OR b. 


0058 

REF 

10 

LAST 

191 


2716 

3 

0006 

1 


XCH 

1N2 




0059 

REF 

2 

LAST 

191 


2717 

7 

2356 

1 


MASK 

FINEMASK 




0060 

REF 

17 

LAST 

188 


2720 

5 

0600 

1 


TS 

ITEMP2 




0061 






2721 

4 

0000 

0 


COM 


Select the minimum of the 

LAST 

TWO 

0062 

REF 

17 

LAST 

191 


2 7 22 

6 

057 7 

1 


AD 

ITEMPI 

SIATES READ. 



0063 

REF 

171 

LAST 

191 


2723 

1 

Oooo 

0 


CCS 

A 




0064 

REF 

18 

LAST 

191 


2724 

3 

0600 

1 


XCH 

ITEMP2 




0065 

REF 

117 

LAST 

191 


2725 

0 

0001 

Q 


TC 

0 




0066 






2726 

3 

0000 

1 


NDDP 





0067 

REF 

18 

LAST 

191 


272 V 

3 

0577 

1 


XCH 

ITEMPI 




0068 

REF 

118 

LAST 

191 


2 730 

0 

0001 

0 


TC 

0 




R0069 



subroutine 

TO 2ER0 IMU 

CDU 

COUNTERS. 






0070 

REF 

66 

LAST 

186 


2731 

3 

5501 

0 

ZEROICTR 

caf 

ZERO 

used by automatic And manual zeroing 

0071 

REF 

3 

LAST 

162 


2 732 

5 

0047 

1 


TS 

CDUX 

routines. 



0072 

REF 

2 

LAST 

156 


2733 

5 

0050 

1 


TS 

CDUY 




0073 

REF 

2 

LAST 

156 


2734 

5 

0051 

u 


TS 

CDUZ 




0074 

REF 

119 

LAST 

191 


2735 

0 

0001 

0 


TC 

Q 





0075 

0076 

REF 

REF 

6 

1 

LAST 

191 

2736 

2737 

4 

3 

0572 

0643 

0 

0 

lodsampt cs 

XCH 

RUPTSTOR 

samptime 

time is Snatched in hurt for noun 65 

0077 

REF 

7 

LAST 

191 

2740 

4 

0573 

1 

cs 

RUPTSTOR +1 


0078 

REF 

2 

LAST 

191 

2741 

3 

0644 

1 

XCH 

SAMPTIME +1 


0079 

REF 

120 

LAST 

191 

2 742 

0 

0001 

0 

TC 

Q 



^a^t)7eA YUL SYSTEM FOR AGC<»: REVISION 0 Oh PROGRAM SOLRUMSS BY NASA 1021 106-021 


DEC A, 1966 


(MAIN) PAGE 192 


L mode switching and mark Routines user*s own page no, 3 

P 0 O 8 O SeTZLIT sets the zero encoder lamp according to the DESIReD-MODe registers DESkSET and DeSOPSeT. 


0062 

REF 

121 

LAST 

191 

27A3 

3 

0001 

0 

SETZLIT 

XCH 

Q 


0083 

REF 

19 

LAST 

191 

27AA 

5 

0577 

1 


T5 

ITEMPl 


UObA 

REF 

9 

LAST 

165 

27A5 

1 

0731 

0 


CCS 

DE5KSLT 


0065 





2 7A6 

0 

2752 

0 


TC 

♦ A 

COMPUTER COMMANDING-MAY BE ZEROING 

00B6 

REF 

1 



27A7 

0 

2756 

1 


TC 

OPTZTEST 

NUT manual ZERO, 

0067 

ref 

I 



2750 

0 

2773 

0 

TURNONZ 

TC 

ZLITON 

MmNUAL zeroing MODE, 

0086 

REF 

20 

LAST 

192 

2 751 

0 

0577 

1 


TC 

ITEMPl 


0089 

REF 

71 

LAST 

188 

2752 

6 

A516 

1 

♦ A 

AD 

ONE 


0090 

REF 

7 

LAST 

183 

2753 

7 

A516 

0 


MASK 

Bill 


0091 

REF 

172 

LAST 

191 

275^ 

1 

0000 

0 


jf“ ^ c 

^ 3 

A 


0092 

ref 

1 



2 7 55 

0 

2 750 

1 


TC 

TURNONZ 

COMPUTER commanding ZERO-ENCODEK 

0093 

REF 

6 

LAST 

186 

2756 

1 

0732 

0 

OPTZTEST 

CCS 

DESOPSET 


009A 





275 7 

0 

2762 

0 


TC 

+ 3 

may be commanding Optics zero. 

0095 

REF 

1 



2760 

0 

2766 

1 


TC 

ZLITOFF 

NUT MANUAL ZERO-TURN LIGHT OFF. 

0096 

REF 

2 

LAST 

192 

2 7bi 

0 

2750 

1 


I C 

TURNONZ 

MANUAL OPTICS 

0097 

REF 

72 

LAST 

192 

2 762 

6 

A5 1 6 

1 

+ 3 

AD 

ONE 


0096 

REF 

9 

LAST 

178 

2763 

7 

A503 

1 


MASK 

BIT12 


0099 

REF 

173 

LAST 

192 

276A 

1 

0000 

0 


CCS 

A 


0100 

REF 

3 

LAST 

192 

2765 

0 

2750 

1 


TC 

TURNONZ 


0101 

REF 

1 



2766 

A 

5070 

1 

2L1T0FF 

cs 

ZLITBITS 

TURN OFF ZERO ENCODER LAMP. 

0102 

REF 

A9 

LAST 

186 

2 76 7 

7 

0723 

0 


mask 

DSPTAB +11D 


0103 

REF 

12 

LAST 

181 

2770 

6 

A500 

0 


AD 

BIT15 


OlOA 

REF 

50 

LAST 

192 

2771 

5 

0723 

1 


T5 

DSPTAB +11D 


0105 

REF 

21 

LAST 

192 

2772 

0 

0577 

1 


TC 

ITEMPl 


0106 

ref 

2 

LAST 

192 

2773 

A 

5070 

1 

ZLITON 

CS 

ZLITBITS 

TURN ON Zero-encoder lamp. 

0107 

REF 

51 

LAST 

192 

211 ** 

7 

0723 

0 


MASK 

DSPTAB *110 


0108 

REF 

3 

LAST 

192 

2 775 

6 

5070 

0 


AD 

ZLITBITS 


0109 

REF 

52 

LAST 

192 

27 76 

5 

0723 

1 


T5 

DSPTAB +11D 


0110 

REF 

122 

LAST 

192 

2777 

0 

0001 

0 


TC 

Q 


0111 

REF 

1 





5070 

ZLITBITS 

EDJALS 

aCTA0020 

Cb CYR IN DMP. 


(MAIN) PAGE 193 


A8Ab78A YUL SYSTEM FDF< AGCA: REVISION 0 OF PROGRAM SOLRUMSS BY NASA 1021108-021 


L MODE SWITCHING AND MARK ROUTINES 


Poll 3 


IMU ZEROING ROUTINE. 


OllA 


lAf 6000 


SETLOC 30000 


0115 

REF 

01 16 

REF 

0117 

ref 

0118 


0119 


0120 

REF 

0121 

REF 

0122 

REF 

0123 

REF 

0124 

REF 

0125 

REF 

0126 

REF 

0127 

REF 

0128 

REF 

0129 

REF 

0130 

REF 

0131 


0132 

REF 

0133 

REF 

0134 

REF' 

0135 

REF 

0136 


0137 


0138 

ref 

0139 

REF 

0140 

ref 

0141 

REF 

0142 

REF 

0143 

REF 

0144 


01a5 


0146 

REF 

01a7 

REF 

0148 

REF 

0149 

REF 


73 LAST 192 
9 LAST 163 


I 


2 

LAST 

192 

10 

LAST 

IBl 

26 

last 

164 

11 

last 

193 

27 

LAST 

193 

9 

last 

IBI 

9 

LAST 

186 

3 

LAST 

181 

1 

10 

LAST 

193 

1 

3 

LAST 

138 

2 

LAST 

185 

1 

2 

last 

193 


1 

U 

LAST 

193 

1 

7 

LAST 

186 

2 

LAST 

193 

3 

LAST 

193 


1 

12 

LAST 

193 

1 

8 

LAST 

193 


1A.6000 A AS16 0 
1A,6001 b 0677 1 


IMUZERO C5 

TS 


ONE 

CDUIND 


14.6002 0 62AS 1 

14.6003 OOOSl 0 
14.600a 40011 0 
14.6005 0 2773 0 


TC SETKANDC 

OCT 00051 

OCT 40011 

1C 2L1T0N 


14.6006 4 4513 0 

14.6007 7 0726 0 

14.6010 6 4513 1 

14.6011 5 0726 1 

14.6012 3 4505 0 

14.6013 0 2173 0 

14.631a 30201 1 



A0_ _ B IT4 

rTB OCDERIT^ 

TC waitlist 

C40R IFAILQK 


14.6015 

14.6016 

14.6017 

14.6020 

14.6021 

14.6022 


3 

607 ? 

1 


C4F 

3 5SLCS 

0 

2173 

0 


TC 

WAITLIST 


30022 

1 


C43R 

IMUZEROD 

2 

0016 

1 

MODEEXIT 

RELINT 


0 

5702 

1 


TC 

SwRETURN 

0 

2731 

0 

IMUZEROD 

TC 

zeroictr 


14. 6023 

0 6070 

0 

TC 

14,6024 

0 6246 

1 

MOREZERO TC 

14.6025 

00050 

1 

QCT 

14 . 6026 

40010 

1 

OCT 

1^.6027 

3 6101 

1 

CAF 

14.6030 

0 2173 

0 

TC 

14.5031 

30033 

1 

CAOR 

14.6032 

0 2256 

1 

TC 


KCHECK 

SETKANDC +l 

00050 

40010 

lOStCS 

WAITLIST 

zeroattc 

taskover 


1 4 . 6033 

0 6070 

0 

ZEROATTC TC 

1^.6034 

0 6246 

1 

TC 

14,6035 

00060 

1 

OCT 

14.6036 

41000 

1 

OCT 

14.6037 

3 6103 

0 

CAF 

14 ♦ 6040 

0 2173 

0 

TC 

14.6041 

30043 

0 

CAOR 

14,6042 

0 2256 

1 

TC 


KChECK 

SETKANDC +1 

00060 

41000 

320MS 

WAITLIST 

ZERODRVE 

TASKOVER 


DEC 4, 1966 


USER'S UWN PAGE NO. 4 


disable cdu drive 

bY SETTING CDUIND NEGATIVE. 

GO TO SUBROUTINE TO SWITCH C RELAYS 
= C (DESKSETJ =CUMP CONT+ZERO+F I NE 
= C setting for fine ♦ ZERO 
TURN ON ENCODER ZEROING LAMP 


DISABLE IMU fail FOK 5 SEC IN CmSE WE 

joST came OUT Of coarse Align. 


Set a waitlist call for 35 seconds 
so those shafts will have time TO Get 

there. 

GENERAL EXIT FROM MODE SWITCH PROGS 
WHICH LEAVES VIA SwCALL EXIT 

GU AND ZERO X, Y, AnD Z COUNTERS 

SEE IF SYSTEM STILL FUNCTIONING OK. 

call for 10 SECONDS OF FINE ALIGN TO 
allow CDUS TO GO AT LEAST 90 DEGREES 
UF THE WAY HOME UNLESS THE PLATFORM IS 
SITTING AT ANY FALSE NULLS. 

WL WILL GO INTO ATTiTUTE CONTROL NEXT. 


USUAL SYSTEM CHECK. 

COMMAND attitude CONTROL (WITHOUT ATTC 
LAMP LIT) SO THAT WE CAN DRIVE THE CDUS 
(LIGHT ON AFTER ALL) AWAY FROM FALSE NUL 


WrtIT FOR MODE SwITCH EjeFORe ENABLING CDU 
DRIVE IN T4KUPT. 


4B4tj78A YUL SYSTEM FOR AGC<t: REVISION Q Of- PROGRAM 50LRUM55 BY 


L mode switching and mark Routines 


0150 

REF 

3 

LAST 

193 

14 ♦ 6043 

0 6070 

0 

ZERODRVE 

TC 

0151 

REF 

3 

LAST 

85 

14. 6044 

3 4502 

1 


CAF 

0152 

ref 

5 

LAST 

162 

14*6045 

5 0700 

0 


T5 

0153 

REF 

6 

LAST 

194 

14 * 6 04 6 

5 0701 

1 


TS 

0154 

ref 

7 

LAST 

194 

14 * 6 04 7 

5 0702 

1 


TS 

0155 

REF 

67 

LAST 

191 

14*6050 

3 5501 

0 


CAF 

0156 

REF 

10 

LAST 

193 

14,6051 

5 0677 

1 


TS 

0157 

REF 

1 



14*6052 

3 6102 

1 


CAF 

0158 

REF 

13 

LAST 

193 

14*6053 

0 2173 

0 


TC 

0159 

REF 

1 



14 * 6 0 5 4 

30056 

1 


CAOR 

0160 

REF 

9 

LAST 

193 

14,6055 

0 2256 

1 


TC 

0161 

REF 

4 

LAST 

194 

14,6056 

0 6070 

0 

REZFINE 

TC 

0162 

REF 

4 

LAST 

193 

14*605 7 

0 6246 

1 


TC 

0163 





14 * 6 060 

00050 

1 


OCT 

0164 





14*6061 

40010 

1 


OCT 

0165 

REF 

7A 

LAST 

193 

14*6062 

4 4516 

0 


CS 

0 1 66 

REF 

11 

LAST 

194 

14 * 6063 

5 0677 

1 


TS 

0167 

REF 

1 



14*6064 

3 6100 

0 


CAF 

0168 

REF 

14 

LAST 

194 

14,6065 

0 2173 

0 


TC 

0169 

ref 

I 



14 *6066 

30171 

0 


CAOR 

0170 

REF 

10 

LAST 

194 

14,606 7 

0 225b 

1 


TC 


0171 

ref 

23 

last 

183 

14*6070 

1 0 727 

1 

KCHeCK 

CCS 

0172 

REF 

123 

LAST 

192 

14,60 71 

0 0001 

□ 


TC 

01 73 

REF 

1 



14*6072 

0 6264 

1 


TC 

0174 

REF 

124 

LAST 

194 

14*6073 

0 0001 

0 


TC 

0175 

REF 

2 

LAST 

194 

14*6074 

0 6264 

i 


TC 

0176 





14,60 75 

21450 

0 

90SECS 

DEC 

01 77 





14*6076 

1 06Z4 

0 

455ECS 

DEC 

01 78 





14,60 77 

06654 

0 

35SECS 

DEC 

0179 





14,6100 

03720 

L 

20SECS 

DEC 

OlbO 





14*6101 

01750 

1 

lOSECS 

DEC 

0181 





14*6102 

00310 

0 

2SECS 

DEC 

0182 





14*6103 

00040 

0 

320MS 

DEC 


(MAIN) PAGE 194 


NASA 1021108-021 DEC 4t 1966 


LiSeR»S own page no. 5 


KCHECK 

(QUARTER 

THETAD 

THETAD +1 

THETAD +2 

ZERO 

CDUIND 

2bECS 

WAITLIST 

REZFINE 

taskover 


VlRIFY switch to attitude control. 

WE WILL DRIVE THE CUUS TOWARD 45 DEGREES 
FOR 2SECS (ABOUT 10 DEGREES OF MOVEMENT 
AT MOST), THIS WILL DRIVE ANY CDUS OFF 
FALSE nulls WITHOUT MOVING THE PLATFORM 

CuU LOOPS ARE NOW ENABLED, 


GO BACK TO FINE' ALIGN WHEN DONE 


KCHECK 
SETKANDC +1 
00050 
40010 
ONE 

CDUIND 

20SECS 

WAITLIST 

IMUFINED 

TASKOVER 


VERIFY MODE SWITCH AS USUAL. 

Call FOR 20 SECONDS OF FINE ALIGN TO 
ALLOW enough TIME FOR THE CDUb TO FIND 
fHE GIMBALS, 

CuU LOOPS NOW DISABLED. 


CHECK FOR PRESENCE OF IMU OR CDU FAILS. 


waskset 

CJ 

END I HU 
0 

END I MU 


RcTURN to caller if system ok - SET UP 
error RETURN AT ENDIMU OTHERWISE. 


90.00 E 2 

45.00 E 2 Tame F'OR IMUCDU coarse ALIGN, 

35.00 E 2 Tame for imucdu zero encoder. 

20.00 E 2 

10.00 E 2 

2.00 E 2 
.32 E2 


‘♦B^!?70A YUL SyJjTEm fOR REy/lSlON 0 Op P^3Qf<AM SOlRUM5>5 BY 


L mode switching and MARK ROUTINES 


P01b3 IMU coarse align PROGRAM 


01 BA 

REF 

5 

Last 

19a 

1A,610A 

0 62A5 

1 

IMUCOARS 1C 

0185 





lAtSlQS 

OO 0 A 2 

1 

OCT 

0186 





IA 16 IU 6 

40002 

1 

OCT 

0187 

REF 

5 

LAST 

166 

1A»6107 

0 2743 

0 

TC 

0188 

REF 

2 

LAST 

193 

1A»61 10 

3 6103 

0 

C^F 

0189 

REF 

15 

LAST 

19A 

14t61U 

0 2173 

0 

TC 

0190 

REF 

1 



lAf 61 12 

30125 

1 

CftOR 

0191 

REF 

1 



lAf 61 13 

0 6020 

0 

TC 


0192 

REF 

4 

Last 

191 

1 4 » 6 1 1 4 

4 

0047 

0 

RECOARSD 

cs 

0193 





14,6115 

4 

0000 

0 


COM 

0194 

ref 

8 

last 

194 

14,6116 

5 

0700 

0 


TS 

0195 

REF 

3 

LAST 

191 

14,61 W 

4 

0050 

0 


C5 

0196 





14,6120 

4 

0000 

0 


COM 

0197 

REF 

9 

last 

195 

14,6121 

5 

0701 

1 


rs 

0196 

REF 

3 

LAST 

191 

14,6122 

4 

0051 

1 


cs 

0199 





14,6123 

4 

0000 

0 


COM 

0200 

REF 

10 

last 

195 

14,6124 

5 

O 7 O 2 

1 


T5 

0201 

ref 

5 

last 

19a 

14,6125 

0 

6070 

0 

begincom 

TC 

0202 

ref 

68 

last 

19A 

14,6126 

3 

5501 

0 

STARTCRS 

C'^F 

0203 

ref 

12 

last 

19 A 

14,612 ( 

5 

0677 

1 


0204 

ref 

1 



14,6130 

3 

6076 

0 


CAF 

0205 

ref 

16 

last 

195 

14,6131 

0 

2173 

0 


TC 

0206 

REF 

1 



14,6132 


30214 

0 


CADR 

0207 

REF 

11 

last 

194 

14,6133 

0 

2256 

1 


TC 


NASA 102L108-021 


DEC Ai 1966 


(MAIN) page 195 



USER'S OWN page no. 6 

SeTKANDC 

00042 

40002 

SET desired C and K RELAY SETTINGS. 
COMPUTER control + COARSE ALIGN, 

C RELAY COARSt ALIGN. 

SETZLIT 

SERVICE THE ZERO ENCODER LAMP 

320MS 

waitlist 

BEGINCOM 

MODEEXIT 

SET WAITLIST CALL FOR 320 M.S, TO 
ACCOMMODATE CONTACT BOUNCE + T4RUPT lAG 

CDUX 

thetad 

COUY 

thetad +1 

CDUZ 

THETAD +2 

Going bacx into coarse align from fine 
Align, put cdu counter values into 
Desired angle Registers and enable the 

T4HUPT CDU DRIVE. 

kcheck 

ZERO 

CDUIND- 

Verify correctness of present mode, 
enable cdu loop CLOSURE 

45SEC5 

WAI ILIST 
COARSDON 

CDU LOOPS TO settle 

TASKOVER 

.6 


4b^^>78A YUL system FDR AGC^: REVISION 0 OF PROGRAM SOLRUM55 BY 


L Mode switching and mark Routines 


P0Z08 

I MU 

FINE 

ALI&N PR05RAM 





0209 

REF 

6 

LAST 

195 

1 4 f 6 1 3 ^ 

0 6245 

1 

imurecor 

TC 

0210 





l4t6I35 

00042 

1 


OCT 

0211 





1 4 f 6 1 36 

40002 

1 


OCT 

0212 

REF 

3 

LAST 

195 

14»613? 

3 6103 

0 


CAP 

0213 

REF 

17 

LAST 

195 

14i6140 

0 2173 

0 


TC 

OZU 

REF 

1 



I4»6l4l 

30114 

0 


CADR 

0215 

REF 

1 



14*6142 

0 6160 

0 


TC 

0216 

ref 

7 

Last 

196 

14*6143 

0 6245 

1 

IMUFINE 

TC 

0217 





14*6 144 

00050 

1 


OCT 

0218 





14*6145 

40010 

1 


OCT 

0219 

REF 

12 

LAST 

193 

1 4 * 6 1 4 b 

4 4513 

0 



0220 

REF 

28 

LAST 

193 

14,614 I 

7 0726 

0 


0221 

REF 

13 

LAST 

19fo 

14,6150 

6 4513 

1 


AO 

0222 

REF 

29 

LAST 

196 

14,6151 

5 0726 

1 



0223 

REF 

10 

LAST 

193 

14*6152 

3 4505 

0 


CAP 

022^ 

REF 

10 

LAST 

196 

14*6153 

0 2173 

0 


TC 

0225 

REF 

4 

LAST 

193 

1 6 1 

30201 

1 


CAOR 

0226 

REF 

1 



14,6155 

3 6075 

0 


CAP 

0227 

ref 

19 

LAST 

196 

14*6156 

0 2173 

0 


TC 

0228 

ref 

2 

LAST 

194 

14*6157 

30171 

0 


CAOR 

0229 

ref 

75 

LAST 

194 

14*6160 

4 451b 

0 

disexit 

C5 

0230 

REF 

13 

LAST 

195 

14*6161 

5 Ob 77 

1 


TS 

0231 

REF 

2 

LAST 

195 

14*6162 

0 6020 

0 


TC 


0232 

REF 

1 



14*6163 

0 6757 

1 

IMUFINNW TC 

02325 

REF 

8 

LAST 

196 

14*6164 

0 6245 

1 

TC 

0233 





14*6165 

00050 

1 

OCT 

0234 





14*6166 

40010 

1 

OCT 

0235 

REF 

4 

LAST 

196 

14*6167 

3 6103 

0 

CAF 

0236 

REF 

2 

LAST 

196 

14,61 70 

0 6156 

0 

1 C 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE lyfe 



USER’S OWN PAGE NO. 7 

setk>andc 

00042 

40002 

320M5 

WAI TLIST 
RECQARSD 

Gu INTO COARSE ALIGN FROM FINE ALIGN, 

(SEE remarks on RECoARSD FOR FURTHER 

DET A 1 LS ) 

USUAL contact CLOSURE AND SAMPLE TIME 

DISEXIT 

DISABLE GYRO ACTIVITY, 

setkandc 

00050 

40010 

SET UP c relay pattern and oe&iRed k 

DES K = computer Control ♦ fine 

C = FINE align 

— BXXi, 

QlD'EHR^ 

BIT4 

OLDEHTT^ 

BIT 10 

waitlist 

IFAILOK 

Comes through here after every coarse 

Align, set bit 4 of olderr to inhibit 

IMU fail for another 5 seconds. 

90SECS 

WAITLIST 

IMUPINED 

ONE 

CDUIND 

MODEEXIT 

SET WAITLIST CALL FOR 90 SEC. TO ALLOW 

gyros to RE-CENTER before IRIG PULSE 

fORQUING 

Disable T4 imu (CDU or gyro) activity. 

tstimact 

SETKANDC 

00050 

40010 

320MS 

DISEXIT -2 



t 


1 




0237 
02373 

02376 

0238 

0239 
02A0 

0241 

0242 

0243 
02^4 

0245 

0246 


yul System for agc4: revision o ok program solrumss 6y 

* 


MoOe switching and mark RoOrlNES 


REF 


14^61 n 0 3430 0 
14»6172 02000 0 


IMUFINED TC 

OCT 


REF 

3 

LAST 

194 

REF 

10 

LAST 

192 

REF 

30 

LAST 

196 

REF 

ITA 

LAST 

19i 

REF 

1 



REF 

1 



ref 


LAST 

196 



LAST 

197 

refI 

n|32J 

1 LAST 

197 

ref 

12 

LAST 

195 


1 ^ I 6 1 7 3 

0 

6264 

1 

TC 

14*6174 

3 

4503 

0 

& C 

14*617S 

7 

0726 

0 


1 4 f 6 1 7 6 

1 

0000 

0 

CCS 

14*6177 

0 

6305 

1 

TC 

14*6200 

0 

6314 

1 

TC 

14*6201 

4 

4513 

0 

IFAILOK C5 

14*6202 

7 

0726 

0 

>rA5< 

14*6203 

5 

0 fZb 

1 

( TS^ 

14*6204 

0 

2256 

1 

T u 



NASA 1021108-021 


DEC 4, 


1966 


(MAIN) page 197 


useR*s own page no, a 


FLAGIDWN 

02000 

ENDIMU 



FA I LEND 
GOOOEND 


olderrX 

-OLDERg-O 

TASKOyER 


NO IMU FAILS* please. 


ENABLE IMU F.AIL 5 SECONDS AFTER COMING 
OUT OF COARSE ALIGN. 


YUL 5Y5TEM FOR AGCA; REVlbUN 0 Of PROGRAM SOLRUM&5 BY NAbA 1021108-021 


DtC A, 1966 


(MAIN) page 19B 


L MoOE SWITCHING AND MARK RoUjlNES 


UStR»S OWN PAGE NO. 9 


P02A7 

CDU 

LOCK 

PROS 

RAM 







02A8 

REF 

9 

LAST 

196 

1 A ♦ 6 20S 

0 62AS 

1 

IMULOCK 

TC 

setkandc 

02A9 





lA»62Ub 

OOOAA 

1 


OCT 

OOOAA 

02SD 





1A»620 ( 

AOOO't 

I 


OCT 

AOOOA 

02S1 

REF 

5 

LAST 

196 

1A»6210 

3 6103 

0 


caf 

320MS 

02S2 

REF 

20 

LAST 

196 

lAt62U 

0 2173 

0 


TC 

WAITLIST 

02S3 

REF 

1 



lA»b2l<J 

3021A 

0 


CAOR 

IMULOCKD 

02SA 

REF 

3 

LAST 

196 

1 A ♦ 6 1 J 

0 6160 

0 


1 : 

DISEXIT 

02S5 

REF 

A 

LAST 

197 

1A*621A 

0 626A 

1 

IMULOCKD 

TC 

ENDIMU 

02b6 

REF 

2 

LAST 

197 

1A»621S 

0 631A 

1 


TC 

GOOOEND 

02S7 

REF 

2 

LAST 

19b 


1A,621A 

COARSDON 

EOJALS 

IMULOCKD 


SlT APPROPRIATE K AND C CONfiGS, 


PLACE. 


^b^57BA YUL SYSTEM FOR AGC^; REVISION 0 OF PROGRAM SOURUMSS BY NASA 1021108-021 
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(MAIN) page 199 


L MODE SWITCHING AND MARK RQUl INES 


USER»S OWN page NO. 10 


P025e 

IMU 

re-entry 

AND 

ATTITUDE control PRO 

grams 



0259 

ref 

2 last 

196 

1A,6216 

0 6757 

1 IMUREENT 

TC 

TSTIMACT 

02595 

REF 

10 last 

198 

1 A , 6 2 1 7 

0 62A5 

I 

TC 

SETKANDC 

0260 




1A.6220 

OOIAO 

1 

OCT 

OOIAO 

0261 




lAt622I 

A2000 

1 

OCT 

A2000 

0262 

REF 

1 


IA*6222 

0 6227 

0 

TC 

ENABEXIT 


0263 

REF 

3 

LAST 

199 

1A»6223 

0 6757 

1 

IMUATTC 

TC 

TSTIMACT 

02635 

REF 

11 

LAST 

199 

1A,622A 

0 6245 

1 


TC 

set<andc 

026A 





1A,62^5 

00060 

I 


DCT 

00060 

0265 





lA*622b 

AlUOO 

1 


DCT 

41000 

0266 

REF 

6 

LAST 

198 

lAt6227 

3 6103 

0 

ENABEXIT 

CAF 

320MS 

0267 

REF 

21 

LAST 

198 

IA,623U 

0 2173 

0 


TC 

WAITLIST 

0268 

REF 

1 



1A*6231 

30233 

0 


CADR 

ENABLE 

0269 

REF 

A 

LAST 

198 

1A,6232 

0 6160 

0 


TC 

DI5EXIT 

0270 

REF 

2 

LAST 

19 7 

1A*6233 

0 3430 

0 

ENABLE 

TC 

flagicwn 

02703 





lA * 623A 

02000 

0 


DCT 

02000 

02706 

REF 

5 

LAST 

198 

1A»6235 

0 6264 

1 


rc 

END I MU 

0271 

REF 

69 

LAST 

195 

14*6236 

3 5501 

0 


CAF 

ZERO 

0272 

REF 

lA 

LAST 

196 

14*6237 

5 0677 

1 


TS 

CDUIND 

0273 

REF 

3 

LAST 

198 

IA*62AU 

0 63lA 

1 


TC 

GOODEND 


A027A 

A0275 

A0276 

A0277 


DISABLE possible GYRO ACTIVITY. 


ENABLE CDU LOOPS 


notice that no inspection of CDU AND IMU 

error signals is made SINCE IN THESE 

MODES THE MAIN PROGRAM MUST CHECK THE 
SlATUS OF THESE SIGNALS PERIODICALLY. 


Nfi?78 IMUFINIS - TO Be CALLeD AT HE END qF CoM? UTeP-^ONTRoLLeD MqDe SWITCHING. PLACeS MqDe SAMPLING INTO 

R0280 MANUAL CONTROLt SWITCHES THE SYSTEM TO FINE ALIGN* AND DISABLES THE TaRUPT CDu DRIVE. NO CALL TO IMuSTALL IS 

R0282 REQUIRED HERE. 


0283 

028A 

0285 

0286 


REF 12 LAST 199 


REF 


14*6241 

0 6245 

1 

IMUFINIS TC 

SETKANDC 

14*6242 

00000 

1 

DCT 

00000 

14*6243 

40010 

1 

DCT 

40010 

14*6244 

0 6160 

0 

TC 

UISEXIT 


0 MEANS computer IS NO LONGER IN CONTROL 

Fine align c-Relay code. 


5 LAST 199 


^b4!>78A VUL SYSTEM FQR aGCA; ReVISIuN U OF PROGRAM SqURUMSS BY NASA 102110B-021 


Dt G A f 1 966 


(Main) page 200 


L Mode switching and mark routines user *5 own page no, u 


P0267 



subroutine 

USEU BY 1 

'^ode 

-SWIT 

Cl 

^ING PROGRAviS TO 

SET desired K- 

AND C-RELAY settings. 

0289 





1 A ♦ 6 2 AS 

2 

0017 

0 

setkandc inhint 


IimHINT and EXIT WITH INTERRUPT INHIBITED 

0290 

REF 

125 

LAST 

194 

1 A * 62 A6 

2 

0001 

1 

INDEX 

Q 


0291 





1 A »62 A T 

3 

0000 

1 

caf 

0 


0292 

REF 

10 

LAST 

192 

1A»6250 

5 

0731 

1 

TS 

DeSKSET 

desired K-RELAY setting as read in IN 3 . 

0293 

ref 

1 



lAt6251 

3 

6260 

0 

CAF 

OFFMSK 

Set c-relays For zero encoder* coarse 

029 A 

REF 

53 

LAST 

192 

1A,62S2 

r 

0723 

0 

MASK 

DSP TAB *110 

align, fine align, lock cdu, Roll 

U29S 

REF 

126 

LAST 

200 

lA ,62S3 

2 

0001 

1 

INDEX 

Q 

re-entry, and ATTITUDE CONTROL LAMP. 

0296 





1A»625A 

6 

0001 

0 

AD 

1 


0297 

REF 

5A 

LAST 

200 

1A»62S5 

5 

0723 

1 

T5 

DSPTAB tllD 


0298 

REF 

127 

LAST 

200 

1 A 1 6 2 S 6 

2 

0001 

1 

index 

0 


0299 





lAf 62S 7 

0 

0002 

0 

TC 

2 

RETURN TO CALLER IN INHlNT. 


lAf6260 3A76U 1 OFFMSK OCT 


0300 


3A760 


A8A57flA YUL SYSTEM FOR ASc^: REVISION 0 Of PROGRAM SOLRUMSS BY NASA 1021108-021 


DEC 1966 


(MAIN) PAGE 201 


L MqOE switching AND MARK RoUriNES USER’S OWN PAGE NO. 12 

P030l WHeN a MoDe-SWITCHING task Is dispatched to indicate the end of a MoDe-SwItCH, eNOIMU (OR eNDoPt) is 
R0303 called to WAKe UP ANY JOB IMUSTALL (OPTSTALL) MIGHT HAVe PUT TO SLEE^ AND tHeN CHeCK WASKSeT (WASoPSeT ) TO See 
R03U5 that the MODE-SwlTCH WAS SUCCESSFUL. 


0306 

REF 

21 

LAST 

186 

14*6261 

0307 

REF 

14 

LAST 

1 75 

14,6262 

0308 

REF 

31 

LAST 

188 

14*6263 

0309 

REF 

70 

LAST 

199 

14*6264 

0310 

REF 

5 

LAST 

175 

14*6265 

0311 

REF 

128 

LAST 

200 

14,6266 

0312 

REF 

5 

LAST 

174 

14,6267 

0313 

REF 

6 

LAST 

201 

14,62 fO 

03 lA 

REF 

L 



14,6271 

0315 





14,6272 

0316 

REF 

1 



14,6273 

0317 

ref 

76 

LAST 

196 

14,62 fh 

031B 

REF 

7 

LAST 

201 

14,6275 

0319 

REF 

2 

LAST 

201 

14,6276 

0320 

REF 

2 

LAST 

123 

14,62/7 

0321 

ref 

8 

LAST 

201 

14*6300 

0322 

REF 

24 

LAST 

194 

14*6301 

0323 

REF 

6 

LAST 

201 

14*6302 

032A 





14,6303 

0325 

REF 

7 

LAST 

201 

14,6304 

0326 

REF 

9 

LAST 

201 

14,6305 

0327 

ref 

3 

LAST 

201 

14,6306 

0328 





14*630 r 

0329 





14*6310 

0330 

REF 

10 

LAST 

201 

14*6311 

0331 

REF 

4 

LAST 

201 

14*6312 

0332 

REF 

13 

LAST 

197 

14*6313 

0333 

REF 

II 

LAST 

201 

1 4 * 6 3 1 4 

033A 

REF 

5 

LAST 

201 

14*6315 

0335 

REF 

1 



14*6316 

0336 

REF 

77 

LAST 

201 

14,631 7 

0337 

REF 

1 



14,6320 

0336 

ref 

17 

LAST 

102 

14*6321 

0339 

REF 

25 

LAST 

146 

14*6322 

03 aC 

REF 

5 

LAST 

153 

14,6323 

03A1 

REF 

IS 

LAST 

201 

14*6324 

0342 

REF 

26 

LAST 

201 

14,6325 

0343 

REF 

2 

LAST 

201 

14*6326 


3 

5503 

1 

ENDOPT 

caf 

Two 

6 

4476 

a 


A3 

POSMAX 

5 

0034 

0 


T5 

OVCTR 

3 

5501 

0 

END! MU 

CAF 

ZERO 

5 

0640 

0 


TS 

RUPTREG2 

3 

0001 

D 


XCH 

Q 

5 

0637 

0 


TS 

RUPTREGl 

2 

0640 

i 


1 'JDEX 

RUPTREG2 

I 

0733 

1 


CCS 

MODECADR 

0 

6274 

0 


TC 

+ 2 

0 

6300 

1 


TC 

ENDMODE 

3 

4516 

1 


CAF 

ONE 

2 

0640 

1 


INDEX 

RUPrREG2 

3 

0/33 

0 


XCH 

MODECADR 

0 

2060 

0 


fC 

JOB wake 

2 

0640 

1 

ENDMODE 

INDEX 

HUPTREG2 

1 

0727 

1 


CCS 

WASKSET 

0 

0637 

0 


TC 

RUPTREGl 

0 

6305 

1 


TC 

+ 2 

0 

0637 

0 


TC 

RUPTREGl 

2 

0640 

1 

failend 

index 

RUPTREG2 

1 

0733 

1 


CCS 

MQDEC ADR 

0 

6311 

1 


TC 

+ 2 

4 

0000 

0 


COM 


2 

0640 

1 

LVENDMOD 

INDEX 

RUPTREG2 

5 

0/33 

0 


TS 

MODECADR 

0 

2256 

1 


TC 

taskover 

2 

0 6 40 

1 

GOODE ND 

INDEX 

RUPTREG2 

1 

0/33 

1 


CCS 

MODECADR 

0 

6321 

1 


TC 

BUMPJOB 

4 

4516 

0 


cs 

ONE 

0 

6311 

1 


TC 

LVENDMOD 

2 

0601 

1 

BUMPJOB 

INDEX 

LOCCTR 

3 

0120 

1 


XCH 

LOC 

6 

4335 

0 


AD 

MINUSl 

2 

0601 

1 


I NDEX 

LOCCTR 

3 

0120 

1 


XCH 

LOC 

0 

6311 

1 


TC 

LVENDMOD 


Skip with c(A) = i. 


0 FOR IMU, 1 FOR OPTICS. 


SEE IF IMUSTALL (OPTSTALL) PUT A J06 
TO SLEEP. 

*0 IF NOT, 

SET PROPER MODECADR TO 1 TO INDICATE 
A JOB WAS AWAKENED, 


CHECK proper ^WAS’* REGISTER TO SEE IF 
SWITCH WAS SUCCESSFUL. 

YES - RETURN FOR MORE CHECKING IF OK. 

Failed - still waiting to switch. 

Manual inhibit, 

CuMeS here TO SIGNAL ERROR RETURN FROM 
MODE STALL ROUTINES. 

JOB WAS WAKENED EARLIER - EXIT W/0 INCR. 
Nu WAKE-UP - SET MODECADR TO -0 FOR FAIL 


COMES here to SIGNAL A SUCCESSFUL SWITCH 

juB WAS Awakened - increment loc. 

NU wAKE ^ SET MODECADR TO -1 TO INDICATE 
SUCCESS. 

ARRIVES with C(A) = 0. LOCCTR SET TO 
awakened JOB REGISTERS, 

LuC IS NEGATIVE FoR BASIC JOBS, 


StT MODECADR TO +0 AND EXIT. 


48<t5.78A YUL SYSTEM FOR AGC<t: REVISION 0 OF PROGRAM SOURUM55 BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 202 


L 

P03AA 

R03A6 

WO-^^tH 

R03SO 

0352 

0353 

03SA 

03SS 

U3b6 

U3S7 

0358 

0359 

0360 

0361 

0362 

0363 
036A 

036 5 

0366 

0367 

0368 

0369 
03 ^0 

0371 

0372 

0373 
03 7 A 

0375 

0376 

0377 

0378 


f, 


MOOE SWITCHING AND MARK ROUTINES USER'S UWN PAGE NO. 13 

wh£n a Job which requested a mode switch '•ijst idle until the swncH IS Complete, it comes to imustall 
toR optstall) to wait for the completion and to Do error checking. Return is to the location immediately follow- 
ing the calling Sequence if the switch unsuccessful, and the next location if it was successfuu. any 
idling is done by putting the job to sleep, so that a vac area (IF USeO) would Be preserved. 


ref 

78 

LAST 

201 

14*632? 

3 

451t> 

1 

OPTSTALL 

CAF 

ONE 

0 FOR IMU AND 1 FOR OPTICS AS USUAL. 





14,6330 

0 

6332 

0 


TC 

♦ 2 


REF 

71 

LAST 

201 

14,6331 

3 

5501 

0 

IMUSTALL 

CAP 

ZtRO 






14,6332 

2 

001 ? 

0 


INHINT 


oi'^E sub-system at a time only. 

REF 

12 

LAST 

201 

14,6333 

5 

0640 

0 


T5 

RUPTRE&2 


REF 

175 

LAST 

197 

14,6334 

2 

0000 

0 


INDEX 

A 


REF 

6 

LAST 

201 

14,6335 

1 

0733 

1 


CCS 

MODECADR 

SEE IF MODE SWITCH IS COMPLETE. 

ref 

1 



14,6336 

0 

635 f 

0 


TC 

MODABORT 

Very ill if someone already waiting. 

REF 

1 



14,633 ? 

0 

6352 

0 


TC 

mqdeslp 

Mode switch incuMPLete - put job to Rest 

REF 

1 



14,6340 

0 

63 A4 

1 


TC 

modegood 

-1 indicates a successfully completed SW 

REF 

13 

LAST 

202 

14,6341 

2 

0640 

1 

MG2 

INDEX 

RUPTREG2 

-U MEANS finished BUT FAILED. 

ref 

7 

LAST 

202 

14,6342 

5 

0733 

0 


T5 

MODECADR 

RESET TO +0. 

REF 

3 

LAST 

196 

14,63<+3 

U 

6020 

0 


TC 

MQDtEXlT 

RtLlNT AND RETURN VIA SWCALL. 

ref 

176 

last 

202 

14,6344 

1 

0000 

D 

MqDeGOOD 

CCS 

A 

StE that MODeLAUR WAS INDEED -1. 

REF 

2 

LAST 

202 

14,6345 

0 

6357 

0 


TC 

MODABORT 

VERY III If someone already waiting. 

REF 

1 



14,6346 

3 

0071 

1 


XCH 

TbMQS 

increment return TO INDICATE SUCCESS. 

REF 

79 

LAST 

202 

14,6347 

6 

45 1 6 

1 


AD 

ONE 


REF 

2 

LAST 

202 

14,6350 

3 

0071 

1 


XCH 

TEMQ5 

BRING +0 BACK 

REF 

1 



14,6351 

0 

6341 

1 


TC 

MG 2 

TU RESET MODECADR AND EXIT, 

REF 

2 

Last 

123 

14,6352 

0 

5706 

0 

MODESLP 

TC 

makecaor 

Make cadr from swcall retun address. 

REF 

02 

LAST 

123 

14,6353 

3 

0062 

0 


XCH 

ADDRWD 


REF 

14 

last 

202 

14,6354 

2 

0640 

1 


INDEX 

RUPTRE62 


REF 

8 

LAST 

202 

14,6355 

5 

0733 

0 


T5 

MODECADR 


REF 

3 

LAST 

123 

14,6356 

0 

2127 

1 


TC 

JOBSLEEP 


ref 

7 

LAST 

114 

14*635 1 

0 

3044 

I 

MODABORT 

TC 

ABORT 

iMU OR optstall abort. 




14 , 6360 


01210 

0 


OCT 

01210 



14,6361 ENDSTALL EQUALS 










'r * 


ft 

. « 


i 


i 


t 


4a^t)78A YUL SYSTEM FOR AGC^t; REVISION 0 Of- PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A* 1966 


(MAIN) PAGE 20^ 


L Mode switching and mark Routines u5£R*s own page no. !-£» 

P0379 THe following ROUTINE INCREMENTS IN 2S COMPLEMENT THe RegI^TER WHoSf ADDReSS IS IN ADDHWD ^Y THe 

Ro3ui quantity Pound in teM2. this may be jSeD to incRe'^ent desiRed imu and oPfits cdu angles or any other 2 S 

K0383 COMPLEMENT (+0 UNEOUAL TD -O) QUANTITY. 


03BA 

ref 

53 

LAST 

96 

14t636l 

5 

0102 

1 

CDUINC 

TS 

TEM2 

lb COMPLLMENT INCREMENT ARRIVING IN A. 

0385 

ref 

67 

LAST 

149 

14,6362 

2 

0077 

0 


INDEX 

BUF 


0386 





14,6363 

1 

0000 

0 


CCS 

0 

THE 16TH BIT OF A WILL BE USED TO 

0387 

REF 

80 

LAST 

202 

14,6364 

6 

4516 

1 


AD 

ONE 

ACHIEVE THE REQUIRED 32,768 DISTINCT 

U3B8 





14,6365 

0 

6371 

1 


TC 

+ 4 

STATES. 

0389 

REF 

61 

LAST 

203 

14,6366 

6 

4516 

1 


AD 

ONE 


0390 

ref 

82 

LAST 

203 

14,6367 

6 

4516 

1 


AD 

ONE 

A MAY have overflow PRESENT HERE, 

0391 





14,63/0 

4 

0000 

0 


COM 


DESIRED -1 IF desired WAS NEGATIVE. 

0392 

REF 

54 

LAST 

203 

14,6371 

6 

0102 

1 

+ 4 

AD 

TEM2 

And maybe overflow some more. 

0393 

REF 

177 

LAST 

202 

14,6372 

1 

0000 

0 


CCS 

A 

BACK TO 2S complement. 

0394 

ref 

83 

LAST 

203 

14,63/3 

6 

4516 

1 


AD 

ONE 

NOTE that CCS TREATS A AS A 16 BIT NO. 

0395 





14,63 / A 

0 

6376 

0 


TC 

+ 2 


0396 





14,6375 

4 

0000 

0 


COM 



0397 

REF 

32 

LAST 

201 

14,6376 

5 

0034 

0 


IS 

OVCTR 

REVERTS -0 TO +o. 

0398 





14,63 / / 

0 

6403 

D 


TC 

+ 4 

NO OVERFLOW - PLANT NEW DESIRED, 

0399 

ref 

178 

LAST 

203 

14,6400 

2 

0000 

0 


INDEX 

A 

overflow - SIMULATE UN-CORReCTED SIGN. 

0400 

ref 

3 

LAST 

168 

14,6401 

3 

447 / 

I 


CAF 

LIMITS 

3/777 FOR negative - 40000 IF PLUS, 

0401 

ref 

33 

LAST 

203 

14,6402 

6 

0034 

0 


AD 

OVCTR 

OVERFLOW-CORRECTED DIFFERENCE. 

0402 

REF 

68 

LAST 

203 

14 ,6403 

2 

0077 

0 

+ 4 

INDEX 

BUF 


0403 





14 , 6404 

5 

0000 

1 


T5 

0 

NEW ANGLL. 

0404 

REF 

4 

LAST 

193 

14,6405 

0 

5702 

1 


TC 

SwRETURN 

RETURN TO CALLER. 


YUL SYSTEM FOR AGC^t; REVISION 0 OF PROGRAM 50LRUM55 BY 


L mode switching and mark 


P0405 



MARK 

REQUESTING 

0A06 





14 

0407 

REF 

8 

last 

201 

14 

0408 

ref 

2 

last 

IA9 

14 

0409 





14 

0410 

ref 

1 



14 

0411 

REF 

10 

LAST 

163 

14 

0412 





14 

0413 

REF 

9 

LAST 

169 

14 

0414 

ref 

4 

LAST 

150 

14 

0415 

REF 

1 



14 

0416 

REF 

3 

LAST 

148 

14 

0417 

REF 

2 

LAST 

204 

14 

0416 

REF 

3 

LAST 

148 

14 

0419 

REF 

3 

LAST 

204 

14 

0420 

REF 

3 

LAST 

148 

14 

0421 

REF 

4 

LAST 

204 

14 

0422 

REF 

3 

LAST 

148 

14 

0423 

REF 

5 

LAST 

204 

14 

0424 

REF 

8 

LAST 

202 

14 

0425 





14 

0426 

REF 

22 

LAST 

201 

14 

0427 

REF 

3 

LAST 

204 

14 

042B 

REF 

179 

LAST 

203 

14 

0429 

REF 

4 

LAST 

76 

14 

0430 

REF 

72 

LAST 

202 

14 

0431 

REF 

4 

LAST 

204 

14 

0432 





14 

0433 

REF 

11 

LAST 

197 

14 

04 34 





14 

0435 

REF 

9 

LAST 

204 

14 

0436 

REF 

10 

LAST 

162 

14 

0437 

REF 

5 

LAST 

204 

14 

0438 

REF 

6 

LAST 

204 

14 

0439 

REF 

1 



14 

0440 

REF 

4 

LAST 

168 

14 

0441 

REF 

1 



14 

0442 

REF 

4 

LAST 

202 

14 


Rdutines 


ROUTINES* 


6if06 

2 

001 ? 

0 

sxtmark 

I nhint 

6 40 7 

5 

0637 

0 


TS 

6410 

1 

073 5 

1 


CCS 

6411 

0 

6413 

1 


tc 

6412 

0 

64 1 6 

1 


tc 

6413 

0 

300 7 

0 


tc 

6414 

00105 

0 


OCT 

6415 

0 

2124 

1 


IC 

6416 

1 

0216 

0 

MARKOK 

r r- c 

6417 

0 

64 3 2 

1 


TC 

6420 

1 

0272 

1 


CCS 

6421 

0 

6432 

1 


TC 

5422 

1 

0346 

1 


CCS 

6423 

0 

6432 

1 


TC 

6424 

1 

0422 

1 


CCS 

6425 

0 

6432 

1 


TC 

6426 

1 

0476 

0 


CCS 

6427 

0 

6432 

1 


tc 

6430 

0 

3044 

1 


tc 

6431 

01207 

0 


DCT 

6432 

6 

5503 

1 

MKVACFND 

AO 

6433 

5 

0735 

0 


TS 

6434 

2 

0000 

0 


INDEX 

6435 

5 

0052 

0 


TS 

6436 

3 

5501 

0 


CAP 

6437 

2 

0735 

1 


INJEX 

64 40 

4 

7 /7 f 

0 


TS 

6441 

3 

4503 

0 


CAF 

6442 

2 

5/77 

1 


EXTEND 

6443 

4 

0637 

1 


MP 

6 444 

3 

0003 

1 


XCH 

6445 

6 

0735 

0 


AO 

6446 

5 

0735 

0 


TS 

644 f 

3 

2165 

1 

MARKEXIT 

CAF 

6450 

0 

2052 

1 


1C 

6451 


3067/ 

1 


CAOR 

6452 

0 

6020 

0 


TC 



n 












4 V 








t 
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■ * 


'J 




1021108-021 


DEC A, 1966 


(MA1N» page 20a 


USER'S OWN page NO, IS 


RUPTREGl 

markstat 

♦ 2 

MARKOK 

ALARM 

00105 

ENDOFJOB 

VAC 1 USE 

mkvacfnd 

VAC2USE 

mkvacfnd 

VAC3USE 

MKVACFND 

VACAUSe 

mkvacfnd 

VAC5U5E 

mkvacfnd 

abort 

01207 


TWO 

MARKSTAT 

A 

QPRET 

ZERO 

MARKSTAT 
0 -1 

BITi2 

RUPTREGl 

LP 

markstat 

MARKSTAT 


Number of marks requested. 

SEE IE mark button ALREADY SNATCHED, 
YES - ALARM AND END THE STRAY JOB, 

♦U INDICATES AVAILAbLE. 


FIND A VAC AREA TO STORE THE MARKS IN, 


VAC AREAS ALL OCCUPIED - ABORT. 

ADDRESS OF VAC. 

USED TO SHOW next AVAILABLE MARK SLOT. 
SHOW VACAREA IS OCCUPIED. 

Place desired number of marks in 12 - i4 

JUST CONTAINS LOW 9 BITS OF VAC ADDRESS. 


PR 1032 
NUVAC 
MKVB51 
MODEEXIT 













/ 


j 


-^8^ti>78A YUL SYSTEM FOR AGC^*! REVISION 0 OF PROGRAM 3 OLRUM 55 BY 


L MOOE SWITCHING AND MARK ROUTINES 


POAA3 MARK SYSTEM RELEASING ROUTINE* 


OAAA 

REF 

73 

LAST 

ZOn 

14,6A53 

3 

5501 

0 

mkreleas caf 

OAAS 

REF 

7 

LAST 

20A 

14*645*+ 

3 

0/35 

0 

XCH 

0AA6 

REF 

100 

LAST 

20A 

14*6455 

1 

0000 

0 

CCS 

0AA7 

REF 

181 

LAST 

205 

14*6456 

2 

0000 

0 

index 

0AA8 





14*6457 

5 

0000 

1 

T5 

0AA9 

REF 

5 

LAST 

203 

14 * 6460 

0 

5702 

1 

TC 


NASA 1021108-021 


OEC 1966 


(MAIN) PAGE 205 


USER»S OWN PAGE NO. 16 


ZERO 
MARK ST AT 
A 
A 
0 


5WRETURN 


SHOW MARK SYSTEM NOW AVAILABLE. 


A84578A YUL SYSTEM FOR AGc<t; REVlSUN 0 OF PROGRAM 50LRUM&5 BT 


L 

MoDe 

SWITCHING AND MARK ROUTINES 





POASO 



KEYRUPT 

LEAD-IN AND 

MARK/MAR< 

ACCEPT PROGRAMS 

OASl 

REF 

5 

LAST 

159 

14*6461 

5 

0030 

1 

keyrupta 

TS 

0AS2 

ref 

3 

LAST 

171 

14*6462 

4 

0053 

0 

MARK 

C5 

0AS3 

REF 

6 

last 

191 

1 4 * 6 6 3 

5 

057 7 

1 


T5 

UASA 

REF 

3 

LAST 

171 

14 *6^64 

4 

0052 

1 


CS 

UAS5 

REF 

9 

LAST 

20b 

1 4 * 6 

5 

0575 

0 


15 

0AS6 

REF 

4 

LAST 

195 

14*6^66 

4 

0050 

0 


CS 

U4S7 

REF 

10 

LAST 

206 

14 *6£f6 1 

5 

0674 

1 


TS 

UASB 

REF 

4 

LAST 

195 

14*6‘t70 

4 

0051 

1 


CS 

0AS9 

REF 

11 

LAST 

206 

14*64 ? 1 

5 

0576 

0 


IS 

0460 

REF 

5 

LAST 

195 

14*6472 

4 

0047 

0 


CS 

0461 

REF 

12 

LAST 

206 

14*6473 

5 

0600 

1 


TS 

0462 

REF 

2 

LAST 

138 

14*6^74 

0 

2677 

0 


TC 

04621 

ref 

6 

LAST 

182 

14*6475 

3 

4512 

0 


CAF 

04622 

REF 

22 

LAST 

170 

14*6476 

7 

0645 

1 


MASK 

04623 

REF 

182 

LAST 

205 

14,6477 

1 

0000 

0 


CCS 

04624 

REF 

2 

LAST 

154 

14,6500 

0 

226‘* 

0 


TC 

04625 

REF 

7 

LAST 

206 

14*6501 

4 

4512 

1 


CS 

04626 

REF 

23 

last 

206 

14,6502 

7 

0645 

1 


yiAs< 

0462 7 

REF 

8 

LAST 

206 

14,6503 

6 

4512 

0 


AO 

04628 

REF 

24 

LAST 

206 

14*6504 

5 

0645 

0 


TS 

0463 

REF 

7 

LAST 

176 

14,6505 

L 

0004 

1 


CCS 

0464 

REF 

84 

LAST 

203 

14,6506 

6 

4516 

1 


AO 

0465 

REF 

1 



14*6507 

0 

6674 

1 


TC 

0466 





14*6510 

0 

6511 

1 


TC 

0467 

REF 

8 

LAST 

176 

14,6511 

3 

0007 

0 


XCH 

0468 

REF 

9 

LAST 

206 

14,6512 

3 

0007 

0 


XCH 

0469 

REF 

12 

LAST 

204 

14*6513 

7 

4503 

1 


MASK 

0470 

REF 

183 

LAST 

206 

14*6514 

1 

GOOD 

0 


CCS 

0471 

REF 

1 



14,6515 

0 

6611 

1 


TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 206 



USER'S OWN page no. 17 

bankrupt 

OPTY 

RUPTSTOR +5 

PRECISION OPTICS DRIVE - GATHER DATA 
IMMEDIATELY AND THEN TRANSFER TU VAC. 

OFTX 

RUPTSTOR +3 

SHAFT OPTICS ENCODER. 

CDUY 

RUPTSTOR +2 

couz 

RUPTSTOR +4 

coux 

RUPTSTOR +6 

READ INNER-MIDDLE-OUTER IMUCDUS. 

readtime +1 

special dp time COUNTER-READING ROUTINE 

blT5 \ 

STATE \ , ^ 

A -1 

RESUME j ( ; 

Du NOT accept KEYCODE UNLESS PREVIOUS 
KEYCODE HAS DISAPPEARED FROM iNO (SEE 
T4RUPTA). IF SO, BlT5 OF STATE = 0. 

IF NOT* BIT5 = 1. 

BITS / 
STATE / 
blT5 J 

STATE 

ACCEPT CODE AND BLOCK KEYRUPTS UNTIL 
PRESENT KEYCODE hAS GONE AwAy* 

INO 

ONE 

See if KEYCODE UR MARK. 

KEYCALL 
+ 1 

ItNO SHOULD NEVER CONTAIN -0. 

IN3 

NUW FIND OUT IF IT WAS A MARK-REJECT. 

IN3 
blT 12 

A 

hKRE JECT 

OPT zero/mark reject BIT. 


^8^578A yuL System for agcaj revIsuk o of program solrumss by 


L MOOe switching and mark RjuriNES 


OA 12 

REF 

8 

LAST 

205 

1 A 1 6 5 1 6 

1 

0735 

1 

CCS 

OA73 

REF 

1 



lA»65i/ 

0 

6543 

0 

TC 

0A7A 

REF 

13 

LAST 

206 

1A,6520 

3 

0575 

0 

XCH 

0A75 

REF 

10 

LAST 

20a 

14*6521 

5 

0637 

0 

TS 

0A76 

REF 

lA 

LAST 

207 

lAt6522 

3 

0577 

1 

XCH 

OA77 

REF 

15 

LAST 

202 

1 A * 652 3 

5 

0640 

0 

TS 

OA7 8 

REF 

15 

LAST 

20 7 

1 A * 6i>2^ 

3 

05 73 

0 

XCH 

OA t9 

REF 

1 



14*6525 

5 

0641 

1 

TS 

0A80 

REF 

2 

LAST 

110 

14*6526 

3 

2143 

0 

CAP 

OAbl 

REF 

5 

LAST 

20a 

14*6527 

0 

2052 

1 

TC 

0A82 

REF 

1 



14*6530 

30651 

0 

CADR 

0Ae3 

REF 

11 

Last 

207 

14,6531 

3 

063/ 

0 

XCH 

OAbA 

REF 

19 

LAST 

201 

14,6532 

2 

0601 

1 

index 

0Ad5 

REF 

17A 

LAST 

1A8 

1 A * 653 3 

5 

0115 

1 

TS 

0A86 

REF 

16 

LAST 

207 

14*6534 

3 

0640 

0 

XCH 

0Ab7 

REF 

20 

LAST 

207 

14*6535 

2 

0601 

1 

INDEX 

0AB8 

REF 

175 

LAST 

207 

14*6536 

5 

0116 

1 

TS 

0A89 

REF 

2 

LAST 

207 

14*6537 

3 

0641 

1 

XCH 

0A90 

REF 

21 

LAST 

207 

14*6540 

2 

0601 

1 

INDEX 

0A91 

REF 

176 

LAST 

207 

14*6541 

5 

0117 

0 

TS 

0A92 

REF 

3 

LAST 

206 

14*6542 

0 

2264 

0 

TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) pAgE 207 



USER’S OWN page NO, 18 

MARKSTAT 

MARK2 

SEE IF MARKS BEING CALLED FOR* 

RUPTSTOR +3 
RUPTReGi 
RUPTSTOR +5 
RUPTREG2 
RUPTSTOR *l 
RUPTREG3 

STORE IN obtained MPAC COMPLEMEiULD, 
OPTICS ANGLES AND MINOR PART OF TIME, 
-UPTX. -OPTY* AND -riMEl. 

PH 1 05 

NOVAC 

MARKDISP 

Call special display job 

RUPTHEGl 

LOCCTR 

MPAC 

RUPTRE62 

LOCCTR 

MPAC +1 

RUPrRE63 

LOCCTR 

MPAC *Z 

RESUME 

plant information in MPAC OF REGISTER 

StT. 


4b4b7fiA YUL 5Y5TLM FOR AGCA: REVISION 0 Of PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A I 1966 


(MAIN) PAGE 


L Mode switching and mark routines user*s own page wo. 19 


0A93 

ref 

1 



14 » 6543 

6 

6676 

0 

MARK2 

AD 

74K 

See if any more marks called for. 

0 A9A 

REF 

184 

LAST 

206 

1 4 ♦ 6544 

1 

0000 

0 


CCS 

A 


0A95 

REF 

1 



14t6545 

0 

6552 

0 


TC 

Mark 3 


0496 





14^6546 


76 777 

1 

BlTlObAR 

DCT 

-1000 


0497 

REF 

11 

LAST 

204 

14<6547 

0 

300 7 

0 

BADMARK 

TC 

alarm 


0496 





14*6550 

00106 

0 


DCT 

00106 


0499 

ref 

4 

LAST 

207 

14*6551 

0 

2264 

0 


TC 

Resume 

No further ACTION HERE. 

0500 

REF 

85 

LAST 

206 

1A*6552 

6 

4516 

1 

MARK3 

AD 

ONE 

SlT bit 10 = 1 to enable mark 

0501 

REF 

1 



14*6553 

7 

6546 

1 


MASK 

BlTiOBAR 

REJECT. 

0502 

REF 

1 1 

LAST 

196 

14,6554 

6 

4505 

0 


AD 

BITIQ 


0503 

ref 

9 

LAST 

20 1 

14,6555 

5 

0735 

0 


TS 

MARKSTAT 


0504 

REF 

4 

LAST 

109 

14*6556 

7 

460 7 

0 


MASK 

L0W9 

SET UP REGISTER TRANSFER LOUP. 

0505 

REF 

17 

LAST 

207 

14,6557 

5 

0640 

0 


TS 

RUPTREG2 

AuVANCE POINTER IN QPRET, 

0506 

REF 

185 

LAST 

208 

14*6560 

2 

0000 

0 


INDEX 

A 


0507 

ref 

5 

LAST 

204 

14,6561 

3 

0052 

0 


XCH 

QPRET 

PICK UP MARK SLOT-POINTER. 

0508 

REF 

5 

LAST 

181 

14*6562 

6 

A 475 

0 


AD 

SIX 


0509 

REF 

12 

LAST 

207 

IA,6563 

5 

063 7 

0 


T5 

RUPTREGl 


0510 

REF 

86 

LAST 

208 

14 * 6 564 

6 

4516 

1 


AD 

ONE 


0511 

REF 

13 

LAST 

208 

14,6565 

2 

0640 

1 


I NDEX 

RUPTREG2 


0512 

REF 

6 

LAST 

20B 

14,6566 

5 

0052 

0 


TS 

OPRET 


0513 

REF 

6 

LAST 

208 

14,6567 

3 

4475 

0 


CAF 

SIX 

LOOP SEVEN times. 

0514 

REF 

19 

LAST 

208 

14,6570 

5 

0640 

0 

READLOOP 

TS 

KUPTREG2 


0515 

REF 

186 

LAST 

208 

14,6571 

2 

0000 

0 


INDEX 

A 


0516 

REF 

16 

LAST 

207 

14,6572 

4 

0572 

0 


CS 

RUPTSTOR 


0517 

REF 

13 

LAST 

208 

14,6573 

2 

0637 

1 


INDEX 

RUPTREGl 


0518 





14,6574 

5 

0000 

1 


TS 

0 


0519 

REF 

14 

LAST 

208 

14,6675 

1 

0637 

1 


CCS 

RUPTREGl 

ADDRESS NEXT LOCATION IN VAC. 

0520 

REF 

15 

LAST 

208 

14,6576 

5 

0637 

0 


TS 

RUPTREGl 


0521 

REF 

20 

LAST 

208 

lA ,65 77 

1 

0640 

1 


CCS 

RUPTREG2 


0522 

REF 

1 



14,6600 

0 

6570 

0 


TC 

READLOOP 


0523 

REF 

2 

LAST 

173 

14,6601 

3 

2261 

0 


CAF 

H I 5 

IF ALL REQUESTED MARKS MADE, CHANGE 

0524 

REF 

10 

LAST 

208 

14, 6602 

7 

0735 

1 


MASK 

MARKSTAT 

DSKY TO VERB 50 FLASHING, 

0525 

REF 

187 

LAST 

208 

14,6603 

1 

0000 

0 


CCS 

A 


0526 

REF 

5 

LAST 

208 

14, 660 h 

0 

2264 

0 


TC 

RESUME 


0527 

REF 

2 

LAST 

204 

14,6605 

3 

2165 

1 


CAF 

PRIQ32 


0528 

REF 

6 

LAST 

207 

14, 6606 

0 

2052 

1 


TC 

NOVAC 


0529 

REF 

1 



14,6607 


30750 

0 


cadr 

MKVB50 


0530 

REF 

6 

LAST 

208 

14,6610 

0 

2264 

0 


TC 

RESUME 

DUNE. 


• ' 


-i 



.ri; 





-V. 


1 i I i 


M 

r 



.1 


4 


• I 


<ttt/«578A YUL bYSTtM FOR A&Ca: REVISION 0 OF PROGRAM SOLRUM55 BY 


L MoDl switching AND MARK ROUTINES 


0531 

REF 

11 

LAST 

208 

14t661l 

1 

0735 

1 

mkreject 

CCS 

0532 

REF 

1 



14,6612 

0 

66 1 6 

0 


TC 

0533 

REF 

12 

LAST 

208 

14,6613 

0 

300 ( 

0 


TC 

U53A 





14,6614 

00107 

1 


OCT 

0535 

REF 

14 

LAST 

201 

14,6615 

0 

2256 

1 


TC 

0536 

REF 

12 

LAST 

208 

14*6616 

4 

4505 

1 

REJECT2 

C5 

0537 

REF 

12 

LAST 

209 

14,651/ 

7 

0/35 

1 


^1AS< 

0538 

REF 

13 

LAST 

209 

14 , 6 620 

3 

07 3 5 

0 


XCH 

0539 

REF 

13 

LAST 

209 

14,6621 

/ 

4505 

1 


^AS< 

OSAO 

REF 

188 

LAST 

208 

1 4 , 6 622 

1 

0000 

0 


CCS 

05a1 

REF 

1 



14*6623 

0 

6627 

1 


TC 

05A2 

ref 

13 

LAST 

209 

14 1 662*t 

0 

300 f 

0 


TC 

05A3 





14,6625 

OOi 10 

1 


OCT 

05AA 

REF 

15 

LAST 

209 

14 , 6626 

0 

2256 

1 


TC 

05A5 

ref 

5 

LAST 

20b 

14,662/ 

3 

4607 

1 

REJECTS 

CAF 

05 A6 

REF 

14 

LAST 

209 

14,6630 

7 

0735 

1 


V1AS< 

05A7 

REF 

22 

LAST 

192 

14,6631 

5 

0577 

1 


15 

05A8 

REF 

5 

LAST 

176 

14 ,6632 

4 

5362 

1 


CS 

05A9 

REF 

23 

LAST 

209 

14,6533 

2 

0577 

0 


INDEX 

0550 

REF 

7 

LAST 

208 

14 , 663‘t 

6 

0052 

0 


AO 

0551 

REF 

24 

LAST 

209 

14,5635 

2 

0677 

0 


INDEX 

0552 

REF 

8 

LAST 

209 

14,6636 

5 

0052 

0 


T5 

0553 

ref 

13 

LAST 

206 

14»663 / 

3 

4503 

0 


CAP 

0554 

REF 

15 

LAST 

209 

14,6640 

6 

0735 

0 


AO 

0555 

REF 

16 

Last 

209 

14,6641 

3 

0735 

0 


XCH 

0556 

REF 

3 

LAST 

208 

14,6642 

7 

2261 

1 


^A5< 

0557 

REF 

189 

LAST 

209 

14 , 6643 

1 

0000 

0 


c. 

0558 

REF 

16 

LAS! 

209 

14 , 6644 

0 

2256 

1 


TC 

0559 

REF 

3 

LAST 

20a 

1 4 ,6645 

3 

2165 

1 


CAP 

05b0 

REF 

7 

LAST 

208 

14 , 6646 

0 

2052 

1 


rc 

0561 

REF 

1 



14,6647 


30755 

0 


CAOR 

0562 

REF 

17 

LAST 

209 

14,6650 

0 

2256 

1 


TC 


NASA 1021108-021 


Dec At 1966 


(Main) page 209 



u5eR*S own page no. 20 

MARKSTAT 

REJECT2 

5tE IF MARKS BEING ACCEPTED. 

alarm 

Curse if not. 

00107 

TASKOVER 

(UNTIL MK ACCEPT BUTTON AVAILABLE). 

BITIO 

MARkSTAT 

MARXSTAT 

BITIO 

A 

REJECT3 

StE 11“ mark had been made since LAST 
mark REJECT, and SET BIT 10 TU ZERO TO 
Show mark REJECT. 

ALARM 

DUNT accept two MARK REJECTS TOGETHER. 

00110 

TASKOVER 

(UNTIL MK reject BUTTON AVAILABLE). 

L0W9 

MARKSTAT 

ITEMPI 

SEVEN 

ITEMPI 

OPRET 

DECREMENT POINTER TO REJECT MARK, 

ITEMPI 

QPRET 

New PO INTER. 

B1T12 

MARKSTAT 

MARKSTAT 

H15 

Increment marks-to-be-accepted field 
And if field Is now NON-ZERO, CHANGE 
DSKY TO verb 51 FLASHING TO INDICATE 
MURE marks required. 

A 

TASKOVER 

PRI032 

NOVAC 

REMKVB51 

TASKOVER 

(UNTIL button avail.) 
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L Moot SWITCHING AND MARK ROUTINES USER’S OwN PAGE NO. 21 


0S63 

REF 

1 



1 A » 6 65 1 

0 

3302 

0 

markdisp 

TC 

GRABDSP 

SPECIAL JOB TO DISPLAY UNCALLtO-FOR MARK 

056 A 

REF 

1 



1 A * 6 6 5 2 

0 

3310 

0 


TC 

PREGBSY 


0565 

ref 

177 

last 

207 

1 A » 6653 

A 

0115 

0 

REMKD5P 

C5 

MPAC 

THE MPAC Registers contin -optxi -opty. 

0566 

REF 

3 

LAST 

17 

1A,665a 

5 

06l6 

0 


T5 

DSPTEHl 


0567 

REF 

178 

LAST 

210 

lA *6655 

A 

0116 

0 


CS 

MPAC +1 


0568 

REF 

A 

LAST 

210 

1 A ^ 6656 

5 

0617 

1 


T5 

DSPTEMl +1 


0569 

REF 

179 

LAST 

210 

lAt6657 

A 

0117 

1 


CS 

MPAC +2 


05 70 

REF 

2 

LAST 

27 

1 A « 6660 

5 

0b21 

1 


TS 

D5PTEM2 


0571 

REF 

7A 

LAST 

205 

1 A « 6561 

3 

5501 

0 


CAP 

ZERO 


0572 

REF 

5 

LAST 

210 

1 A t 6662 

5 

0620 

0 


TS 

DSPTEMl +2 


05 73 

ref 

1 



1 A ^ 6663 

3 

6672 

1 


CAF 

MKDSPCOD 

NuUN-VERB FOR MARK DISPLAY. 

057A 

REF 

1 



1 A . 6 66 A 

0 

3100 

0 


TC 

NVSJB 


0575 

REF 

1 



1A*6665 

0 

66 70 

0 


TC 

MKDSPBSY 

IF BUSY. 

05 76 

REF 

1 



1 A ♦ 6666 

0 

3362 

0 

ENDMKD5P 

TC 

freedsp 


05 77 

REF 

10 

LAST 

20a 

1A*666 7 

0 

212A 

1 


TC 

ENDOFJOB 


05 78 

ref 

1 



lA » 66 70 

3 

6673 

0 

MKDSPBSY 

CAF 

LREMKDSP 

take data out of MPAC WHEN kE-AwAKeNED. 

05 79 

REF 

1 



1A.6671 

0 

3320 

0 


TC 

NVSUBUSY 


0580 





lA, 66 72 


00b56 

1 

MKDSPCOD 

OCT 

00656 


0581 

REF 

1 



IA,6673 


30653 

1 

LREMKDSP 

CAOR 

REMKDSP 


0582 

ref 

2 

LAST 

lAA 

lA *667A 

0 

5720 

I 

keycall 

TC 

POST JUMP 

Gu TO KeYBOARD/DISPLAY BANK WItH A 

0583 

REF 

1 



1 A f 6675 


lOoOl 

I 


CAOR 

KEYRUpTC 

GU THRU standard LOc, 

05BA 





1A,6676 


7A000 

1 

7AK 

OCT 

7AOOO 


0585 

REF 

1 





lA»6A0b 

SCTMARK 

E3JALS 

SXTMARK 




L 

P05b6 

K05b7 

0589 

0590 

0591 

0592 

0593 

059‘f 

0595 

0596 

0597 

0598 

0599 

0600 

0601 

0602 

0603 

060 A 

0605 

0606 

0607 

0600 

0609 

0610 

0611 

0612 

0613 

0614 

0615 

0616 

0617 

0618 

0619 


YUL SYSTEM FOR AGC4; REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4, 1966 (MAIN) PAGE 211 


Mode switching and mark rdutines 

keyboard and display Routines for mark procedures. 


USER’S Own page no# 22 




flash Verb 

51 when Waiting for 

Marks, 

changing 

TO Verb 

REF 

I 



14*6677 

3 

6 753 

0 

MKVB51 

CAF 

VB51 

REF 

2 

LAST 

210 

14,6700 

0 

3100 

0 


TC 

NVSUB 

REF 

1 



14,6701 

0 

3315 

0 


TC 

PRENVBSY 

REF 

2 

LAST 

144 

14,6702 

0 

5654 

0 


TC 

BANKCALL 

REF 

1 



14,6703 

14000 

1 


CADR 

F LASHON 

REF 

1 



14,6704 

0 

3136 

0 


TC 

ENDiOLE 

REF 

1 



14,6705 

0 

6736 

0 


TC 

MKVB5X 

REF 

2 

LAST 

211 

14,6 706 

0 

6 736 

0 


TC 

MKVB5X 

REF 

1 



14,6707 

3 

674 7 

0 


CAF 

OCT 76 

REF 

2 

LAST 

148 

14,6710 

7 

0602 

1 


MASK 

VERBREG 

REF 

1 



1^*6711 

6 

6714 

0 


AD 

-OCT50 

REF 

190 

LAST 

209 

14,6712 

1 

0000 

0 


CCS 

A 

ref 

3 

Last 

211 

14,6713 

0 

6736 

0 


IC 

MKVB5X 





14,6714 

7772 7 

0 

-0CT50 

OCT 

-50 

REF 

4 

LAST 

211 

14,6715 

0 

6736 

0 


TC 

MKVB5X 

REF 

6 

LAST 

209 

14,6716 

3 

4607 

1 


CAF 

L0W9 

REF 

17 

last 

209 

14,6717 

7 

0735 

1 


MA5< 

markstai 

REF 

18 

LAST 

211 

14,6720 

5 

0735 

0 


T5 

MARKSTAT 





14*6721 

4 

0000 

0 


CDM 


REF 

19 

LAST 

211 

14,6722 

2 

0735 

1 


INDEX 

MARKSTAT 

REF 

9 

LAST 

209 

14,6723 

6 

0052 

□ 


AD 

OPRET 





14,6724 

2 

5 77 7 

1 


EXTEND 


REF 

14 

LAST 

209 

14,6725 

4 

4503 

1 


MP 

B1T12 

REF 

87 

LAST 

208 

14,6726 

6 

4516 

1 


AD 

ONE 

REF 

20 

LAST 

211 

14,6727 

2 

0735 

1 


INDEX 

MARKSTAT 

REF 

10 

LAST 

211 

14,6730 

5 

0052 

0 


T5 

QPRET 





14,6731 

2 

001 7 

0 


INHINT 


REF 

88 

LAST 

211 

14,6732 

3 

4516 

1 


CAF 

ONE 

REF 

22 

LAST 

199 

14,6733 

0 

2173 

0 


TC 

WAITLIST 

REF 

1 



14,6734 


30744 

0 


cadr 

ENDMARKS 

REF 

1 1 

LAST 

210 

14,6 735 

0 

2124 

1 


TC 

ENDOF JOB 


ASSUME USING PROGRAM HAS GRABbED DSP# 


DuNT Respond to proceed or terminate. 


On enter* SEE IF DATA LOADED INSTEAD, 
VERBS 50 AND 51 CAUSE END MARK ROUTINES. 

ON DATA LOAD# RE-DISPLAY ORIGINAL VERB. 


Vac ADR IN MARKSTAT AND NO. MARKS MADE 
WILL BE left in QPRET. 


GU service OPTSTALL interface WITH 
USING program. 
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L 

MODE 

SWITCHING AND 

MARK R DU FINES 





USER’S OWN page no. 

23 

0620 

REF 

4 

LAST 

209 

14*6736 

3 2261 

0 

MKVB5X 

CAF 

HI5 

RL-DISPLAY vE«B 51 IF 

MORE marks 

0621 

REF 

21 

LAST 

211 

14.673? 

7 0735 

1 


MASK 

markstat 

wanted and verb 50 IF 

ALL IN, 

0622 

REF 

191 

LAST 

211 

14 * 6740 

1 0000 

0 


^ r 

V 3 

A 



0623 

REF 

3 

LAST 

17b 

14.6741 

3 4510 

1 


CAF 

BIT? 

(MAKES verb 51). 


0624 

REF 

1 



14*6742 

6 6746 

1 


AD 

VB50 



0625 

REF 

2 

LAST 

204 

14*6743 

0 6700 

0 


TC 

MKVEiSl +1 



0626 

REF 

1 



14*674^ 

0 6261 

1 

ENDMARKS 

TC 

lndopt 



0627 

REF 


LAST 

199 

14*6745 

0 6314 

1 


TC 

600DLND 



0628 





14*6746 

05000 

1 

VB50 

DCT 

5000 



0629 





14*6747 

00076 

0 

OCT 76 

OCT 

76 



R06 iO 



ON 

receipt 

OF Last i 

requested I 

mark, display verb 50 (STILL 

FLASHING) . 


0632 

REF 

2 

LAST 

212 

14*6750 

3 6 7 46 

1 

MKV650 

CAF 

Vb50 



0633 

REF 

1 



14*6751 

5 Olio 

1 


T5 

NV'TLMP 

Special entry to nvsub which avoids busy 

0634 

REF 

3 

LAST 

211 

14,6752 

0 3105 

0 


TC 

NVSJB +5 

test. 


0635 





14,6753 

05100 

0 

VB51 

OCT 

5100 



0636 

REF 

12 

LAST 

211 

14,6754 

0 2124 

1 


TC 

ENDOFJOB 



R0637 



IF 

THE Above is rejected* revert to verb si. 




0638 

REF 

2 

LAST 

211 

14*6755 

3 6753 

0 

REMKVB51 

CAP 

Vb5l 



0639 

REF 

2 

LAST 

208 

14*6756 

0 6751 

1 


TC 

MKVB50 +1 




S > • 


4 
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(MAIN) page 2li 


L mode switching and mark Routines user*s own page no. 2a 


P0640 



the 

FOLLOWING RDJtINe ALl OinS 

INTE^^LOCKIN 

G jF IMU Compensation 

AND Certain imu mode changes which 

ARe 

R0S42 

Meaningful after 

the 

IMU WAS 

Been ali 

GNED. these 

I ncljue 

IMJFINNW, IMUATTL, AND IMUReENT* 


06 A 4 






lAt6757 

2 0017 

0 

TSTIMACT 

IMHINT 


TEST IMU activity BIT TO SEE IF GYROS 

06AS 

REF 

129 

last 

201 


1A»6760 

3 0001 

0 


XCH 

0 



06A6 

REF 

IBO 

last 

210 


1A,6761 

5 0117 

0 


TS 

MPAC *2 



06A7 

REF 

5 

last 

110 


1A»6762 

A A50A 

0 


CS 

BITll 

BEING TORQUED NOW. 


06A8 

REF 

A 

last 

170 


lAt6?63 

7 06 A6 

1 


MASK 

FLAGWRDl 



06A9 

REF 

6 

last 

213 


lA ,&76A 

6 A50A 

1 


AD 

BITll 



06S0 

REF 

5 

last 

213 


lA *6765 

3 0646 

0 


XCH 

FLAGWRDl 



06SI 

REF 

7 

last 

213 


1 A t 6 766 

7 ^50A 

0 


MASK 

BITll 



06S2 

REF 

192 

LAST 

212 


14*6767 

1 0000 

0 


CCS 

A 



06S3 






1A,6770 

0 6772 

0 


TC 

+ 2 

I HU BUSY* 


065A 

REF 

181 

LAST 

213 


lA *6771 

0 0117 

0 


TC 

MPAC +2 

Channel available - proceed as usual. 

U6S5 

REF 

1 




1A*6772 

3 0072 

1 


XCH 

banktem 

Put the job to SLEEP FOR MAX TIME 

it 

06S6 

REF 

182 

LAST 

213 


14,6773 

5 0115 

1 


T5 

MPAC 

SHOULD take to compensate. 


0657 

REF 

3 

LAST 

202 


14*677A 

3 0071 

I 


XCH 

TEM05 



0658 

REF 

183 

LAST 

213 


14,6775 

5 0ll6 

1 


TS 

MPAC *■! 



0659 

REF 

7 

LAST 

199 


14*6776 

3 6103 

0 


CAF 

320MS 



0660 

REF 

23 

LAST 

211 


14*6777 

0 2173 

0 


TC 

WAITLIST 



0661 

REF 

1 




14*7000 

31003 

0 


cadr 

IMACT2 



0662 

REF 

1 




14*7001 

3 7010 

1 


CAF 

LIMUAcTw 



0663 

REF 

A 

LAST 

202 


lA * 7002 

0 2127 

1 


TC 

JOBSLEEP 



R066A 



WAKE UP 

THE 

JOB AND 

SET THE 

activity FL/J 

3 • 




0665 

REF 

2 

LAST 

2l3 


1A*7003 

3 7010 

1 

IMACT2 

CAF 

LIMUACTW 



0666 

REF 

3 

LAST 

201 


1A*70UA 

0 2060 

0 


TC 

JOBWAKE 



0667 

REF 

1 




1A*7005 

0 3A16 

1 


TC 

FLAGIUP 



0668 






IA*7006 

02000 

0 


OCT 

02000 



0669 

REF 

18 

LAST 

209 


lA* 7007 

0 2256 

1 


TC 

TASKOVER 



06/0 

REF 

1 




1A*7010 

31011 

0 

LIMUACTW 

CAOR 

IMUACTW 



0671 






IA*7011 

2 0017 

0 

imuactw 

INHINT 




0672 

REF 

18A 

LAST 

213 


1A*7012 

3 0115 

1 


XCH 

MPAC 

pkoceeo with mode Switch, 


0673 

REF 

2 

LAST 

213 


1A*7013 

5 0072 

1 


T5 

BANKTEM 



067A 

REF 

185 

LAST 

213 


IA*701A 

3 0116 

1 


XCH 

MPAC +l 



0675 

REF 

A 

LAST 

213 


lA* 7015 

5 0071 

1 


I 5 

T EMUS 



0676 

REF 

186 

LAST 

213 


1A*7016 

0 on/ 

0 


TC 

MPAC +2 




4b^57aA YUL bYbTt^ ^ DR AGC't; R£VlbljN 0 of- P-^jGHAM SoLRUMbb Qi NASA 1021108-021 


Df C A f 1 9 £)b 


(Main) page 21a 


L IMU compensation PACKAGE USER’S OVjN PAGE NO, 1 

Roool tHe follwoing rdjtine is Designed to compensate foR pipa bias and scale factor E^f^oR. at the same time, 

Roou3 It accumulates gyrd torqje commands Necessary to cd'^Pensate for the associated bias and acCeleRatIon-caused gyro 
R oous drifts, this routine expeCts to find pipa Readings in the major parts of delv (Delvx, deLvy, delvz), with the 

R0007 MINOR parts IRReLeVANU OJtPUt FRqM 1/PIPa IS D0U3Le PRECISION COMPENSATED DATA, jHe MINqR PaRt OP WHICH USUALLY 
R00U9 contains ALL THE COMPENSATION. 1/PlPA MUST BE CALLED AT LEAST EVERY 2.56 SECONoSt DUE TO SCALING CONSIDERATIONS. 
ROOil SPECIFICALLY* THE CORRECTION IS; 

RU012 PIPA = plpA (I *■ SCALE FACTOR ERROR) - BIAS DELTAT 

KU013 C I 

RooiA where pipa is the compensated data Obtained from the sampled pipa , 

R0015 C I 


0016 






14.701 

7 


BANK 

14 


0017 

REF 

6 

last 

75 

14,701 r 

3 

5502 

0 

1/PlpA 

caf 

FOUR 

LOOP TO PROCESS INPuT PIPA qATA, 

0018 

REF 

69 

LAST 

203 

14.7020 

5 

OlOl 

1 

+ 1 

T5 

BUF +2 


0019 

REF 

193 

LAST 

213 

14.7021 

2 

0000 

0 


INDEX 

A 


0020 

REF 

4 

LAST 

158 

14.7022 

4 

1001 

0 


CS 

DELVX 

Sampled pipa into mpac 

0021 

REF 

187 

LAST 

213 

14.7023 

5 

Oils 

1 


T5 

MPAC 


0022 

REF 

70 

LAST 

214 

14.7024 

2 

0101 

0 


INDEX 

BUF +2 

subtract bias TERM (LESS THAN i BIT). 

0023 

REF 

1 



14.7025 

4 

0736 

1 


CS 

PIPABIAS 


002A 





14,7026 

2 

5777 

1 


EXTEND 



0025 

REF 

2 

LAST 

21 

14*7027 

4 

0755 

1 


MP 

l/PIPADT 

SUPPLIED BY USER SCALED AT CS 2t-8). 

0026 

REF 

168 

LAST 

214 

14.7030 

5 

0116 

1 


T5 

MPAC *1 


0027 

REF 

189 

LAST 

214 

14.7031 

4 

0115 

0 


CS 

MpAC 

SHIFT THE pIpA READING LEFT THREE PLACES 

0028 

REF 

190 

LAST 

214 

14*7032 

5 

0115 

1 


IS 

MPAC 


0029 





14*7033 

2 

5777 

1 


extend 


IN PREPARATION FOR SCALE FACTOR 

0030 

REF 

15 

LAST 

197 

14*7034 

4 

4513 

0 


MP 

B1T4 

CURRECTION. IF IT OVERFLOWS, SHIFT THE 

0031 

REF 

194 

LAST 

214 

14.7035 

1 

0000 

0 


CCS 

A 

SCALE factor ERROR RIGHT 11 PLACES 

0032 

REF 

1 



14.7 036 

0 

7216 

0 


rc 

PIPOVF 

TAKING A LOSS IN PRECISION. 

0033 





14.7037 

0 

7041 

0 


TC 

+ 2 

THE ABOVE HAPPENS A[ DELTA V5 OF OVER 

003A 

REF 

2 

LAST 

214 

1 4 * 7040 

0 

7216 

0 


TC 

PlPOVF 

12 G-5ECS., resulting IN A SCALE FACTOR 

0035 

REF 

71 

LAST 

214 

14.7041 

2 

0101 

0 


index 

BUF -*2 

CURRECTION GOOD ONLY TO 60 PPM, 

0036 

REF 

1 



14,7042 

4 

0/3 / 

0 


C5 

PIPASCF 


00365 





14 .7043 


OuOU 

0 


COM 



0037 





14 . 7044 

2 

577/ 

1 


EXTEND 



0038 

REF 

1 1 

LAST 

204 

14.7045 

4 

0003 

0 


MP 

LP 


0039 

ref 

191 

LAST 

214 

14 . 7046 

6 

0116 

1 


AO 

MPAC +1 

ADD TO BIAS CORRECTION. 

OOAO 

REF 

72 

LAST 

2l4 

14.704/ 

2 

0101 

0 


index 

BUF +2 


OOAl 

REF 

5 

LAST 

214 

14,7050 

5 

1002 

1 


TS 

DELVX +1 

And maybe skip. 

0042 

REF 

75 

LAST 

210 

14,7051 

3 

5501 

0 


caf 

ZERO 


0043 

REF 

192 

LAST 

214 

14,7052 

6 

0115 

1 


AD 

MPAC 


0044 

REF 

73 

LAST 

214 

14,7053 

2 

0101 

0 


INDEX 

BUF +2 


0045 

REF 

6 

LAST 

21A 

14,7054 

5 

1001 

1 


TS 

DELVX 



^8Ab7BA YUl. SYSTEM FOR AGC<H REVISION 0 OF PROGRAM SOLRUM^S BY 


L IMU compensation PACKAGE 


0046 

REP 

74 

LAST 

214 

14»70t>5 

1 

0101 

0 

PIPJUMP 

CCS 

0047 

REF 

5 

LAST 

89 

14,7056 

6 

4335 

0 


AD 

0048 

REF 

1 



14,705 1 

0 

7020 

1 


1 C 

0049 

REF 

7 

LAST 

149 

14,7060 


00756 

0 

LGCOMP 

ADRE5 


NASA 1021100-021 


DEC 4, 1966 (MAIN) PAGE 21S 


USER’S OWN PAGE NO. 2 

BUF +2 LOOP TO PROCESS NEXT COMPONENT. 

NbGl 

1/PlPA *1 
GCOMP 


^b^^78A YUL system fOH AGcA: RtVlSlJN 0 Oh PROGRAM SOLRUMS5 3 y NASA 1021108-021 


DEc A t l966 


(MAIN) PAGE 216 


L I MU COMPENSATION PACKAGE USER'S OWN PAGE NO. 3 


POOSO THE FOLLOWING ROUTINE COMPUTES THE GYRO 1 OROJES NECESSARY TO COMPENSATE FqR THe ACCELERAT IqN-SENSI T 1 VE 


R00S2 

DRIFTS due to 

THE 

DATA JJST processed 

, AND SUMS 

THEM 

INTO THE GCOMP 

REO I ST eRS, 

00 S A 

REF 

1 



14*7 06 1 

5 

0101 

1 

1 s 

UC0MP5W 

SET GYRO TORQUE INDICATOR TO ZERO. 

00S5 

REF 

75 

LAST 

215 

14*7062 

5 

007 7 

1 

T5 

bUF 

RELATIVE ADDRESS OF PRESENT COMPONENT 

0US6 

ref 

7 

LAST 

214 

lA, 7063 

4 

1001 

0 

C5 

delvx 

PROCESS X COMPONENT, 

0057 

REF 

193 

LAST 

214 

14,706A 

5 

0115 

1 

1 S 

MPAC 


0058 

REF 

8 

LAST 

216 

14,7065 

4 

1002 

0 

CS 

DELVX *1 


0059 

REF 

19A 

LAST 

216 

14*7066 

5 

0118 

1 

TS 

MPAC +1 


0060 

REF 

1 



14*7067 

4 

0747 

1 

CS 

ADI AX 


OOol 

REF 

1 



14»7070 

0 

7145 

0 

FC 

GCUMPSUB -1 


0062 

REF 

1 



14*7071 

4 

1003 

1 

CS 

delvy 


0063 

REF 

195 

LAS! 

216 

14*7072 

5 

0115 

1 

TS 

MPAC 


006A 

REF 

2 

LAST 

216 

14*7073 

4 

1004 

0 

CS 

delvy +1 


0065 

REF 

196 

LAST 

216 

14*7074 

5 

0116 

1 

TS 

MPAC +1 


0066 

REF 

1 



14,7075 

A 

0752 

0 

C5 

adsrax 


0067 

REF 

2 

LAST 

216 

14,7076 

0 

7146 

0 

TC 

GCOMPSUe 


0068 

REF 

1 



lA, 7077 

4 

074A 

1 

CS 

G61ASX 

AuD IN BIAS DRIFTS. 

0069 

REF 

1 



1A,7100 

0 

7171 

1 

TC 

DRIFTSUB 


0070 

ref 

3 

LAST 

216 

14t710i 

4 

1003 

I 

CS 

Delvy 

COMPUTE Y GYRO COMPENSATION. 

0071 

REF 

197 

LAST 

216 

14 t 7 102 

5 

0115 

1 

TS 

MPAC 


0072 

REF 

4 

LAST 

216 

14 t 7103 

4 

1004 

0 

CS 

DELVY +1 


0073 

REF 

198 

LAST 

216 

14*7104 

5 

0116 

1 

TS 

MPAC +1 


007A 

REF 

1 



14*7105 


0750 

1 

CS 

adiay 


0075 

REF 

3 

LAST 

216 

14*7106 

0 

7145 

3 

TC 

GCQMPSUB -1 


0076 

REF 

1 



14i7107 

4 

1005 

1 

CS 

DELVZ 


0077 

REF 

199 

LAST 

216 

14*7110 

5 

0115 

1 

TS 

MPAC 


0078 

REF 

2 

LAST 

216 

14,7111 

4 

1006 

1 

CS 

DELVZ +1 


0079 

REF 

200 

LAST 

216 

14,7112 

5 

0116 

1 

IS 

MPAC +1 


0080 

REF 

1 



14f 7113 

4 

0/5 3 

I 

CS 

adsray 


0081 

REF 

4 

LAST 

216 

14,7114 

0 

7146 

0 

F C 

GCOMPSUB 


0082 

REF 

1 



14»71 15 

4 

0745 

0 

CS 

Gb I asy 


0083 

REF 

2 

LAST 

216 

1A,7116 

0 

7171 

1 

rc 

DRIFTSUB 



I 



1 *. •’* 
- •' ' 


ft 




■ M . . 




jlli 


-- i 


r < 

I ' 


1 1 





.K 

T 


r 
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.V 
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^b4578A 

YUL 

System fo^ agc9: 

REVISION 

0 

Of r^dqRAm 

SOLRUM55 BY 

NASA 1021108-021 

DEC 9, 1966 (MAIN} PAgE 217 

L 

I MU 

compensat 

ION package 






USER'S OWN page NO, 9 

oObA 

REF 

5 

LAST 

216 

19,7117 

9 

1003 

1 

cs 

DELVY 

CuRRESPoNOING pattern For z gyro- 

U0B5 

REF 

201 

LAST 

216 

19,7120 

5 

0115 

1 

rs 

MPAC 


00fa6 

REF 

6 

LAST 

217 

19,7121 

9 

1009 

0 

cs 

DELVY +1 


0087 

REF 

202 

LAST 

21 r 

19,7122 

5 

0116 

1 

TS 

MPAC *1 


0088 

REF 

1 



19,7123 

9 

0759 

0 

CS 

AD5RAZ 


0089 

REF 

5 

LAST 

216 

19,7129 

0 

7195 

0 

TC 

GCOMP5U0 -1 


0090 

REF 

3 

LAST 

216 

19,7125 

9 

1005 

1 

CS 

DELV2 


0091 

REF 

203 

LAST 

217 

19,7126 

5 

0115 

1 

TS 

MPAC 


0092 

REF 

9 

LAST 

217 

19,7127 

9 

1006 

1 

CS 

DELVZ +1 


0093 

REF 

209 

LAST 

2l7 

19,7130 

5 

0116 

1 

TS 

MPAC +1 


0099 

REF 

1 



19,7131 

9 

0751 

0 

CS 

ADIAZ 


009& 

REF 

6 

LAST 

217 

19,7132 

0 

7195 

0 

TC 

GC0MPSU6 -1 


0096 

REF 

1 



19,7133 

9 

0 ^90 

0 

CS 

GBIASZ 


0097 

REF 

3 

LAST 

216 

19,7139 

0 

7171 

1 

TC 

PR1FTSU0 


0098 

REF 

2 

LAST 

216 

19,7135 

I 

0101 

0 

CCS 

GCOMPSW 

nun-zero IF time to PUT OUT COMPENSATION 

0099 





19,7136 

0 

7190 

0 

TC 

+ 2 


0100 

REF 

6 

LAST 

205 

19,7137 

0 

5702 

1 

TC 

SWRETURN 

TORQUES NOT BIG ENOUGH YET. 

0101 





19,7190 

2 

001 7 

0 

1N31NT 


request compensation job 

0102 

REF 

2 

LAST 

119 

19,7191 

3 

2170 

0 

cAf 

PRI035 

0103 

REF 

B 

LAST 

209 

19,7192 

0 

2052 

1 

TC 

NOVAC 


0109 

REF 

1 



1 9 , 7 1 ‘♦3 


31237 

0 

CAOR 

1/GYRO 


0105 

ref 

5 

LAST 

209 

19,7 199 

0 

6020 

0 

TC 

MODEEXIT 

RLLINT and return to SWRETURN, 


4bAb78A YUL system FOR AGC<^; REVISIUN 0 01- PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC tin 1966 


(Mainj Page zie 


L I MU COMPENSATION PACKAGE 

P0106 subroutines USeO to accumulate tsYRo compensation commands. 


0107 





1 A » 7 1 AS 

A 

0000 

0 

-1 

CDM 


01U8 

REF 

205 

LAST 

217 

1A.71A6 

3 

0116 

1 

GCOMPSUB 

XCH 

MPAC +1 

0109 





lA,7iA7 

2 

5777 

1 


EXTEND 


0110 

REF 

206 

LAST 

2l8 

1A*71S0 

A 

0116 

0 


yp 

MPAC +1 

0111 

REF 

207 

LAST 

218 

lAi7151 

3 

0116 

1 


XCH 

MPAC +1 

0112 





1A,7152 

2 

5 77 r 

1 


EXTEND 


01 13 

REF 

208 

LAST 

2le 

lA,7iS3 

A 

Oils 

0 


yp 

MPAC 

01 lA 

REF 

3A 

LAST 

203 

1A»715A 

5 

0C3A 

0 


TS 

OVCTR 

Oils 

REF 

12 

LAST 

21A 

lAi7l5S 

3 

0003 

1 


XCH 

LP 

0116 

ref 

209 

LAST 

216 

lA 1/156 

6 

0116 

1 


AD 

MPAC +1 

0117 

ref 

76 

LAST 

216 

1A«715/ 

2 

007 1 

0 

biascomp 

INDEX 

BUF 

0118 

ref 

B 

LAST 

215 

lA ,7160 

6 

075 J 

1 


AD 

GCOMP +1 

0119 

ref 

77 

LAST 

218 

1A,716I 

2 

0077 

0 


INDEX 

BUF 

0120 

ref 

9 

LAST 

218 

1A,7162 

3 

0^57 

1 


XCH 

GCOMP +1 

0121 

ref 

35 

LAST 

218 

lA, n63 

3 

003A 

0 


XCH 

OVCTR 

0122 

REF 

78 

LAST 

218 

1A*716A 

2 

0077 

0 


INDEX 

BUF 

0123 

REF 

10 

LAST 

21a 

1A,7165 

6 

0756 

0 


AD 

GCOMP 

012A 

REF 

79 

LAST 

218 

1A,7166 

2 

007/ 

0 


INDEX 

BUF 

0125 

REF 

11 

LAST 

218 

1A,716^ 

5 

0 ^56 

0 


TS 

GCOMP 

0126 

REF 

130 

LAST 

213 

1A»7170 

0 

0001 

0 


TC 

Q 


USER *5 OWN PAGE NO. 5 


(enters here to RE-COMPLEMFNT INPUT). 

Dues dp by single multiply with dp add 

TO STORAGE. 


(and maybe increment OVCTR), 
BUS Compensation enters here. 


4b^t)78A YUL System for agca; revision o of program solRumss by nasa 102110S-021 


DEC a, I9b6 


(MAIN) page 2l9 


L IMU compensation package 

P0127 subroutine WHICH aODS IN GYRo BIAS DRIFT* TESTS TqRUUE SUE T 

RQ129 ADVANCES GCOMp POINTER. 


0130 

REF 

131 

LAST 

218 

1A*71 71 

3 

0001 

0 

DRIFTSUB 

XCH 

Q 

0131 

REF 

80 

LAST 

218 

1^*7172 

5 

0100 

0 


T5 

BUF +1 

0132 

REF 

132 

LAST 

2l9 

1A*7173 

3 

OoOl 

0 


XCH 

U 

0133 





1A*717A 

2 

5777 

1 


EXTEND 


013A 

REF 

3 

LAST 

2lA 

1A,71 /5 

A 

0755 

1 


v)p 

1/PiPADT 

0135 





1A*7176 

2 

577 7 

1 


EXTEND 


0136 

ref 

7 

LAST 

21a 

lA *717 r 

A 

5502 

1 


M? 

FOUR 

0137 

REF 

36 

LAST 

218 

lA*720a 

5 

003A 

0 


T5 

OVCTR 

0138 

REF 

13 

LAST 

218 

1A*7201 

3 

0003 

1 


XCH 

LP 

0139 

REF 

1 



1A*7202 

0 

7157 

0 

DRFTSUB2 

TC 

BIASCOMP 

ouo 

REF 

23 

LAST 

20A 

lA *7203 

3 

5503 

1 


CAF 

Two 

OlAl 

REF 

81 

LAST 

219 

lAi 720A 

6 

0077 

1 


AD 

BUF 

0U2 

REF 

82 

LAST 

219 

lA* 7205 

3 

0077 

1 


XCa 

bUF 

0 1 h3 

REF 

195 

LAST 

2lA 

IA*7206 

2 

0000 

D 


INDEX 

A 

0 1 A A 

REF 

12 

LAST 

218 

1A*7207 

1 

0 756 

1 


CCS 

GCOMP 

01A5 





1A.7210 

0 

7212 

L 


IC 

+ 2 

01A6 

REF 

83 

LAST 

219 

1A*7211 

0 

0100 

0 


TC 

BUF +l 

01A7 

REF 

1 



IA*7212 

7 

7260 

0 


^A5< 

COMPCHK 

OlAS 

REF 

196 

LAST 

219 

IA*7213 

1 

0000 

0 


r" r- c 
w 3 

A 

0lA9 

REF 

3 

LAST 

217 

1 A * 72 1 A 

5 

0101 

I 


T5 

GCOMPSW 

OISO 

REF 

8A 

LAST 

219 

1 A . 7 2 1 5 

0 

0100 

0 


TC 

BUF +1 


USER'S OWN page NO, 6 

0 SEE IF Commands should be put out* and 


RESULT WAS IN GYRO PULSES X 2 ( + 2). 
RL-SCALE TO ADD INTO GCOMP REGISTER, 

GU TO STANDARD INCREMENT ROUTINE. 


li^iCREMENT POINTER AND 

CHECK MAGNITUDE OF TORQUE COMMAND. IF 
SUFFICIENTLY LARGE* SET GCOMPSW PNZ TO 
CALL FOR COMPENSATION JOB* 1/GYKO. 

GLT5 DABS OF COMMAND. 


RETURN, 


^0^578A YUL SYSTEM FOR A&C<t; REVISION 0 OF PRoORAM SqURUMSS 8Y NASA 1021106-021 


Dec I9b6 


(MAIN) PAGE 220 


L I MU compensation PACKAGE USER’S OWN PAGE NO, 7 

Pulbl (1/PlPA COMES here IF PIPA COUNTER SHOWED A DELTA V OF OVER 12 G-SEC.) 


01S3 

REF 

85 

LASr 

219 

1A*7216 

2 

OlOl 

0 PiPOvF 

INDEX 

BUF +2 

SHIFT THE SCALE FACTOR RIGHT 

01 SA 

REF 

2 

LAST 

21 A 

1A» 721 J 

A 

0737 

0 

C5 

PIPASCF 


OISAS 





lAi7220 

A 

0000 

0 

CDM 



OISS 





IA*7221 

2 

5777 

1 

EXTEND 


1 

0156 

REF 

16 

LAST 

2lA 

IA*7222 

A 

A513 

0 

MP 

BITA 


0157 





lAt7223 

2 

5777 

1 

EXTEND 


FURM DP increment TO DELV IN 

0158 

REF 

210 

LAST 

218 

1A»722A 

A 

0115 

0 

v\P 

MPAL 


0159 

REF 

37 

LAST 

219 

1A»7225 

5 

Ou3t 

0 

T5 

OVCTR 


0160 

REF 

lA 

LAST 

219 

lAt7226 

3 

0003 

1 

XCH 

LP 


0161 

REF 

211 

LAST 

220 

IA»7227 

6 

0116 

1 

AD 

MPAC +l 

MAYBE incrementing OVCTR. 

0162 

REF 

86 

LAST 

220 

lAt723U 

2 

OlOl 

0 

INDEX 

BUF +2 


0163 

REF 

9 

LAST 

216 

lA»723i 

3 

1002 

1 

X V. H 

DELVX +1 

NU SKIP SINCE OVCTR SET. 

0 1 6 A 

REF 

38 

LAST 

220 

lAt7232 

3 

0034 

0 

XCH 

OVCTR 


0165 

REF 

212 

LAST 

220 

lAf 7233 

6 

0115 

1 

AD 

MPAC 


0166 

REF 

87 

LAST 

220 

lAt723A 

2 

0101 

0 

INDEX 

BUF +2 


0167 

REF 

10 

LAST 

220 

1A»7235 

3 

1001 

1 

XCH 

DELVX 


016B 

REF 

1 



1A*7236 

0 

7055 

0 

TC 

PIPJUMP 

JUMP ON LOOP COUNTER. 


11 ON OVF. 


THIS case. 


Atj^578A YUL SYSTEM FQR AGC^n REVISION 0 OF PROGRAM 50LRUM55 BY NASA 1021108-021 


DEC A, 1966 


(MAIN) Page 221 


L I MU COMPENSATION PACKAGE USER'S OwN PAGE NO, 8 


PU169 



the 

FOLLo»^ING JOB IS 

iNiTlAT 

ed 

BY 1/PlPA 

TO 

PUT OUT compensating GYRO TORqUE COMMANDS, 

0171 

REF 

B 

LAST 

213 

1A*7237 

3 ASOA 

1 

1/GYRO 

CAF 

BITII 

IF MODE Switch in progress, dont put 

01711 

REF 

6 

LAST 

213 

1A,72A0 

7 06A6 

1 


viA5< 

FLAGWRDl 

Out compensation this time. 

01712 

REF 

197 

LAST 

219 

1A*72A1 

1 0000 

0 


CCS 

A 


01713 

REF 

13 

LAST 

212 

1A»72A2 

0 212A 

1 


TC 

ENDOFJOB 


0171A 

REF 

2 

LAST 

213 

1A»72A3 

0 3 A 1 6 

1 


TC 

flagiup 

SHOW IMU activity 

01715 





1A,72AA 

02000 

0 


OCT 

02000 

flag turned off by gyro routines. 

0173 

REF 

1 



1A,72A5 

3 7060 

□ 


CAF 

L6C0MP 

disable the tarupt cdu drive themselves. 

017A 

REF 

3 

LAST 

211 

1A»72A6 

0 565a 

0 


rc 

BANKCALL 


0175 

REF 

1 



lAt72A7 

313A7 

0 


CAOR 

gyrospnt 

Nu TWITCH (2+2-) ON ZERO INPUT. 

0176 

REF 

A 

LAST 

221 

1A»7250 

0 565A 

0 


TC 

bANKCALL 


0177 

REF 

1 



1A.7251 

30331 

0 


CAOR 

IMUSTALL 


0178 

REF 

1 



1A»7252 

0 3066 

1 


TC 

CURTAINS 


0181 

ref 

76 

LAST 

21A 

1AW253 

3 5501 

0 


CAF 

Zero 

zero GCOMP registers SINCE COMMANDS HAVE 

0182 

REF 

13 

LAST 

219 

lAt725A 

5 07 56 

0 


T5 

GCOMP 

been put OUT. 

0183 

REF 

lA 

LAST 

221 

1A,7255 

5 0760 

□ 


T5 

GCOMP +2 


oieA 

REF 

15 

LAST 

221 

1A,7256 

5 0762 

1 


T5 

GCOMP +A 


0185 

REF 

lA 

LAST 

221 

lAt725 7 

0 212A 

1 


TC 

ENDOFJOB 


0186 





1A» 7260 

777A0 

1 

COMPCHK 

OCT 

-37 

Commands must be at least 32 pls. 


^e4i>78A YUL SYSTEM FOR AGCA; REVISION 0 OK PROGRAM SOLRUMsS BY NASA 1021108-021 


DEC Ai 1966 


(MAIN) PAGE 222 


L 

I MU 

COMPENSATION PACKAGE 







P0187 



THl 

FOLLOWING Routine 

supplies 

gyro drift compensation c 

RgiB9 

USE 

PI PA 

data 

. THIS 

JOB IS called EVE9Y 

81.93 Seconds 

(WHEN APPRC 

0191 

ref 

5 

last 

191 

14t7261 

4 

0036 

0 

biasonly 

CS 

TlMEl 

0192 





14*7262 

4 

0000 

0 


COM 


0193 

REF 

1 



14*7263 

3 

0755 

0 


XCH 

OLDBTl 

019A 





14*7264 

4 

0000 

0 


COM 


019S 

REF 

2 

LAST 

222 

14*7265 

6 

0755 

0 


AD 

oldbti 

0196 

REF 

198 

LAST 

221 

14*7266 

1 

0000 

0 

B0NLY2 

CCS 

A 

0197 

REF 

89 

LAST 

211 

14*726? 

6 

4516 

1 


AD 

ONE 

0198 

REF 

1 



14*72?0 

0 

7275 

0 


tc 

B0NLY3 

0199 





14*7271 

0 

7273 

0 


tc 

+ 2 

0200 

REF 

15 

LAST 

221 

14*7272 

0 

212^ 

1 


tc 

ENDOFJOB 

0201 





14*7273 


oooo 

0 


COM 


0202 

REF 

15 

LAST 

201 

14*7274 

6 

4^76 

l) 


AO 

POSMAX 

0203 





14,72 ?5 

2 

57 7 7 

1 

B0NLY3 

EXTEND 

020A 

REF 

5 

LAST 

154 

14*7276 

4 

4506 

1 


M? 

BIT9 

0205 

REF 

213 

LAST 

220 

14,7277 

5 

0115 

1 


TS 

MPAC 

0206 

REF 

13 

LAST 

75 

14,7300 

5 

0106 

0 


TS 

TEM9 

0207 

REF 

15 

LAST 

220 

14*7301 

3 

0003 

1 


X ch 

lp 

0208 

REF 

214 

LAST 

222 

14*7302 

5 

0116 

1 


TS 

MPAC +1 

0209 

REF 

14 

LAST 

75 

14*7303 

5 

0107 

1 


TS 

TEMIO 

0210 

REF 

77 

LAST 

221 

14*7304 

3 

5501 

0 


caf 

ZERO 

0211 

REF 

4 

LAST 

219 

14*7305 

5 

OlOl 

1 


TS 

GCOMPSW 

0212 

REF 

88 

LAST 

220 

14*7306 

5 

007 f 

1 


TS 

bUF 

0213 

REF 

2 

LAST 

216 

14*7307 

4 

0744 

1 


CS 

GBI ASX 

021A 

REF 

1 



14,7310 

0 

7331 

1 


TC 

FBIASSUB 

0215 

REF 

14 

LAST 

222 

14*7311 

4 

0106 

1 


CS 

TEM9 

0216 

REF 

215 

LAST 

222 

14*7312 

5 

0115 

1 


TS 

MPAC 

0217 

REF 

15 

LAST 

222 

14*7313 

4 

010 7 

0 


CS 

TEMIO 

0218 

REF 

216 

LAST 

222 

14,7314 

5 

0116 

1 


TS 

MPAC +1 

0219 

REF 

2 

LAST 

216 

14*7315 

4 

0745 

0 


CS 

GB1A5Y 

0220 

REF 

2 

LAST 

222 

14*7316 

0 

7330 

0 


TC 

FBIASSUB 

0221 

REF 

15 

LAST 

222 

14*7317 

4 

OlOb 

1 


CS 

TEM9 

0222 

REF 

217 

LAST 

222 

14,7320 

5 

0115 

1 


TS 

MPAC 

0223 

REF 

16 

LAST 

222 

14*7321 

4 

OlO? 

0 


CS 

TEMIO 

022A 

REF 

218 

LAST 

222 

14*7322 

5 

0116 

1 


IS 

MPAC +l 

0225 

REF 

2 

LAST 

217 

14,7323 

4 

0 746 

0 


CS 

GBIASZ 

0226 

REF 

3 

LAST 

222 

14,732'+ 

0 

7330 

0 


TC 

FBIASSUB 


USER'S OWN PAGE NO 


9 


Compute time difference (almost always 

81.93 SECS.). 


lastbias enters here. 


May have a computed DIFF = 0 


FuRM DELTA-T at 2 (+8) CS 
SHIFT RIGHT 6. 


DO X* y* and then z 


reload dt. 


-I 


-1 


9 



.V 





i 


f 



*. i 












il' 




u ^ 

}'J-r 

Jr^ 

i . • ' ^ M ’irL A 


i*b4^78A YUL SYSTtM FqH AGC4: ftEViSIjN 0 OF PROGRAM SoLRUMsg B 


L I MU compensation PACKAGE 


0227 

REF 

5 

LAST 

222 

14,7325 

1 

OlOl 

0 


CCS 

0228 

REF 

2 

LAST 

217 

I4t7326 

0 

7237 

0 


TC 

0229 

REF 

16 

LAST 

222 

14,7327 

0 

2124 

1 


TC 

0230 





14,7330 

4 

0000 

0 

-1 

CD'I 

0231 

REF 

133 

LAST 

219 

14,7331 

3 

0001 

0 

fbiassub 

X C4 

0232 

REF 

09 

LAST 

222 

14,7332 

5 

0100 

0 


T5 

0233 

REF 

78 

LAST 

222 

14,7333 

3 

5501 

0 


CAF 

023A 

REF 

219 

LAST 

222 

14,7334 

5 

0117 

0 


T5 

0235 

REF 

134 

LAST 

223 

14,7335 

3 

0001 

0 


xc^ 

0236 

REF 

2 

LAST 

74 

14,7336 

0 

5416 

1 


TC 

0237 

REF 

220 

LAST 

223 

14,7337 

3 

0115 

1 


XCH 

0238 

REF 

39 

LAST 

220 

14,7340 

5 

0034 

0 


TS 

0239 

REF 

221 

LAST 

223 

14,7341 

3 

0ll6 

1 


XCH 

02A0 

REF 

1 



14,7342 

0 

7202 

0 


TC 

02A1 

REF 

3 

LAST 

222 

14,7343 

3 

0755 

0 

LASTBIAS 

XCH 

02^»2 





14, 7344 

4 

0000 

0 


COM 

0243 

ref 

222 

LAST 

223 

14,7345 

6 

0115 

1 


AO 

0244 

REF 

1 



14,7 346 

0 

7266 

1 


TC 


NASA 1021108-021 


oec a* 1966 (Main) Page 223 



USER‘5 own page no, 10 

GCOMPSW 

1/GYRO 

ENDOF JOB 

PUT OUT COMPENSATION IF CALLED FOR, 

Cl 

BUF + 1 

ZERO 

MPAC +2 

0 

SHORTMP 

MPAC 

OVCTR 

MPAC ♦! 
DRFTSUB2 

RETURN TO CALLER VIA BUF +1, 

OLDbTl 

MPAC 

eaNLY2 

CUMES HERE FOR TRANSITION TO PIPA READ. 
InG mode, new value OF 1/PlPADT ARRIVES 
In a with with TIMEI AT PiPA ZEROING IN 
MPAC, EXITS VIA ENDOFJOB, 


^8^57bA YUL system KDR AGC4; KtVISIjhJ U OP PRdGRAM SOLRUM55 BY NASA 1021100-021 


Dec 1966 


(MAIN) PAGE 22A 


L IRIG PULSe-TQROUInG ROUTINES USER’S OWN PAGE NO, I 

Roool the following pulse-torquing options are Available: 


R 0002 



GYROSPNT 



single 

precision 

inputs 

with no twitch 

(lE Zero OUTPUT ON Zero command). 

ROOUA 



GYR05PTW 



SINGLE 

PRECISION 

input with twitch on ZERU (2* then 2'). 

ROO 06 



6YR0DPNT 



Double 

precision 

INPUTS 

(SIGN AGREEMENT 

UNNECESSARY) WITH NO TWITCH. 

Roods 

ALL 

OF the ABoVe 

SHOULD 0£ followed EVENTUALLY BY 

A CALL 

TO IMUSTALL. 


0009 






19,7397 


BAN< 

19 


0010 

REF 

223 

LAST 

223 

19»7397 

5 

0115 

1 

GYROSPNT 

T5 

MPAC 

Address of three register command set 

0011 

REF 

2 

last 

199 

19*7350 

1 

0769 

0 


CCS 

LGYRO 

ARRIVES In a. see IF GYRO ROUTINES BUSY. 

0012 

REF 

1 



19*7351 

0 

752h 

0 


TC 

GYHUBUSY 

(AND return when AVAILABLE.) 

0013 

REF 

2A 

LAST 

219 

19t7352 

3 

5503 

1 

SPNT 

caf 

TWO 

Set up loop to augment (+ or -) each 

001 A 

REF 

22A 

LAST 

22a 

19*7353 

5 

0116 

1 


T5 

MPAC +1 

command by TwO If non-zero. 

0015 





19*7359 

6 

0000 

1 


double 



0016 

REF 

225 

LAST 

229 

19*7355 

6 

0115 

1 


AD 

MPAC 


0017 

REF 

90 

LAST 

223 

19*7356 

5 

007 ? 

1 


ts 

BUF 


0018 

REF 

199 

LAST 

222 

19*735^ 

2 

0000 

0 


1 NDEX 

A 


0019 





19*7360 

1 

0000 

0 


CCS 

0 


0020 

REF 

25 

LAST 

229 

19.7361 

3 

5503 

1 


caf 

TWO 


0021 





19*7362 

0 

7369 

1 


1 c 

♦ 2 

(NO INCREMENT IF +-0) . 

0022 

REF 

26 

LAST 

229 

19.7363 

9 

5503 

0 


C5 

TWO 


0023 

REF 

91 

LAST 

229 

1 9 * 7 369 

2 

0077 

0 


INDEX 

BUF 


002A 





19,7365 

6 

Oooo 

1 


AD 

0 


0025 

REF 

92 

LAST 

229 

1 9 * 7366 

2 

0077 

0 


I NDEX 

BUF 


0026 





19,7367 

3 

0000 

1 


XCH 

0 

(UU5T TO BE SAFE) . 

0027 

REF 

226 

LAST 

229 

iA.73 /o 

1 

0116 

Q 


CCS 

MPAC +1 


0028 

REF 

1 



19,7371 

0 

7353 

0 


TC 

SpNT +1 


0029 





19*7372 

2 

0017 

0 

SP6YREX 

INHiNT 



0030 

REF 

90 

LAST 

222 

19, 73^3 

3 

9516 

1 


caf 

ONE 


0031 

REF 

29 

LAST 

213 

19*7379 

0 

2173 

0 


TC 

WAITLIST 


0032 

REF 

I 



19,7375 


21509 

0 


CADR 

D06YR0SP 


0033 

REF 

5 

LAST 

155 

19*7376 

9 

9973 

1 

GYR0EX2 

CS 

THREE 

Initialize cduind to start gyro tasks 

003A 

REF 

15 

LAST 

199 

19*7377 

5 

067 ? 

1 


TS 

CDUIND 

AI Y gyro (ORDER 15 YZX) , 

0035 

REF 

8 

LAST 

2l9 

19,7900 

9 

5602 

1 


CS 

TOUR 


0036 

REF 

227 

LAST 

229 

19*7901 

6 

0115 

1 


AD 

MPAC 

Set lgyrod pnz to indicate gyro activity 

\J ^ J 

0037 

REF 

3 

LAST 

229 

19,7902 

5 

0769 

1 


TS 

LGYRO 

And use lgyro to store the address off 

0038 

REF 

6 

LAST 

217 

19, 7A03 

0 

6020 

0 


TC 

MODEEXIT 

The commands. 


^8Ab78A YUL SYSTEM FqR AGCAI REVISijf^ q oF PRdGRAM SqLRUMSS By NASa 1021108-021 


DE^ a * 1966 


(Main) page 22^ 


L IRIG PULSe-TORQUInG RoUTiVtb USER»S QwN PAGE NO. 2 


P0039 



sing 

iLE PRECISION WITH 

TWITCH 

• 






ooao 

REF 

228 

LAST 

224 

14 * 7 4 0 4 

5 

0115 

1 

gyrosptw 

T5 

MPAC 



OOAl 

ref 

4 

LAST 

224 

14*7405 

1 

0764 

0 


f- a 

LGYRO 

SAME PROLOGUE AS GYR05PNT 

00A2 

REF 

2 

LAST 

224 

14*7406 

0 

7524 

0 


TC 

GYROBUSY 



OOA3 

REF 

27 

LAST 

224 

14*7407 

3 

5503 

1 

SPTW 

CAP 

TWO 

SLT UP 

LOOP TO augment by 2 ( 

OOAA 

REF 

229 

LAST 

225 

14*7410 

5 

0116 

1 


TS 

MPAC +1 

WITH A 

PLUS TWO augment on +- 

00A5 





14*7411 

6 

0000 

1 


DOJBLE 




00^6 

REF 

230 

LAST 

225 

14*7412 

6 

0115 

1 


A3 

MPAC 



00A7 

REF 

93 

LAST 

224 

14,7413 

5 

007 7 

1 


rs 

bUF 



00A8 

REF 

200 

LAST 

224 

1 4 * 74 1 4 

2 

0000 

0 


INDEX 

A 



0049 





14*7415 

1 

0000 

0 


CCS 

0 



ooso 





14*7416 

0 

7421 

1 


TC 

+ 3 



0051 





14,7417 

0 

7421 

1 


TC 

+ 2 



0052 





14*7 420 

0 

7423 

D 


TC 

+ 3 



0053 

REF 

28 

LAST 

225 

14*7421 

3 

5503 

1 


CAP 

Two 



0054 





14*7422 

0 

7424 

1 


TC 

+ 2 



0055 

REF 

29 

LAST 

225 

14*7423 

4 

5503 

0 

+ 3 

cs 

TWO 



0056 

REF 

94 

LAST 

225 

14*7424 

2 

0077 

0 


INDEX 

BUF 



0057 





14,7425 

6 

0000 

1 


AD 

0 



0058 

REF 

95 

LAST 

225 

14*7426 

2 

0077 

0 


INDEX 

BUF 



0059 





14*7427 

3 

0000 

1 


XCH 

0 



0060 

REF 

231 

LAST 

225 

14*7430 

1 

0 1 1 6 

0 


CCS 

MPAC +1 



0061 

REF 

1 



14*7431 

0 

7410 

0 


TC 

SPTW +1 



0062 

REF 

1 



14,7432 

0 

7372 

0 


TC 

SPGYREX 

SLT UP 

PULSE-TORQUING TASKS. 


OR.) t 

0 . 


48^57aA YUL SY5TEM FOR A&C<t: REVISION 0 OP PROGRAM SOLRUMSS BY 


L IRIG PULSE-T0RQUIN3 ROUTiMtS 


P0063 



DOUBLE PRECISION INPUTS 

I 

NO 

twitch 

ON ZERO 

00 6*t 

ref 

6 

last 

84 

14W433 

5 

0113 

1 

GYRODPNT 

T5 

0065 

REF 

3 

last 

202 

14 1 7434 

0 

5706 

0 


TC 

0066 

REF 

83 

LAST 

202 

14 W435 

3 

0062 

0 


KCH 

0067 

REF 

14 

LAST 

93 

14^7436 

5 

0064 

0 


T5 

0066 

REF 

79 

LAST 

223 

14*7437 

3 

5501 

0 


C'^F 

0069 

REF 

232 

LAST 

225 

14*7440 

5 

0117 

0 


TS 

0070 

REF 

30 

LAST 

225 

14*7441 

3 

5503 

1 

DPNT 

CAF 

0071 

REF 

96 

LAST 

225 

14*7442 

5 

0077 

1 


TS 

0072 





14*7443 

6 

0000 

1 


DOUBLE 

0073 

REF 

7 

LAST 

226 

14*7444 

6 

0113 

1 


AO 

00 /A 

REP 

97 

LAST 

226 

14*7445 

5 

0100 

D 


TS 

0075 

REF 

201 

LAST 

225 

14*7446 

2 

0000 

0 


INOEX 

0076 





14*7 44 7 

3 

0000 

1 


XCR 

00 7 7 

REF 

233 

LAST 

226 

14*7450 

5 

01 15 

1 


TS 

007B 

REF 

98 

LAST 

226 

14*7451 

2 

0100 

1 


INDEX 

0079 





14*7452 

3 

0001 

0 


XCH 

0080 

REF 

234 

LAST 

226 

14,7453 

5 

0116 

1 


TS 

0081 

REF 

5 

LAST 

221 

14*7 454 

0 

5654 

0 


TC 

0082 

REF 

4 

LAST 

94 

14*7455 

07154 

0 


CADR 

0083 

ref 

202 

LAST 

226 

14*7456 

1 

0000 

0 


CCS 

0084 

REF 

31 

LAST 

226 

14*745 7 

3 

5503 

1 


LAP 

0085 

REF 

32 

LAST 

226 

14,7460 

6 

5503 

1 


AD 

0086 

REF 

3 

LAST 

68 

14,7461 

6 

4340 

1 


AD 

0087 

REF 

235 

LAST 

226 

14*7462 

6 

0116 

1 


AD 

00B8 

REF 

236 

LAST 

226 

14,7463 

6 

0115 

1 


AD 

0089 

REF 

99 

LAST 

226 

14*7 464 

2 

0100 

1 


INDEX 

0090 





14*7465 

5 

0001 

0 


TS 

0091 





14*7466 

0 

7476 

0 


TC 

0092 

REF 

135 

LAST 

223 

14,7467 

5 

0001 

0 


TS 

0093 

REF 

100 

LAST 

226 

14*7470 

2 

OiOO 

1 


INDEX 

0094 





14*7471 

6 

OOOi 

0 


AD 

0095 

REP 

101 

LAST 

226 

14*7472 

2 

0100 

1 


INDEX 

0096 





14,7473 

5 

0001 

0 


TS 

0097 

REF 

136 

LAST 

226 

14,7474 

3 

OOOi 

0 


XCH 

0098 





14,7475 

0 

7477 

1 


TC 

0099 

REF- 

80 

LAST 

226 

14,7476 

3 

5501 

0 

^8D 

caf 

OlOC 

REF 

237 

LAST 

226 

14,747 7 

6 

0115 

1 


AD 

0101 

REF 

102 

LAST 

226 

14,7500 

2 

0100 

1 


INDEX 

0102 





14*7501 

3 

oooo 

1 


XCH 


- r. 







1 



^fT.2 


1021108-021 


dec a* 1966 


(MAIN) PAGE 226 



USER'S OWN PAGE NO. 3 

ARE TURN 
MAKECAqR 

addrwd 

TEMl 1 

ZERO 

MPAC +2 

Two 

SAVE address of INPUT COMMANDS. 

Save return address since we must 

Du A bANKCALL TO TPAGREE. 

BUF 

ARE 1 URN 
bUF +1 

A 

0 

MPAC 

BUF +1 

1 

MPAC +1 

BANXCALL 

TPAGREE 

This LOOP FORCES SIGN AGREEMENT IN THE 

DP INPUT commands* AUGMENTING ON 
NON-ZERO, 

A 

TWO 

T WO 

NEG2 

Augment by two if non-zero, tpagree 

RETURNS +l*+0*— 1# 

MPAC +1 

MPAC 

BUF +1 

1 

+ 8D 

DIVIDE BY POSMAX - IE PLACE IN THE MAJOR 
PART OF EACH COMMAND THE NUMBER OF 

PUSMAX PULSE TRAINS TO BE PUT OUT* 

leaving The remainder in the minor part. 

0 

BUF +1 

1 

ON OVERFLOW* Add +-1 TO the minor part 

AS WELL AS THE MAJOR PART. 

BUF +1 

1 

0 

+ 2 

ZERO 

MPAC 
bUP +1 

No OVERFLOW HERE* 


0 


^b^t>78A YUL SYSTEM FOK AGCi^; REVISION 0 OF PRjGRAM SOLRUMSS BY NASA 1021108-021 


OtC 1966 


(MAIN) PAGE 227 


L IRIG PULSe-TOROUING ROUTINES 


Q1U3 

REF 

103 

last 

226 

I4i7502 

1 

0077 

0 

CCS 

BUF 

0104 

REF 

1 



14i75U3 

0 

7442 

1 

TC 

DPNT +1 

0105 

REF 

e 

LAST 

226 

1 4 » 7504 

3 

0113 

1 

XCH 

areturn 

0106 

REF 

238 

LAST 

226 

14,7505 

5 

0115 

1 

TS 

MPAC 

0107 

REF 

5 

LAST 

225 

14,7506 

1 

0/64 

0 

CCS 

lgyro 

0108 

REF 

1 



14,7507 

U 

7543 

1 

TC 

GYR0BSY2 

0109 

REF 

5 

LAST 

189 

14,7510 

3 

2261 

0 

CAP 

BAN<MAS< 

0110 

REF 

15 

LAST 

226 

14,7511 

7 

0064 

1 

YAS< 

TEMil 

0111 

REF 

3 

LAST 

213 

14»7512 

5 

0072 

1 

TS 

BANiCTEM 

0112 

REF 

10 

LAST 

119 

14,7513 

3 

460b 

0 

CAP 

LOWIO 

0113 

REF 

16 

LAST 

227 

14,7514 

7 

0064 

1 

MAS< 

TEMll 

0114 

REF 

4 

LAST 

no 

14,7515 

6 

4373 

1 

AD 

6K 

0115 

REF 

5 

LAST 

213 

14 ,7516 

5 

0071 

1 

TS 

TEMOS 

0116 





14,7517 

2 

0017 

0 

INHINT 


0117 

REF 

91 

LAST 

224 

14,7520 

3 

4516 

1 

CAF 

ONE 

0118 

REF 

25 

LAST 

224 

14,7521 

0 

2173 

0 

TC 

WAITLIST 

0U9 

REF 

1 



14,7522 


21571 

1 

CADR 

OOGYRO 

0120 

REF 

1 



14,7523 

0 

7376 

1 

TC 

GYR0EX2 


USER'S OWN page no. 4 


Prepare for possible gyrobusy call. 


48^578A YUL system FOR AGC<»; RtVlSljN 0 OF PROGRAM SQLRUM55 BY 


L IRIG PULSE-TORQUInG ROUTIMEG 


Poiai GYRO Stalling rdjtines - called \/ehy rarely by 


0123 

REF 

137 

LAST 

226 

1 A » 7524 

3 

OOOi 

0 

GYROBUSY 

XCH 

01 2A 

REF 

239 

LAST 

221 

lAf 7525 

5 

0117 

0 


TS 

0125 

REF 

A 

LAST 

226 

lAt 7526 

0 

5706 

Q 


TC 

0126 

REF 

8A 

LAST 

226 

1A,7527 

3 

0062 

0 


XCH 

0127 

REF 

2A0 

LAST 

228 

1A,7530 

5 

0116 

1 


TS 

0128 

REF 

1 



lA ,7531 

3 

75A7 

0 

REGSLEEP 

caf 

0129 

REF 

5 

LAST 

213 

lA, 7532 

0 

2127 

1 


TC 

0130 

RE^ 

6 

LAST 

22/ 

1A»7533 

I 

0 /6A 

0 

NEWGYRO 

^ c 

0131 

REF 

1 



1A,753A 

0 

7531 

1 


TC 

0132 

REF 

2Al 

last 

228 

lAt7535 

3 

Ollb 

1 


XCH 

0133 

REF 

A 

LAST 

227 

1 A , 7 5 36 

5 

0072 

1 


TS 

013A 

REF 

11 

LAST 

227 

1A,7537 

7 

A606 

1 


MA5< 

0135 

REF 

5 

LAST 

227 

1A,75A0 

6 

4373 

t 


A3 

0136 

REF 

6 

LAST 

227 

1 A ♦ 7 5 A 1 

5 

0071 

1 


TS 

0137 

REF 

2A2 

LAST 

228 

1 A » 7 5 A2 

0 

0117 

0 


TC 

0138 

REF 

138 

LAST 

228 

1A»?5A3 

3 

0001 

0 

GYR0BSY2 

XC-t 

0139 

REF 

2A3 

LAST 

228 

1 A * 7 5AA 

5 

0117 

0 


1 5 

01 AO 

REF 

17 

LAST 

227 

1A,75A5 

3 

006A 

0 


XCA 

OlAl 

REF 

2 

LAST 

228 

1A,75A6 

0 

7530 

0 


TC 

01^2 

ref 

1 



lAf 75A7 


31533 

0 

CADRNEWG 

CAOR 


NASA 1021108-021 

DEC A, 1966 (MAIN) PAgE 228 


USER’S O^N page no, 5 


AY MOST ONE ROUTINE AT A TIME. 


Q 

MPAC +2 

RETURN ADDRESS TO MPAC. 

makecaor 

APDRWD 

MPAC +1 

CALLERS Return cadr to mpac +i. 

CADRNEWG 

JOBSLEEP 

AT standard location. 

LGYRO 

regsleep 

StE IF routines still AVAILABLE (SHOULD 
BL). IF NOT, WAIT SQmE MORE. 

MPAC +l 

BANKTEM 

LOWIO 

6X 

TEMQS 

MPAC +2 

Restore return cadr to standard swcall 

(tlANKCALL) FORM. 

Q 

MPAC +2 

TEMll 

REGSLEEP -1 

DP WAIT. 


NttvGYRO 


48^578A YUL SYSTEM FOR AGC<tj REVISION 0 OF PROGRAM S 0 URUM 55 BY NASA 1021108-021 


OEC Af 1966 (MAIN) PAGE 229 


L IRIG PULSE-TORQUInG ROUTINES USER'S OWN PAGE NO. 6 


P019A 



TASK 

S FOR 

SENDING OUT 

S 1 ngle 

PRECISION Commands 

• 


01A5 






10*7504 


3AN< 

10 


01A6 

ref 

1 



10*7504 

0 

7704 

D 

DOGYROSP 

TC 

SETuPSUB 

CUMMON INITIALIZATION SUBROUTINE. 

01A7 

REF 

3 

LAST 

207 

10*7505 

2 

0641 

0 


INDEX 

KUPTREG3 


0148 





10*7506 

1 

0000 

0 


r ^ C 

w ^ 3 

0 

PUT OUT NEXT command. 

0149 

REF 

1 



10*750 ( 

0 

7523 

L 


TC 

POSGOUTS 


0150 

REF 

1 



10*7510 

0 

7512 

Q 


TC 

GYROADVS 

NU COMMAND IF +-0. 

0151 

REF 

1 



10*7511 

0 

7537 

1 


TC 

NEGGOUTS 


0152 

REF 

16 

LAST 

224 

10*7512 

4 

067 7 

0 

GYROADVS 

cs 

COUIND 

ADVANCE To NEXT GYRO IN ORDER YZX. 

0153 

REF 

203 

last 

226 

10,7513 

2 

0000 

0 


INDEX 

A 


0154 





10*7514 

0 

7513 

1 


TC 

-1 


0155 

REF 

1 



10*7515 

0 

7721 

1 


TC 

ENDGYRO 


0156 

REF 

7 

LAST 

208 

10,7516 

3 

4475 

0 


CAF 

SIX 


0157 

REF 

4 

LAST 

226 

10*7517 

6 

4340 

1 


AD 

NEG2 


0158 





10,7520 

4 

0000 

0 


CDM 



0159 

REF 

17 

last 

229 

10*7521 

5 

067 7 

1 


rs 

CDUINO 


0160 

REF 

2 

LAST 

224 

10*7522 

0 

75 O 9 

1 


TC 

DOGYROSP 


0161 

REF 

92 

LAST 

227 

10*7523 

6 

4516 

1 

posgouts 

AD 

ONE 


0162 

REF 

40 

LAST 

223 

10,7524 

5 

0034 

0 


TS 

QVCTR 


0163 

ref 

2 

LAST 

171 

10,7525 

0 

6631 

0 


TC 

OUT 2 SUB 

PUT OUT command, saving COMMAND FOR 

0164 

ref 

1 



10*7526 

0 

7672 

0 


TC 

GETDT 

OT COMPUTATION. 

0165 

REF 

3 

LAST 

163 

10,752 7 

3 

0032 

0 


xc^ 

LPRUPT 


0166 

REF 

26 

LAST 

227 

10*7530 

0 

2173 

0 


TC 

WAITLIST 


0167 

REF 

1 



10*7531 

21533 

1 


cadr 

TWEAKSP 

PUT OUT 2- WHEN COMMAND IS OUT. 

0168 

REF 

19 

LAST 

213 

10*7532 

0 

2256 

1 


TC 

TASKOVER 

ALL FOR NOW. 

0169 

REF 

2 

LAST 

229 

10*7533 

0 

7 704 

0 

TWEAKSP 

TC 

SETUPSUB 

INITIALIZE. 

0170 

REF 

33 

LAST 

226 

10,7534 

4 

5503 

0 


CS 

TWO 

PUT OUT 2- AND ADVANCE TO NEXT GYRO. 

0171 

REF 

3 

LAST 

229 

10*7535 

0 

66 3 1 

0 


TC 

0UT2SUB 


017? 

REF 

2 

LAST 

229 

10*7536 

0 

7512 

0 


TC 

GYROADVS 


0173 

ReF 

93 

LAST 

229 

10,7537 

6 

4516 

1 

neggouts 

AD 

one 

GET ABS OF COMMAND AND SAVE IN OVCtR, 

0174 

REF 

41 

LAST 

229 

10*7540 

5 

0034 

0 


TS 

OVCTR 


0175 

REF 

34 

LAST 

229 

10,7541 

3 

5503 

1 


CAP 

TWO 

PUT OUT 2+ BEFORE NEGATIVE PULSE TRAIN. 

0176 

REF 

4 

LAST 

229 

10,7542 

0 

6631 

0 


TC 

0UT2SUB 


0177 

REF 

2 

LAST 

229 

10,7543 

0 

7672 

0 


TC 

GETDT 

Compute waitlist delta t. 

0 1 7P 

REF 

6 

LAST 

2 O 9 

10*7544 

3 

5362 

0 


CAF 

Seven 

PUT IN A delay to ALLOW 2+ PULSES 

0179 

ref 

204 

LAST 

229 

10,7545 

1 

0000 

0 


CCS 

A 

ENOUGH TIME TO GET OUT (3 PULSE TIMES), 

0180 





10,7546 

0 

7545 

1 


TC 

♦*1 


0181 

REF 

42 

LAST 

229 

10,7547 

4 

0034 

1 


CS 

OVCTR 

PUT OUT negative COMMAND. 

0182 

REF 

5 

LAST 

229 

10*7550 

0 

6631 

0 


TC 

0UT2SUB 


0183 

ref 

4 

LAST 

229 

10,7551 

3 

0032 

0 


XCH 

LPRUPT 

ChLL WAITLIST For task due when PULSE 

0184 

REF 

27 

LAST 

229 

10*7552 

0 

2173 

0 


TC 

WAI TLIST 

TRAIN COMPLETE. 


Ab^&7BA YUL SYSTEM FDR AGC4; REVISION 0 OF PROGRAM SOLRUM55 BY 
L IRIG PULSE-TORQUINo ROUTINES 


OltiS REF 3 LAST 229 
0186 REF 20 LAST 229 


10,7563 21512 I 

10,755A 0 225b 1 


C AOR 
TC 


NASA 1021108-021 


DEC A. 1966 


(MAIN) PAGE 230 


USER'S OWN PAGE NO. 7 


GYROADVS 

TASttOVER 



r 


I 


*i - 




^b4Jv78A YUU system PDR AGC4; KEViSlUN 0 Of P^JGRAm SOLRUM55 BY 


L IRIG PULSe-TORQUING routinkg 


P01d7 



WAITLIST 

tasks 

OlbB 

ref 

3 

LAST 

229 

10 

0189 

ref 

35 

LAST 

229 

10 

0190 

REF 

6 

LAST 

229 

10 

0191 

REF 

18 

LAST 

229 

10 

0192 

REF 

11 

LAST 

176 

10 

0193 

REF 

205 

LAST 

229 

iO 

019A 





10 

0195 

REF 

1 



10 

01 96 

REF 

8 

LAST 

229 

10 

0197 

REF 

5 

LAST 

229 

10 

0198 





10 

0199 

REF 

19 

LAST 

231 

10 

0200 

ref 

A 

LAST 

231 

10 

0201 

REF 

A 

LAST 

229 

10 

0202 





10 

0203 

REF 

1 



10 

020A 

REF 

I 



10 

0205 

REF 

I 



10 

0206 

ReF 

5 

LAST 

231 

10 

0207 





10 

0208 

REF 

1 



10 

0209 

REF 

1 



10 

0210 

REF 

1 



10 

0211 

REF 

1 



10 

0212 

ref 

6 

LAST 

231 

10 

0213 





10 

021a 

REF 

1 6 

LAST 

222 

10 

0215 

REF 

7 

LAST 

231 

10 

0216 

REF 

1 



10 

0217 

REF 

28 

LAST 

229 

10 

0218 

REF 

2 

LAST 

227 

10 

0219 

REF 

21 

LAST 

230 

10 


TD SEND OUT DP PULSE TRAINS TO 


7555 

0 

770A 

0 

TWEAKGY 

TC 

7556 

A 

5503 

0 


CS 

7557 

0 

6631 

0 


TC 

7360 

A 

06 77 

0 

GYROADV 

CS 

7561 

7 

A720 

1 


MAS< 

7562 

2 

0000 

3 


INDEX 

7563 

0 

7562 

1 


TC 

756A 

0 

7715 

0 


TC 

7565 

3 

AA75 

3 


caf 

7566 

6 

A3A0 

1 


AD 

7567 

A 

OOOO 

0 


CD^ 

7570 

5 

067 7 

1 


T5 

7571 

0 

770A 

0 

DOGYRO 

TC 

7572 

2 

06A1 

0 


INDEX 

7573 

1 

0000 

0 


^ ^ D 

7 57A 

0 

7605 

0 


TC 

7575 

0 

75 7 J 

0 


TC 

7 576 

0 

7615 

1 


TC 

7577 

2 

06 A 1 

0 

DOMINOR 

index 

7600 

1 

0001 

1 


CCS 

7601 

0 

76A0 

1 


TC 

7602 

0 

7556 

0 


TC 

7603 

0 

7650 

0 


TC 

760A 

0 

7560 

0 


TC 

7605 

2 

06 A 1 

0 

DOPOSMAX 

INDEX 

7606 

5 

0000 

1 


T5 

7607 

3 

AA76 

0 


CAF 

7610 

0 

6631 

0 

DOMAX 

TC 

7611 

3 

77A0 

0 


CAF 

7612 

0 

2173 

0 

gyrowait 

TC 

76 i i 


21571 

1 


cadr 

761A 

0 

2256 

1 


TC 


(MAIN) page ^31 


NASA 102110B-021 DEC At 1966 


USER'S OWN page no. 8 


the gyros, 

SlTUPSUB 

TWO 

OUT2SUB 

CDUIND 
LOW 7 
A 

-1 

ENDGYROl 

SIX 

NEG2 

CDUIND 

SETUPSUB 

RUPTREG3 

0 

DOPOSMAX 
DOM 1 NOR 
DUNEGMAX 

RUPTRE^a 

1 

POSGOUT 
TWEAKGY +1 
NE6GOUT 
GYROADV 

RUPTREG3 

0 

POSMAX 

OUT2SUB 

FULLDT 

rtAITLlST 

DOGYRC 

TASKOVER 


finished with positive trains to a gyro, 

SEND OUT 2- TO LEAVE GYRO IN - STATE. 


advance To the next GYRO IN ORDER YZX. 

BIT lA IS I IF 2+ PULSES HAD BEEN SENT 

before a negative command. 


(UAME HERE FROM TC WITH C(A)s4.) 


Service gyro whose ^number* is in cduind 
MAJOR part is POSMAX COUNT. 

PUT OUT POSMAX, 


send out remainder of command. 


FINISHED WITH LONG + PULSE TRAIN. 

DUNE WITH LONG - TRAIN OR ZERO INPUT. 
PUT away DECREMENTED PoSMAX CQUNt. 


^B^t‘j70A yuL System for Acc^t; revision o of- ^rogRAm solrumss by 


L IRIG PULSe-TORQUING ROUTINES 


0220 





10*7615 

4 

0000 

0 

donegmax 

COM 

0221 

REF 

7 

LAST 

231 

10*7516 

2 

0641 

0 


INDEX 

0222 





10*761 f 

5 

0000 

1 


TS 

0223 

REF 

20 

LAST 

231 

10 * 7620 

4 

067? 

0 


cs 

022A 

REF 

5 

LAST 

147 

10,7621 

7 

4520 

0 


MAs< 

0225 

REF 

0 

LAST 

178 

10*7622 

6 

4501 

1 


AD 

0226 





10*7623 

4 

0000 

0 


COM 

0227 

REF 

21 

LAST 

232 

10,7624 

3 

067/ 

1 


XCM 

0228 

REF 

9 

LAST 

232 

10,7625 

? 

4501 

0 


MA5< 

0229 

REF 

206 

LAST 

231 

10,762e> 

1 

OuOO 

0 


CCS 

0230 





10,762 t 

0 

7631 

1 


TC 

0231 

REF 

1 



10,7630 

0 

7636 

0 


TC 

0232 

REF 

36 

LAST 

231 

10,7631 

3 

5503 

1 


cAf 

0233 

REF 

8 

LAST 

231 

10,7 632 

0 

6631 

0 


TC 

0234 

REF 

37 

LAST 

232 

10,7633 

3 

5503 

1 


CAP 

0235 

REF 

207 

LAST 

232 

10,7 63*+ 

1 

0000 

0 


CCS 

0236 





10,7635 

0 

7634 

1 


TC 

0237 

REF 

17 

LAST 

231 

10,7636 

4 

4476 

1 

NEGMAX2 

CS 

0238 

REF 

1 



10*763? 

0 

7610 

1 


TC 

0239 

REF 

94 

LAST 

229 

10*7640 

6 

4516 

1 

P05G0UT 

AD 

0240 

REF 

43 

LAST 

229 

10*7641 

5 

0034 

0 


TS 

0241 

REF 

9 

LAST 

232 

10*7642 

0 

6631 

0 


TC 

0242 

REF 

3 

LAST 

229 

10*7643 

0 

7672 

0 


TC 

0243 

REF 

5 

LAST 

229 

10*7 644 

3 

0032 

0 


XCH 

0244 

REF 

29 

LAST 

231 

10,7645 

0 

2173 

0 


TC 

0245 

REF 

2 

LAST 

231 

10,7 646 

21555 

1 


CADR 

0246 

REF 

22 

LAST 

231 

10,7647 

0 

2256 

1 


TC 

0247 

REF 

95 

LAST 

232 

10*7650 

6 

4516 

1 

NEGOOUT 

AD 

0248 

REF 

44 

LAST 

232 

10,7651 

5 

0034 

0 


TS 

0249 

REF 

22 

LAST 

232 

10,7652 

4 

06 7 ? 

0 


CS 

0250 

REF 

10 

LAST 

232 

10,7653 

7 

4501 

0 


V1AS< 

0251 

REF 

208 

LAST 

232 

10,7654 

1 

0000 

0 


CCS 

0252 

REF 

1 



10,7655 

0 

7663 

0 


TC 

0253 

REF 

38 

LAST 

232 

10*7656 

3 

5503 

1 


CAP 

0254 

REF 

10 

LAST 

232 

10,765? 

0 

6631 

0 


TC 

0255 

REF 

7 

LAST 

229 

10*7660 

3 

5362 

0 


CAF 

0256 

ref 

209 

LAST 

232 

10*7661 

1 

0000 

0 


5 

0257 





10*7662 

0 

7661 

1 



0258 

REF 

4 

LAST 

232 

10*7663 

0 

7672 

0 

NEGG0UT2 

TC 

0259 

REF 

45 

LAST 

232 

10*7 664 

4 

0034 

1 


CS 

0260 

REF 

11 

LAST 

232 

10,7665 

0 

6631 

0 


T C 

0261 

REF 

6 

LAST 

232 

10*7666 

3 

0032 

0 


XCH 

0262 

REF 

30 

LAST 

232 

1 0 * 7 6 6 7 

0 

2173 

0 


TC 


NASA 1021108-021 
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USER'S OWN page no, y 

RUPTREG3 

0 

CDUIND 

NEGI/2 

BIT14 

decremented POSMAX (NEGMAX) COUNT. 

StE IE 2+ PULSES HAVE BEEN PUT OUT YeT, 

leaving word that They will be out 
bY taskover time. 

CDUIND 

B1T14 

A 

*Z 

NEGMAX2 

ALREADY OUT. 

Tl«0 

Nut out yet - DO SO. 

0UT2SUB 

T^O 

A 

-1 

POSMAX 

DOMAX 

WAIT FOR them to get OUT BEFORE DELIVER- 
ING THE REAL COMMAND. 

ONE 

fractional POSITIVE COMMAND. 

OVCTR 

0UT2SUB 

GETDT 

LPRUPT 

DELIVER COMMAND, 

GET TIME TO END OF PULSE TRAIN. 

(answer left in LPRUPT). 

V^AITLIST 

TWEAKGY 

TASKOVER 

SUPPLY 2- PULSES AT END. 

ONE 

FRACTIONAL NEGATIVE COMMAND. 

OvCTR 

CDUIND 

B1T14 

A 

NEGG0UT2 

T^O 

0UT2SUB 

SEE IF 2+ PULSES ALREADY OUT. 

SEVEN 

A 

-1 

ALLOW AT LEAST 3 PULSE TIMES FqR THE 2+ 
PULSES TO GET OUT. 

GLTDT 

OVCTR 

deliver COMMAND, 

0UT25UB 

LPRUPT 

WAITLIST 

GET WAITLIST DT LEFT BY GEIDT . 


4B<t578A YUL SYSTEM FOR AGC4: REVISlUN 0 OF PROGRAM SOLRUM^S 8Y 


L IRIG PULSE-TOROUING ROUT^ES 


0263 REF 2 LAST 231 
026A REF 23 LAST 232 


10,7670 21S60 1 

10,76n 0 2256 1 


CADR 

TC 


NASA 1021108-021 


DEC A , 1^66 


(MAIN) PAGE 233 


USER'S OWN PAGE NO. 10 

GYROADV 

taskover 


YUL SYSTEM FOR AGCA; REVISION 0 Of PROGRAM SOLRUMSS BY 


L IRiG PULSe-TORUUINS ROUflMLo 


P02s5 


subroutines used BY TASKS. 


0266 

REF 

16 

LAST 

222 

1 0 » 7 6 7 2 

3 

0003 

1 getdt 


0267 

REF 

7 

LAST 

232 

10»7673 

S 

0032 

0 

TS 

0268 

REF 

14 

LAST 

209 

10,7674 

3 

4b05 

0 

CAF 

0269 





10,7673 

2 

5777 

1 

extend 

0270 

REF 

46 

LAST 

232 

10,7676 

4 

0034 

1 


0271 

REF 

39 

LAST 

232 

10,767 / 

6 

5503 

1 

AD 

0272 

REF 

8 

LAST 

234 

10,770U 

3 

0032 

0 

XCH 

0273 





10,7701 

2 

577 / 

1 

EXTEND 

027A 

REF 

96 

LAST 

232 

10,7702 

4 

4516 

0 

MP 

02 75 

REF 

139 

LAST 

228 

10,7703 

0 

0001 

0 

TC 


0276 

REF 

81 

LAST 

226 

10,7704 

3 

5501 

0 

SETUPSUB 

CAF 

0277 

REF 

21 

LAST 

208 

10,7705 

5 

0640 

0 


TS 

02 ^8 

REF 

23 

LAST 

232 

10, 7706 

4 

0677 

0 


CS 

0279 

REF 

12 

LAST 

231 

10,7707 

7 

4720 

1 


MASK 

02fcD 

REF 

16 

LAST 

206 

10,7710 

5 

06 37 

0 


TS 

0281 





10,7711 

6 

0000 

1 


DOjaLE 

0282 

REF 

7 

LAST 

228 

10,7712 

6 

0764 

1 


AD 

0283 

REF 

8 

LAST 

232 

10,7713 

5 

0641 

1 


TS 

0284 

REF 

140 

LAST 

234 

10,771*, 

0 

0001 

0 


TC 

0285 

REF 

97 

LAST 

234 

10,7715 

3 

4516 

1 

ENDGYROl 

CAF 

0286 

REF 

31 

LAST 

232 

10,7716 

0 

2173 

0 


TC 

0287 

REF 

2 

LAST 

229 

10,771/ 

21721 

0 


cadr 

0288 

REF 

24 

LAST 

233 

10,7720 

0 

2256 

1 


TC 

0289 

ref 

82 

LAST 

234 

10,7721 

3 

5501 

0 

ENDGYRO 

CAP 

0290 

REF 

8 

LAST 

234 

10,7722 

5 

0764 

1 


TS 

02901 

REF 

10 

LAST 

206 

10,7723 

3 

0007 

0 


xCH 

02902 

REF 

11 

LAST 

234 

10,7724 

3 

0007 

0 


XCH 

02903 

REF 

1 



10,7725 

7 

7737 

1 


MASK 

02904 

REF 

210 

LAST 

232 

10,7726 

1 

0000 

0 


CCS 

02905 

ref 

83 

LAST 

234 

10,772 7 

4 

5501 

1 


C5 

02906 





10,7730 

4 

0000 

0 


COM 

02907 

REF 

24 

LAST 

234 

10,7731 

5 

0677 

1 


TS 

0291 

REF 

1 



10,7732 

3 

7736 

1 


CAF 

0292 

REF 

4 

LAST 

213 

10,7733 

0 

2060 

0 


TC 

0293 

ref 

3 

LAST 

210 

10,7/34 

0 

5720 

1 


TC 

0294 

ref 

3 

LAST 

196 

10,7735 


30171 

0 


CA DR 

0295 

REF 

2 

Last 

228 

10,7736 


31533 

0 

lne^^gyro 

CADR 

02955 





10,7737 


00122 

0 

OCT122 

DCT 

0296 





10,7740 


01001 

1 

FULLOT 

DEC 


fl 





iASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 23A 


USER'S Ot(N page no, U 


LP 

LpRUPT 

BITIO 

OVCTR 

TWO 

LPRUPT 

COMPUTE number OF 10 MS TICKS IT WILL 

TAKE the pulse TRAIN WHOSE MAGNITUDE IS 
IN OVCTR TO BE DELIVERED AT A RATE OF 
3200 PPS. 

Interrupt and round-off uncertainties. 

LEAVE answer IN LPRUPT. 

ONE 

Q 


ZERO 

RUPTREG2 

CDUIND 

LOW? 

ruptregi 

SETS UP Miscellaneous registers. 

used by 0UT2SUB, 

KILL 2+ BIT. 

LGYRO 

RUPTREG3 

0 

used for indexing gyrod set. 

ONE 

waitlist 

LNDGYRO 

taskover 

SPLIT INTO TWO TASKS SO IT wONT LAST TOO 
LONG IN any ONE INTERRUPT, 

zero 

LGYRO 

SHOW THAT the GYROS ARE NOW AVAILABLE. 

IN3 

1N3 

0CT122 

A 

ZERO 

CDUIND 

RlSTORE CDUIND 

BY CHECKING IMU MODE 

Imucoars, imuattc, imureent mask 

To +0 IF MODES ACTIVE 

TO -0 IF INACTIVE 

LNE^GYRO 

JOBwAkE 

Wake up any job which might be waiting 

FUR THE gyros (AT MOST ONE). 

POST JUMP 
ImUFINED 

Return to end i mu sequence in main mode 

bank (CHECKS iMU AND CDU FAIL SIGNALS), 

NEWGYRO 

12? 

5.13 E 2 

Standard sleeping location for gyrobusy. 






t ft 


YUL SYSTEM FOH AGCA; REVISION 0 Of- PROGRAM SoLRUMSS BY NASA 102U08-02L 


UEC A, 1966 (MAIN) PAGE 235 


L extended verbs for MODING 

ROOOl Verb please PeREORM and verb please mark flash should be turned on 

R0002 IFLASHON) BY ROUTINE PASTING EITHeR UP. FLASH IS TURNED OFF BY ENTER OF 
R0003 PLEASE PERFORM* OR ENTER OF PLEASE MARK, 

ROOOA BOTH FLASHON AND FLASHOFF MUST NOT BE USED IN INTE-^RUPTeD STATE. 

R0005 PLEASE PERFORM VERB AND PLEASE MARK VERB 

ROOOe PRESSING enter INDICATES ACTION REQUESTED HAS 

Rood? been performed* and does same recall as a completed load, operator 

ROOU8 should Do Verb proceed without data if wishes not to perform the 

R0009 requested ACTION. 


ROC) 10 

fan- 

OUT 




0011 






0012 






A00L3 






AOOIA 






0015 

ref 

1 



05,6000 

0016 

REF 

1 



05,6001 

A0017 






0018 

REF 

1 



05,6002 

0019 

REF 

1 



05,6003 

0020 

REF 

1 



05 , 6004 

0021 

REF 

1 



05,6005 

0022 

ref 

1 



05,6006 

0023 

REF 

1 



05,6007 

002A 

REF 

1 



05,6010 

0025 

REF 

2 

last 

235 

05,6011 

0026 

REF 

1 



05,6012 

0027 

ref 

L 



05,6013 

0026 

REF 

1 



G5,60U 

0029 

ref 

1 



05,6015 

0030 

REF 

1 



05,6016 

0031 

REF 

1 



05,6317 

0032 

REF 

1 



0 5 , 6 02u 

0033 

REF 

1 



05,6021 

003^ 





05,6022 

0035 





05,6023 

0036 





05,6024 

0037 





05,6025 

0038 





05,6026 

0039 





05,6027 

OOAO 

REF 

2 

last 

235 

05,6030 

0041 

REF 

1 



05,6031 

00^2 

REF 

1 



05,6032 


05,6000 SETLOC 12000 

05,6000 PINTEST EOJALS 


0 

6077 

1 L5T2FAN 

TC 

VbZERO 

0 

6102 

1 

TC 

VbCOARK 

0 

6220 

1 

TC 

IMUFINEK 

0 

6253 

0 

TC 

IMULOCKK 

0 

6262 

1 

TC 

imuattck 

0 

6316 

0 

TC 

IMUREENK 

0 

6352 

0 

TC 

IMUCORK 

0 

6075 

0 

TC 

alm/end 

0 

6437 

1 

TC 

GOLOADLV 

0 

6437 

1 

TC 

GOLOADLV 

0 

6415 

1 

TC 

DOMKREJ 

0 

6444 

0 

TC 

RELO/IK 

0 

6454 

1 

TC 

TOROGYRS 

0 

6502 

0 

TC 

AL INTI ME 

0 

7014 

0 

TC 

GOSHOSUM 

0 

6752 

1 

TC 

SYSTEST 

0 

6545 

0 

TC 

prestano 

0 

6652 

0 

TC 

ROSTAND 

3 

0000 

1 

NDOP 


3 

0000 

1 

NOOP 


3 

0000 

1 

NOOP 


3 

0000 

1 

\00P 


3 

0000 

1 

NOOP 


3 

0000 

1 

NOOP 


0 

6075 


ric 

ALM/END 

0 

6043 

0 / 

TC 

71JJMPT0 

0 

6045 

0 

TC 

AbRTJPTO 



USER'S OWN page no. 1 


TtilS MUST = 05,6000 FOR PINBALL 

verification, do Not move without 
Informing alan green. 

VbaO 2ER0{USE0 with noun ICDU or OCOU) 

VbAl coarse ALIGN(USED WITH NOUN ICDU 

or OCDU) 

VoA2 FINE align IMU 
VbA3 lock IMU 

VbAA SET IMU TO ATTITUDE CONTROL 
Vb^5 SET IMU TO RE-ENTRY CONTROL 
Vb46 RETURN IMU TO COARSE ALIGN 
VBA7 optical tracker ONfNOT IN USE YeT) 
VB50 PLEASE PERFORM 
Vb5l PLEASE MARK 

VB52 MARK reject (UNTIL BUTTON AVAIL,) 
VV53 FREE (USED WITH NOUN ICDU OR OCDU) 

Vb5A PULSE TORQUE GYROS 
Vd55 align TIME 
Vb56 PERFORMS BANKSuM 
Vb57 DO SYSTEM TEST 
Vb60 PREPARE FOR STANDBY 
Vb6l RECOVER from STANDBY 

Illegal verb. 

Illegal verb. 

Illegal verb. 

Illegal verb. 

ILLEGAL VERB, 

Illegal verb, 

VERB n is tffmin update 

VERB 72 aborts 


^b^»b78A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUMS5 3Y 


L 


EXTENDED VERBS FOR MOOING 


0043 





05 

*6033 

3 

0000 

1 


NOOP 

00‘*4 

REF 

3 

LAST 

235 

05 

*6 034 

0 

6075 

0 


TC 

0045 

REF 

1 



05 

*6 035 

0 

7016 

1 


TC 

0046 

REF 

1 



05 

*6 036 

0 

6041 

1 


TC 

0047 

REF 

4 

last 

234 

05 

*6037 

0 

5720 

1 


TC 

0048 

REF 

1 



05 

*6040 

26761 

0 


CADR 

00481 

REF 

5 

LAST 

236 

05 

*6041 

0 

5720 

1 

76JUMPT0 

TC 

00482 

REF 

1 



05 

♦ 6042 

26 753 

1 


CAOR 

004B3 

REF 

6 

LAST 

236 

05 

♦ 6043 

0 

5720 

1 

71JUMPT0 

1 C 

00484 

REF 

1 



05 

*6044 

26757 

0 


CAOR 

00485 

REF 

7 

LAST 

236 

05 

*6045 

0 

5720 

1 

ABRTJPTO 

TC 

00486 

REF 

2 

LAST 

129 

05 

*6046 

64477 

1 


CAOR 

0049 

ref 

5 

LAST 

169 

05 

*604 1 

3 

45 1 4 

0 

testxact 

CAP 

0050 

REF 

1 



05 

*6050 

7 

0645 

1 


MAS< 

0051 

REF 

211 

LAST 

234 

05 

♦ 6051 

I 

0000 

0 


CCS 

0052 

REF 

1 



05 

*6052 

0 

6062 

0 


TC 

0053 

REF 

6 

LAST 

236 

05 

*6053 

4 

4514 

1 

XACTl 

cs 

0054 





05 

*6054 

2 

0017 

0 


INHINT 

0055 

REF 

2 

LAST 

236 

05 

.6055 

7 

0645 

1 


MASK 

0056 

REF 

7 

LAST 

236 

05 

*6056 

6 

4514 

0 


AO 

0057 

REF 

3 

LAST 

236 

05 

*6057 

5 

0645 

0 


T5 

0058 





05 

*6060 

2 

0016 

1 


REl I NT 

0059 

REF 

141 

LAST 

234 

05 

♦ 6061 

0 

0001 

0 


TC 

OObO 

REF 

2 

LAST 

124 

05 

*6062 

0 

3233 

0 

XACTALM 

TC 

0061 

REF 

17 

LAST 

223 

05 

*6063 

0 

2124 

1 


TC 

0062 

REF 

2 

LAST 

210 

05 

*6064 

0 

3362 

0 

TERMEXTV 

TC 

0063 

REF 

1 



05 

*6065 

0 

6067 

0 

ENDEXTVB 

TC 

0064 

REF 

18 

LAST 

236 

05 

* 6 066 

0 

2124 

1 


TC 

0065 

REF 

8 

LAST 

236 

05 

*606/ 

4 

4514 

1 

XACTO 

cs 

0066 





05 

*6070 

2 

0017 

0 


I NH 1 nt 

0067 

REF 

4 

LAST 

236 

05 

*6071 

7 

0645 

1 


MASK 

0068 

REF 

5 

LAST 

236 

05 

♦ 6072 

5 

0645 

0 


T5 

0069 





05 

♦ 6073 

2 

0016 

1 


R E L I N T 

0070 

REF 

142 

LAST 

236 

05 

*6074 

0 

0001 

0 


TC 


0071 

007? 


REF 

REF 


3 last 2 
I 


05 »607S 
05*6076 


0 3233 0 
0 6065 1 


ALM/END 


T 

T 


0073 
00 7 A 


REF 

REF 


1 

1 


05*6077 

05*6100 


0 6105 0 
0 6126 1 


vbzero 


TC 

TC 


ASA 1021108-021 


Dec 4, 


1966 


(MAIN) PAGE 236 


ALM/END 

EXTRAI/0 

76JUMPT0 

POSTJUMP 

77UPDATE 

PDSTJUMP 

76UPDATE 

POSTJUMP 

71 UPDATE 

POSTJUMP 

ABORTRPT 

BiT3 

EXTVBACT 

A 

XACT ALM 
B1T3 

EXTVBACT 

BIT3 

EXTVBACT 

U 

TALION 

endofjob 


freedsp 

XACTO 

ENDOFJOB 

BIT3 

EXTVBACT 

EXTVBACT 

Q 


USER'S OWN page NO* 2 
ILLEGAL VERB. 

Vb75 manual INPUT/OUTPUT OPTIONS, 
VtRB 76 IS state vector UPDATE 
VERB 77 IS L/0 TIME UPDATE 


IP WE GET A TERMINATE INSTEAD OF A LOAD. 


1 ALTON 

lndextvb 



Op /INERT 
IMUZER0< 


Return hlre if noun = icdu(20) 


^a^b76A YUL SYSTEM FOR AGC<t: REVISION 0 OF PROGRAM SOLRUM55 


L EXTENDED VERBS FOR 


0075 

A0076 

ref 

A 

LAST 

236 

0077 

REF 

2 

LAST 

236 

0078 

REF 

1 



0079 

REF 

1 




MOD I No 


05*6101 0 6075 0 TC 

05»6102 0 6105 0 VBCOARK K 

05*6103 0 61A2 0 TC 

05*610A 0 6367 0 TC 


BY NASA 1021108-021 


l966 


(MAIN) page 237 


ALM/END 


OP/INERT 

lMUCOAR< 

DPTCOARX 


DEC A, 

USER'S OWN PAGE NO 

RETURN HERE IF NOUN 

(NOT IN USE 

return here if noun 

RETURN HERE IF NOUN 


3 

= 0CDU{S5) 
YET) 


= ICDU{20) 
= 0CDU(55) 


yul System for Acc^tr revision o of program solrumss by nasa 1021108-021 


DEC A, 1966 


(MAIN) page 23B 


L extended verbs for MODING 


P0080 


subroutine 

FOR Check 

0081 

REF K3 

LAST 

236 

05 »6i05 

0082 

REF 1 



05»6106 

0083 

REF 1 



05 f 6107 

008A 

REF 2 

LAST 

lAa 

05,6110 

0085 

REF 212 

LAST 

236 

05,6111 

0086 




05,6112 

0087 




05,6113 

0088 

REF 5 

LAST 

237 

05,6119 

0089 

REF 2 

LAST 

238 

05,6115 

0090 

REF 1 



05*6116 

0091 

REF 3 

LAST 

238 

05,6117 

0092 

REF 213 

LAST 

238 

05,6120 

0093 

REF 6 

LAST 

238 

05,6121 

009A 




05,6122 

0095 

REF 7 

LAST 

238 

05,6123 

0096 

REF 3 

LAST 

238 

05,6129 

0097 




05,6125 


NG GIVEN NOUN IF APPROPRIATE. 


3 0001 

0 

op/inert 

XCH 

Q 

5 OlOb 

0 


TS 

WDRET 

9 6113 

0 


C5 

NNICDU 

6 0603 

1 


AD 

nounreg 

1 0000 

0 


CCS 

A 

U 6116 

1 


TC 

+ 9 

00020 

0 

NNICOU 

DCT 

20 

0 6075 

0 


TC 

alm/end 

0 0106 

0 


TC 

WDRET 

9 6122 

1 


cs 

NNOCDU 

6 0603 

1 


AD 

NOUNREG 

1 0000 

0 


CCS 

A 

0 6075 

0 


TC 

ALM/END 

00055 

1 

NNOCDU 

DCT 

55 

0 6075 

0 


TC 

ALM/END 

2 0106 

1 


INDEX 

WDRET 

0 0001 

0 


TC 

1 


USER’S OWN page NO, 


RETURNS TO L+1 IF NOUN= iCOU ( 20 » 

returns To l*2 if Noun = ocoutss) 

ALARMS IF ANY OTHER NOUN 


Nn G/ 20 

Nu L/ 20 
NN s 20 


Nn G/ 55 

Nn L/ 55 
Nn = 55 







i 





i*'- 

















A8^1)78A 

yul 

SySTtfv^ FOR Agc^ 

; REVISION 

0 OF program SOLRUm55 BY 

NASA 1021108-021 

Dec 9 * 

1966 

(MAIN) 

L 

extended 

verbs for 

MOOING 






U5ER*S O^N page 

NO. 

5 

P0098 

KEYBOARD 

REQUEST TO 

ZERO IMU 

ENCODERS 








0099 

REF 

1 



05»6126 

0 6097 

1 

IMUZEROK 

TC 

TESTXACT 

ZERO encoders. 



0100 

REF 

6 

LAST 

226 

05*6127 

0 5659 

0 


TC 

BANKCALL 




0101 

REF 

1 



05t6130 

30000 

1 


caor 

IMUZERO 




0102 

ref 

7 

LAST 

239 

05i613l 

0 5659 

0 


TC 

BANKCALL 

STALL 



0103 

REF 

2 

LAST 

221 

05*6132 

30331 

0 


CADR 

imustall 




OlOif 





05 *6133 

0 6139 

1 


TC 

♦ 1 




0105 





05*6139 

2 0017 

0 

ENDMZERO 

I NHINT 





0106 

REF 

A 

LAST 

192 

05*6135 

9 5070 

1 


CS 

ZLITBITS 

TURN OFF zeroing 

LIGHT 

TO SHOW 

0107 

REF 

55 

LAST 

200 

05*6136 

7 0723 

0 


MASK 

DSPTAB +11D 




0106 

REF 

13 

LAST 

192 

05*613/ 

6 9500 

0 


AD 

B1T15 




0109 

REF 

56 

LAST 

239 

05*6190 

5 0723 

1 


TS 

DSPTAB +11D 




0110 

REF 

2 

LAST 

236 

05*6lHl 

0 6065 

1 


TC 

ENDEXTVB 





page 


^♦b^bTaA YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM 50LRUMS5 BY 


L extended verbs F*0R moding 


Poll I keyboard request to coarse align the imu 


0112 

REF 

2 

LAST 

239 

05*6142 

0 

6047 

1 

IMUCOARK 

TC 

0113 

REF 

2 

LAST 

210 

05*6143 

0 

3302 

0 


T C 

0114 

REF 

2 

LAST 

210 

05 * 6 1 44 

0 

3310 

0 


TC 

0115 

REF 

1 



05*6145 

3 

6165 

0 


C A F 

0116 

REF 

4 

LAST 

212 

05*6146 

0 

3100 

0 


TC 

0117 

REF 

2 

LAST 

211 

05*6147 

0 

3315 

0 


TC 

0118 

ref 

2 

LAST 

211 

05*6150 

0 

3136 

0 


rc 

0119 

REF 

1 



05*6151 

0 

6064 

0 


TC 

0120 

REF 

1 



05*6152 

0 

6167 

1 


TC 

0121 

REF 

1 



05*6153 

3 

6166 

0 

1 CORK 2 

CAF 

0122 

REF 

5 

LAST 

240 

05*6154 

0 

3100 

a 


TC 

0123 

REF 

3 

LAST 

240 

05*6155 

0 

3315 

0 


TC 

0124 

REF 

3 

LAST 

236 

0 5 ♦ 6 1 5 6 

0 

3362 

0 


TC 

0125 

REF 

8 

LAST 

239 

05*6157 

0 

5654 

0 


TC 

0126 

REF 

I 



05*6160 


30104 

1 


CAOR 

0127 

REF 

9 

LAST 

240 

05*6161 

0 

5654 

0 


TC 

0128 

REF 

3 

LAST 

239 

05*6162 


303 31 

0 


CAOR 

0129 

REF 

3 

LAST 

239 

05*6163 

0 

6065 

1 


IC 

0130 

REF 

4 

LAST 

240 

05*6 164 

0 

6065 

1 


TC 

0131 





05 *6165 


02522 

0 

VNLODCDU 

OCT 

0132 





05*6166 


04100 

1 

IMUCOARV 

OCT 


NASA 1021108-021 


DEC 4, 1966 


(MAIN) PAGE 240 



USER'S OWN page no. 6 

lESTXACT 

GRABDSP 

CuARSE ALIGN FRqM KEYBOARD. 

PREGBSY 

VNLODCDU 

NVSUB 

CALL FOR THETAD LOAO 

PRENVB5Y 

LNDIDLE 

TERMEXTV 

STALL waiting FoR THE LOAD 

ICSDEL 

PROCEED - ASK FOR INCREMENTAL LOAO 

IMULOARV 

NvSUB 

Rt-DISPLAY COARSE ALIGN VERB, 

PkENVBSY 

FREE05P 

RELEASE THE DISPLAYS 

BANKCALL 

IMUCOARS 

CALL MODE SWITCHING PROG 

BANKCALL 

IMUSTALL 

LNDEXT VB 
ENDEXTVB 

STALL 


02522 

04100 




P01i3 

013 ^ 

0136 

0137 
0130 

0139 

0140 

0141 

0142 

0143 
0 1 <+4 

0145 

0146 

0147 
0146 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 

0158 


YUL SYSTEM FOR AGC4; REVISION 0 OE PROGRAM 50LRUM55 BY 


extended verbs for M0DIN5 

PROVISION FOR COARSE ALIGN TO INCREMENTAL ANG 


REF 

1 



05*6167 

3 

6216 

1 

ICSDEL 

CAF 

ref 

6 

LAST 

240 

05*6170 

0 

3100 

0 


TC 

REF 

4 

LAST 

240 

05*6171 

0 

3315 

0 


TC 

REF 

3 

LAST 

240 

05*6172 

0 

3136 

0 


TC 

REF 

2 

LAST 

240 

05*6173 

0 

6064 

0 


TC 

ref 

1 



05 *6 W4 

0 

6153 

0 


TC 

Ref 

1 



05*6173 

0 

6177 

0 


TC 

ref 

2 

LAST 

241 

05*6176 

0 

6153 

0 


TC 

ref 

144 

LAST 

238 

05*6177 

3 

0001 

0 

INCLOOP 

XCH 

ref 

244 

LAST 

22b 

05*6200 

5 

0115 

1 


T5 

ref 

1 



05*6201 

3 

6217 

0 


CAF 

ref 

104 

LAST 

227 

05*6202 

5 

0077 

1 


T5 

REF 

40 

LAST 

234 

05*6203 

3 

5503 

1 


CAF 

REF 

245 

LAST 

241 

05*6204 

5 

0116 

1 

INCL00P2 

T5 

REF 

214 

LAST 

238 

05*6205 

2 

0000 

0 


I NDEX 

REF 

3 

LAST 

210 

05*6206 

3 

0cp21 

1 


XCR 

REF 

10 

LAST 

240 

05*6207 

0 

5654 

D 


TC 

REF 

1 



05*6210 


30361 

0 


CAOR 

REF 

105 

LAST 

241 

05*6211 

1 

0077 

0 


CCS 

REF 

106 

LAST 

241 

05*6212 

5 

0077 

1 


IS 

REF 

246 

LAST 

241 

05*6213 

1 

0116 

0 


CCS 

REF 

1 



05*6214 

0 

6204 

1 


TC 

ref 

247 

LAST 

241 

05*6215 

0 

0115 

1 


TC 





05*6216 


02523 

1 

DELLOAD 

DCT 

REF 

11 

last 

195 

05*6217 


00702 

1 

LTHD+2 

ADRE5 


NASA 1021108-021 


OEC 4, 1966 


(MAIN) page 241 


s 

USER'S OWN PAGE NO* 7 

• 

DELLOAD 

NVSOB 

PRENVBSY 

endidle 

RlQUEST load of DELTA ICDU ANGLES. 

TERMEXTV 

IC0RK2 

INCLOOP 

1C0RK2 

Proceed without data here too. 

Luop TO Increment thetad from dsptemz. 

RE-OISPLAY COARSE ALIGN VERB. 

Q 

MPAC 

Increments thetads in zS complement from 

THREE angle INCREMENTS IN DSPTEMzS, 

LTHD+2 

BUF 

Two 

SET UP FOR CDUINC. 

THREF times THROUGH. 

MPAC +1 

A 

DSPTEM2 

BANKCALL 

CDUINC 

BUF 

BUF 

MPAC +1 
INCL00P2 

Increment to tem2 for cduinc. 

MPAC 

RETURN when FINISHED. 


02523 
THETAD *2 


^b^bTflA YUL SYSTEM FOR AGCA! REVISION 0 Oh PROGRAM SOLRUM55 BV 


L EXTENDEL) VERBS FOR MODING 


P01S9 Keyboard request to fine align and gyro torque imj 


0160 

ReF 

3 

LAST 

2A0 

05*6220 

0 

604 7 

1 

IMUFINEK 

1C 

0161 

REF 

3 

LAST 

240 

05*6221 

0 

3302 

0 


TC 

0162 

REF 

3 

LAST 

240 

05*6222 

0 

3310 

0 


TC 

0163 

REF 

1 



05*6223 

3 

6251 

1 


CAF 

0164 

REF 

7 

LAST 

241 

05*6224 

0 

3100 

0 


rc 

0165 

REF 

5 

LAST 

241 

05*6225 

0 

3315 

0 


TC 

0166 

REF 

4 

LAST 

2A1 

05 * 6226 

0 

3136 

0 


TC 

0167 

REF 

3 

LAST 

241 

05*622/ 

0 

6064 

0 


TC 

016B 





05*6230 

0 

6231 

1 


TC 

0169 

REF 

1 



05*6231 

3 

6252 

1 


CAF 

0170 

REF 

6 

LAST 

242 

05*6232 

0 

3100 

0 


TC 

0171 

REF 

6 

LAST 

242 

05*6233 

0 

3315 

0 


TC 

0172 

REF 

4 

LAST 

240 

05*6234 

0 

3362 

0 


TC 

0173 

ref 

11 

LAST 

241 

05*6235 

0 

5654 

0 


TC 

0174 

REF 

1 



05*6236 


30143 

1 


CAOR 

0175 

REF 

12 

LAST 

242 

05*6237 

0 

5654 

0 


TC 

0176 

REF 

4 

LAST 

ZAO 

05*6240 


30331 

0 


CAOR 

0177 

REF 

5 

LAST 

ZAO 

05*6241 

0 

6065 

1 


TC 

017B 

ref 

1 



05*6242 

3 

6500 

1 


CAF 

0179 

REF 

13 

LAST 

2A2 

05*6243 

0 

5654 

0 


TC 

0180 

REF 

1 



05 » 6244 


31433 

1 


CAOR 

0181 

REF 

14 

LAST 

2A2 

05*6245 

0 

5654 

0 


TC 

Olb2 

REF 

5 

LAST 

2A2 

05*6246 


30331 

0 


CADR 

0183 

REF 

6 

LAST 

2A2 

05*6247 

0 

6065 

1 


TC 

0184 

REF 

7 

LAST 

2A2 

05*6250 

0 

6065 

1 


TC 

0185 





05*6251 


02567 

1 

vnlodgyr 

OCI 

0186 





05*6252 


04200 

1 

IMUFINEV 

DCT 



NASA 1021108-021 


DEC 4, 1966 


(MAIN) PAGE 242 



USER’S OWN PAGE NO. 8 

TESTXACT 

GRA0D5P 

PREGB5Y 

FINE ALIvjN with GYRq TOHQUInG. 

VNLODGYR 

NVSUB 

PRENVBSY 

Call for load of gyro commands 

ENDIDLE 

HOLD UP FOR the DATA LOAD 

TERMEXTV 
+ 1 

PROCEED WITHOUT A LOAD 

IMUFINEV 

NVSUB 

Rt-DISPLAY OUR OWN VERB 

PRENVBSY 

FREEDSP 

RELEASE DISPLAYS 

BANKCALL 

imufine 

CALL MODE SWITCH PROG 

BANKCALL 

IMUSTALL 

HIBERNATION 

ENDEXTV0 

lgyrobin 

BANKCALL 

GYRODPNT 

PINBALL Left commands in OGC REGIST5R5 

BANKCALL 

IMUSTALL 

endextvb 

ENDtXTVB 

WAIT FOR PULSES TO GET OUT. 

02567 

04200 

FINE Align verb 


^b^578A yul System for agc«h revision o of program solrumss by 


L extended verbs for moping 


POlti? keyboard request to lock the imu cdus 


0188 

REF 

A 

LAST 

2A2 

0S*6253 

0 60A7 

1 

IMULOCKK TC 

0189 

REF 

IS 

LAST 

2A2 

05t62SA 

0 56S4 

0 

TC 

0190 

REF 

1 



05*62S5 

3020S 

0 

CAOR 

0191 

REF 

16 

LAST 

2A3 

05»6256 

0 565a 

0 

TC 

0192 

REF 

6 

LAST 

2A2 

0S*62S 7 

30331 

0 

CADR 

0193 

REF 

8 

LAST 

2A2 

05»6260 

0 6065 

1 

TC 

019A 

REF 

9 

LAST 

2A3 

05t626l 

0 6065 

1 

TC 


(MAIN) page 2^*3 


9 


testxact 

BANKCALL 

IMULOCK 

BANKCALL 5 I ALL 

IMUSTALL 

ENDEXTV0 

ENDEXTVB 


NASA 1021108-021 DEC A, 1966 

USER’S OWN page NO. 


4tj4t,78A YUL SYSTEM FOR AGc<t; REViSUM 0 OF PROGRAM SOURUMSS BY 


L extended verbs for MODING 


Poivs 

Keyboard 

' ReOUeSt to 

PUT IMU ! 

[N t 

ATT I t JOE 

control MoOe 

01 V6 

ref 

5 

LAST 

243 

05*6262 

0 

6047 

1 

IMUATTCK 

TC 

U 1 9 7 

ref 

4 

LAST 

242 

05*6263 

0 

3302 

0 


TC 

0198 

REF 

4 

LAST 

242 

05*6264 

0 

3310 

0 


TC 

0199 

REF 

2 

LAST 

241 

05*6265 

3 

62lt> 

1 


C4F 

0200 

REF 

9 

LAST 

242 

05 * 6266 

0 

3100 

0 


TC 

0201 

REF 

7 

LAST 

242 

05*62 6 f 

0 

3315 

0 


TC 

0202 

ref 

5 

LAST 

242 

05*6270 

0 

3136 

0 


TC 

0203 

ref 

4 

LAST 

242 

05*6271 

0 

6064 

0 


TC 

020A 

REF 

1 



05*6272 

0 

6306 

1 


TC 

0205 

ref 

2 

LAST 

241 

05*6273 

0 

6177 

0 


TC 

0206 

REF 

1 



05*6274 

3 

6315 

0 

ATTCK2 

CAF 

0207 

REF 

10 

LAST 

244 

05*6275 

0 

3100 

0 


rc 

0208 

REF 

8 

LAST 

244 

05*6276 

0 

3315 

0 


TC 

0209 

REF 

5 

LAST 

242 

05*62 7 7 

0 

3362 

0 


TC 

0210 

REF 

17 

LAST 

243 

05*6300 

0 

5654 

0 


TC 

0211 

REF 

1 



05*6301 


30223 

1 


CAOR 

0212 

REF 

18 

LAST 

244 

05*6302 

0 

5654 

0 


TC 

0213 

REF 

7 

LAST 

243 

05*6303 


30331 

0 


CADR 

0214 

REF 

10 

LAST 

243 

05 * 6304 

0 

6065 

1 


TC 

0215 

REF 

11 

LAST 

244 

05*6305 

0 

6065 

1 


TC 

R0216 

PROVISIONS FOR ABSOLUTE UoAO 

FOR IMU 

CDUS IN ATT IT JOE 

0217 

ref 

2 

LAST 

240 

05*6306 

3 

6165 

0 

ATTCABS 

CAF 

0218 

REF 

11 

LAST 

244 

05*6307 

0 

3100 

0 


TC 

0219 

REF 

9 

LAST 

244 

05*6310 

0 

3315 

0 


TC 

0220 

REF 

6 

LAST 

244 

05*6311 

0 

3136 

0 


TC 

0221 

REF 

5 

LAST 

244 

05*6312 

0 

6064 

0 


TC 

0222 

REF 

1 



05*6313 

0 

6274 

0 


TC 

0223 

ref 

2 

LAST 

244 

05 *63i4 

0 

6274 

0 


TC 

0224 





05*6315 


04400 

1 

IMUATTCV 

OCT 


NASA 1021108-021 


DEC if, 1966 


(MAIN) page 2 



USER'S OWN page no, 10 

TEST XACT 

GF<ABDSP 

PREGBSY 

ATTITUDE control. 

oelload 

NVSUB 

ask FOR Delta angle load. 

PRENVBSY 

ENDIDLE 

S I ALL waiting For load 

TERMEXTv 

ATT CABS 
INCLOOP 

proceed - ask For absolute angles 

AuD INCREMENTS TO DeSIReD ANGLES. 

IMUATTCV 

NVSUB 

PRENVBSY 

freedsp 

LET THE DISPLAYS GO 

BANKCALL 

IMUATTC 

CALL THE MODE SwITCh PROG 

BANKCALL 

IMUSTALL 

endextvb 

ENDEXTV0 

Control. 

STALL 

VNLODCDJ 

NVSUB 

PRENVBSY 

ENDIDLE 

TERMEXTV 

ASK FOR absolute CDU ANGLES. 

ATTCK2 

ATTCK2 

SECOND proceed wITHOUT DATA. 


OAAOO 


YUL SYSTEM FDR AGC<^: REvlSlON 0 OF P^DGRAM 50LRUM55 By 


extended verbs for MODING 


P0225 

keyboard 

Request to 

PUT the 1 

[MU 

IN RE 

-ENTRY CONTROL M 

0226 

REF 

6 

last 

2AA 

05,6316 

0 

60A 7 

1 

IMUREENK 

TO 

0227 

REF 

5 

last 

2AA 

05,6317 

0 

3302 

0 


TC 

0228 

REF 

5 

LAST 

2AA 

05,6320 

0 

3310 

0 


TC 

0229 

ref 

3 

LAST 

2AA 

05,6321 

3 

62l6 

1 


CAF 

0230 

REF 

12 

LAST 

2Aa 

05,6322 

0 

3100 

0 


TC 

0231 

REF 

10 

LAST 

2AA 

05,6323 

0 

3 3 1 5 

0 


TC 

0232 

REF 

7 

LAST 

2AA 

05, 632a 

0 

3136 

0 


TC 

0233 

REF 

6 

LAST 

2AA 

05,6325 

0 

606A 

0 


TC 

023A 

ref 

1 



05,6326 

0 

63A2 

1 


TC 

0235 

REF 

3 

LAST 

2AA 

05,632 1 

0 

6177 

0 


TC 

0236 

REF 

1 



05,6330 

3 

6351 

0 

REENTK2 

caf 

0237 

REF 

13 

LAST 

2A5 

05,6331 

0 

3100 

0 


TC 

0238 

REF 

11 

LAST 

2A5 

05,6332 

0 

3315 

0 


TC 

0239 

REF 

6 

LAST 

2AA 

05,6333 

0 

3362 

0 


TC 

02A0 

REF 

19 

LAST 

2AA 

05 , 6 3 3 A 

0 

565A 

0 


TC 

02A1 

REF 

1 



05,6335 


30216 

1 


CAOR 

02A2 

REF 

20 

LAST 

2A5 

05,6336 

0 

565 A 

0 


TC 

02A3 

REF 

6 

LAST 

2AA 

05,6337 


30331 

0 


CADR 

02AA 

REF 

12 

LAST 

2AA 

05 , 6 3 AO 

0 

6065 

1 


TC 

02A5 

REF 

13 

LAST 

2A5 

05 , 6 3A 1 

0 

6065 

1 


TC 

02A6 

REF 

3 

LAST 

2AA 

0 5 , 6 3 A 2 

3 

6165 

0 

REENTABS 

CAF 

02A7 

REF 

lA 

LAST 

2A5 

05,63A3 

0 

3100 

0 


TC 

02A8 

REF 

12 

LAST 

2A5 

05 ,63AA 

0 

3315 

0 


TC 

02A9 

REF 

8 

LAST 

2A5 

05,63A5 

0 

3136 

0 


TC 

0250 

REF 

7 

LAST 

2A5 

05,63A6 

0 

606A 

0 


TC 

0251 

REF 

1 



05,63A I 

0 

6330 

1 


TC 

0252 

REF 

2 

LAST 

2A5 

05,6350 

0 

6330 

1 


TC 

0253 





05,6351 


0A50O 

0 

IMUREENV 

OCT 


f^iASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 2 AS 



USER’S OWN PAGE NO. 11 

TE5TXACT 

GRABDSP 

Rt-ENTRY. 

PREGBSY 

DELLOAD 

NVSUB 

LOAD incremental ANGLES* 

PRENVbSY 

ENDIDLE 

STALL FOR THE LOAD 

TERMEXTV 

REENTABS 

INCLOOP 

Proceed - ask for absolute load. 

imurelnv 

Rl-DI SPLAY VERB. 

NVSUB 

PRENVBSY 

FREEOSP 

LET THE displays GO 

BANKCALL 

IMUREENT 

call mode switch prog 

BANKCALL 

IMUSTALL 

ENDEXTVB 

ENDEXTVB 

stall 

VNLOOCDJ 

NVSUB 

PRENVBSy 

ENDIDLE 

request absolute angles. 

TERMEXTV 

REENTK2 

KEENTK2 

0A50O 

terminate 


4d^;>78A YUL SYSTEM FOR AGC<*: REVlSljN 0 OF PROGRAM SOLRUMS5 BY 


L EXTENDED VERBS FOR MOOING 


P02SA KEYBOARD ReOUe^T TO RETUR'4 THe IMU TO COArSe ALIGN 


02S5 

ref 

7 

LAST 

2A5 

05»6352 

0 60A7 

1 

IMUCORK TC 

0256 

REF 

21 

last 

2A5 

05»6353 

0 565A 

0 

rc 

0257 

REF 

1 



05*635A 

3013A 

1 

CAOR 

0256 

REF 

22 

LAST 

2A6 

05*6355 

0 565A 

0 

TC 

0259 

REF 

9 

LAST 

2A5 

05 * 6356 

30331 

0 

CADR 

0260 

REF 

lA 

LAST 

2A5 

05*6357 

0 6065 

1 

rc 

0261 

REF 

15 

LAST 

2A6 

05 ♦ 6360 

0 6065 

1 

TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE ^A6 


USER'S Own PAGE NO, 12 


TESTXACT back TO 

BANKCALL 

IMURECOR 

BANKCALL 

IMUSTALL 

ENDEXTVB 

ENDEXTVe 


COARSE ALIGN (FROM FINE), 






I' -- 




484578A YUL SYSTEM FOR AGC^t REVISION 0 OF PRjGRAM S0LRUM5S BY 


L extended verbs for moding 


P026Z KEYBOARD REQUEST TO ZERO OPTICS CUUS 


0263 

REF 

2 3 

LAST 

246 

05*6361 

0 5654 

0 

OPTZEROK 

TC 

0264 

REF 

1 



05*6362 

12367 

0 


CAjR 

0265 

REF 

24 

LAST 

247 

05*6363 

0 5654 

0 


TC 

0266 

REF 

1 



05*636*+ 

30327 

1 


CAOR 

0267 

REF 

16 

LAST 

246 

05 *6365 

0 606 5 

1 


TC 

0268 

REF 

17 

LAST 

247 

05*6366 

0 6065 

1 


TC 

0269 






05*6367 

OPTZERO 



IJ <X tJ tJ 


NASA 1021108-021 


DEC -V, 1966 


(MAIN) PAGE 2^7 



USER»S own page no. 13 

BANKCALL 

OpTZERO 

CALL mode pros 

BANKCALL 

OPTSTALL 

ENDEXTVB 

endextvb 

STALL 


Interfaces not currently wired »#*++###*# 


YUU SYSTEM EOR AGc^t: REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A » 1966 


(MAIN) PAGE 2AH 


L extended verbs for moding 


USER’S Own page no. ia 


P02 70 

temporary routine 

TO RUN the 

02 71 

ref 

6 

LAST 

2A5 

05 

»636 7 

02 72 

REF 

6 

LAST 

2A5 

05 

♦ 6370 

0273 

REF 

1 



05 

♦ 6371 

027A 

REF 

15 

LAST 

245 

05 

♦ 6372 

02 75 

REF 

13 

LAST 

245 

05 

♦ 6373 

0276 

REF 

9 

LAST 

245 

05 

♦ 63 74 

02 77 

REF 

3 

LAST 

245 

05 

♦ 6375 

0278 





05 

♦ 6376 

02 79 

REF 

1 



05 

♦ 63 7 7 

0280 

REF 

16 

LAST 

248 

05 

♦ 6400 

0281 

REF 

lA 

LAST 

248 

05 

♦ 6A01 

0282 

REF 

7 

LAST 

245 

05 

♦ 6402 

0283 

REF 

8A 

LAST 

234 

05 

♦ 6403 

02 8A 

REF 

11 

LAST 

17a 

05 

♦ 6404 

0285 

REF 

18 

LAST 

247 

05 

♦ 6405 

0286 





05 

♦ 6 406 

0287 

REF 

2 

LAST 

240 




OPTICS CDUS FROM THE <£YgOARD 


0 

3302 

0 

OPTCOARK 

TC 

GHABDSP 

0 

3310 

0 


TC 

PREGBSY 

3 

6406 

0 


CAF 

VNLDOCDU 

0 

3100 

0 


TC 

NVSUB 

0 

3315 

0 


TC 

PRENVBSY 

0 

3136 

0 


TC 

ENDIDLE 

0 

6064 

0 


TC 

TERMEXTV 

0 

6377 

1 


TC 

♦ 1 

3 

6166 

0 


CAF 

OPTCOARV 

0 

3100 

0 


TC 

NVSJB 

0 

3315 

0 


TC 

PRENVBSY 

0 

3362 

0 


TC 

FREEDSP 

3 

5501 

0 


CAF 

ZERO 

5 

0703 

0 


T5 

OPTIND 

0 

606 5 

1 


TC 

ENDEXTVB 


02a5 7 

0 

VNLDOCDU 

DCl 

0245 7 


Ob f 6 L 66 

OPTCOARV 

E3JALS 

IMUCOARV 


Snatch them displays 

VLRB-NOUN TO LOAD OPTICS CDUS 

WAIT FOR THE LOAD 
PROCEED 

RE-DISPLAY OUR OWN VERB 
LET IT GO 
SNATCH OPTICS 

different nouns. 



“ ' L . -o* 

a 



. 4r' 

m t 1 











4 


I 








yuL System foR revisun o of program solru^\s5 by nasa ioziios-oei 


Dec 1966 


(MAIN) page 2A9 


L extended verbs FDR MOPING USER'S O^N PAGE NO, 15 

P02b8 KEYBOARD REQUEST TO ACTIVATE THE OPTICAL STAR TRAC<ES 


0289 

REF 

25 

LAST 

247 

05*6407 

0 56 54 

0 

OPTTRONK 

TC 

BANKCALL 


0290 

REF 

1 



05*6410 

12415 

1 


cadr 

OPTTRKON 

CALL MODE Switcher 

0291 

REF 

26 

LAST 

249 

05*6411 

0 5654 

0 


TC 

BANKCALL 

STALL 

0292 

REF 

2 

LAST 

247 

05 * 64 1 2 

30327 

1 


CAOR 

OPTSTALL 


0293 

REF 

19 

LAST 

248 

05*6413 

0 6065 

1 


TC 

ENDEXTVB 


029A 

REF 

20 

LAST 

249 

05*64U 

0 6065 

1 


TC 

ENDEXTVB 


0295 






05*6415 

OPTTRKON 

S 


Not available just now 

0296 





05*6415 

2 001 / 

0 

DOMKREJ 

INHINT 


Du 10 MS WAITLIST CALL TO MK RFJECT PROG 

0297 

REF 

22 

LAST 

212 

05*6416 

4 0 735 

1 


cs 

markstat 

MARK REJECT IS ENABLED ONLY IF BlTlO 

0298 

REF 

15 

LAST 

234 

05*641 7 

7 4505 

1 


MASK 

BITIO 

OF MARKSTAT = 1, 

0299 

REF 

215 

LAST 

241 

05*6420 

1 0000 

0 


CCS 

A 


0300 

REF 

8 

LAST 

238 

05*6421 

0 6075 

0 


TC 

alm/end 


0301 

REF 

98 

LAST 

234 

05*6422 

3 4516 

1 


CAF 

ONE 


0302 

REF 

32 

LAST 

234 

05*6423 

0 2173 

0 


TC 

WAITLIST 


0303 

REF 

2 

LAST 

206 

05*6424 

30611 

1 


CAJR 

MK REJECT 

(CALLED IN KEYRUPT WHEN BUTTON AVAIL,) 

0304 

REF 

5 

LAST 

212 

05*6425 

3 2261 

0 


CAF 

HI5 

mark REJECT ROUTINE WILL RE-PASTE VBsi 

0305 

REF 

23 

LAST 

249 

05*6426 

7 0735 

1 


'lASK 

MARKSTAT 

IF ALL MARKS WERE IN. 

0306 

REF 

216 

LAST 

249 

05*6427 

1 0000 

0 


CCS 

A 


0307 





05*6430 

0 6432 

1 


TC 

+ 2 


0308 

REF 

19 

LAST 

236 

05*6431 

0 2124 

1 


TC 

ENDOF JOB 


0309 





05*6432 

2 0016 

1 


RELINT 


RE-dISPLAY VB 51 SINCE MORE MARKS 

0310 

REF 

27 

LAST 

249 

05*6433 

0 5654 

3 


TC 

BANKCALL 

0311 

REF 

2 

LAST 

211 

05*6434 

14000 

1 


cadr 

FLASHON 

required. 

0312 

REF 

8 

LAST 

236 

05*6435 

0 5720 

1 


TC 

POSTJUMP 


0313 

REF 

2 

LAST 

209 

05*6436 

30755 

0 


CADR 

REMKVBSl 



R031A please Perform verb and pleaSe mark verb pressing enter indicates 

R0315 ACTION REQUESTED hA5 BEEN PERFORMED* AND DOES SAME RECALL AS A COMPLETED 

R0316 LOAD, OPERATOR SHOULD DO vB PROCEED WITHOUT DATA IF HE WISHES NOT TO 

R0317 PERFORM THE REQUESTED ACTION. 


0310 

ref 

28 

LAST 

249 

05*643? 

0319 

REF 

1 



05 * 6 440 

0320 

REF 

2 

LAST 

236 

05 *6441 

0321 

REF 

9 

LAST 

249 

05*6442 

0322 

REF 

1 



05*6 443 


0 5654 

0 

GOLQADLV TC 

BANKCALL 

14003 

1 

cadr 

FLASHOFF 

0 606 7 

0 

TC 

XACTO 

0 5720 

1 

TC 

POST JUMP 

16006 

0 

CADR 

LOADLVl 


4bAij78A YUL SYSTEM FOR AGCA; REVISION o OK PROGRAM SoLRUMSS By 


L extended verbs for MODING 

P0323 keyboard REQUEST TO RELEASE IMU OR OPTICS 


032A 

REF 

3 

LAST 

237 

05*6 44** 

0 

6105 

0 

RELO/IK 

TC 

0325 

REF 

1 



05*6445 

0 

6451 

1 


TC 

0326 

REF 

85 

LAST 

2A8 

05*6446 

4 

5501 

1 


cs 

0327 

REF 

12 

LAST 

248 

05*6 44 f 

5 

0703 

0 


rs 

0328 

REF 

20 

LAST 

249 

05*6450 

0 

2124 

1 


TC 

0329 

REF 

86 

LAST 

250 

05*6451 

4 

5501 

1 

IMURELK 

CS 

0330 

REF 

25 

LAST 

234 

05*6452 

5 

0677 

1 


TS 

0331 

REF 

21 

LAST 

250 

05*6453 

0 

2124 

1 


TC 


tn Ln in ri ri 


NASA 102llo8-O2l 


DeC a* 


1966 (MAIN) PAGE 25 


USER'S OWN PAGE NO. 16 


OP/INERT 

IMURELK RETURN HERE IF iMU 

ZERO RETURN HERE IF OPTICS 

OPTIND 
ENOOFjOB 


ZERO 

CDUIND 

ENDOFJOB 


^b^578A YUL SYSTEM FDR AGC4: HE\/ISIUN 0 OF PROGRAM 50LRUM55 BY 


L EXTENDED VERBS FOR MOOING 

P0332 keyboard request td pulse tqroue iriga 


0333 

REF 

8 

last 

246 

05 *6454 

0 

6047 

i 

torqgyrs 

TC 

033A 

REF 

7 

LAST 

248 

05*6455 

0 

3302 

0 


TC 

0335 

REF 

7 

LAST 

248 

05 *6456 

0 

3310 

0 


TC 

0336 

REF 

2 

LAST 

242 

05*6457 

3 

6251 

1 


CAP 

0337 

REF 

17 

LAST 

248 

05 * 6 460 

0 

3100 

D 


rc 

0338 

REF 

15 

LAST 

248 

05*6461 

0 

3315 

0 


TC 

0339 

REF 

10 

LAST 

248 

0 5 ♦ 6462 

0 

3136 

0 


TC 

0340 

REF 

9 

LAST 

248 

05 * 6 4 6 3 

0 

6064 

0 


TC 

0341 





05*6 464 

0 

6465 

0 


TC 

03^2 

REF 

1 



05*6465 

3 

6501 

0 


CAP 

0343 

REF 

18 

LAST 

251 

05 * 6466 

0 

3100 

0 


TC 

0344 

REF 

1 6 

LAST 

251 

05 *6467 

0 

3315 

0 


TC 

0345 

REF 

8 

LAST 

248 

05*6470 

0 

3362 

0 


TC 

0346 

REF 

2 

LAST 

242 

05*6471 

3 

6500 

1 


CAF 

0347 

REF 

29 

LAST 

249 

05*6472 

0 

5654 

0 


TC 

034B 

REF 

2 

LAST 

242 

05*6473 


31433 

1 


CAjR 

0349 

ref 

30 

LAST 

251 

05*6474 

0 

5654 

0 


TC 

0350 

REF 

10 

LAST 

246 

05*6475 


30331 

0 


CAOR 

0351 

REF 

21 

LAST 

249 

05*6476 

0 

6065 

1 


TC 

0352 

REF 

22 

LAST 

251 

05.6477 

0 

6065 

1 


TC 

0353 

REF 

1 



05*6500 


01520 

1 

LGYROBIN 

ADRES 

0354 





05*6501 


05400 

0 

torqgyrv 

DCT 


NASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 251 


USER'S OWN page NO, 17 


testxact 

GRABD5P 

PREGBSY 

vnlodgyr 

NvSlIB 

PRENVESY 

endidle 

TERMEXTV 

GYRO TQRUUING WITH NO MODE-bWITCH. 

+ 1 

TOROGYR\/ 

NVSUB 

PREN^BSY 

freedsp 

LGYROBIN 

BANKCALL 

Rl-DISPLAY our own VERB 

GYRODPNT 

BANKCALL 

imustall 

ENDEXTVB 

ENDEXTVB 

WAIT FOR PULSES TO GET OUT. 


OGC 

05 A 0 O 


^b4578A YUL SYSTEM FOR AGC<t : REVISION U OT pRJGRAM 50LRUMS5 BY 


L extended verbs for MODINo 


P03S5 ALIGN TIME 


03S6 

REF 

1 



05 » 6502 

3 

6544 

1 

ALINTIME 

CAF 

03S7 

REF 

2 

LAST 

212 

05«6503 

5 

out) 

1 


T5 

03S8 

REF 

1 



05»65U4 

0 

3121 

0 


TC 

(j359 

REF 

22 

LAST 

250 

05 .6505 

0 

2124 

1 


TC 

0360 

REF 

11 

LAST 

251 

05*6506 

0 

3136 

0 


TC 

0361 

REF 

23 

LAST 

252 

05*6507 

0 

2124 

1 


TC 

0362 

REF 

2A 

LAST 

252 

05*6510 

0 

2124 

1 


TC 

0363 





05*6511 

2 

0017 

0 

UPOATIME 

INHI 

036A 

REP 

87 

LAST 

25U 

05*6512 

3 

5501 

D 


CAF 

0365 

REF 

248 

LAST 

241 

05*6513 

5 

0117 

0 


T5 

0366 

REF 

6 

LAST 

222 

05*6514 

3 

0036 

1 


XCH 

0367 

REF 

6 

LAST 

210 

05*6515 

6 

0617 

1 


AD 

0368 

REF 

249 

LAST 

252 

05*6516 

5 

0116 

1 


T5 

0369 

REF 

88 

LAST 

252 

05*651 7 

3 

5501 

D 


CAP 

0370 

REF 

7 

LAST 

252 

05*6520 

6 

0616 

0 


AO 

0371 

REF 

4 

LAST 

191 

05*6521 

6 

0035 

1 


AO 

0372 

REF 

250 

LAST 

252 

05*6522 

3 

0115 

1 


XCH 

0373 

REF 

31 

LAST 

251 

05*6523 

0 

5654 

0 


TC 

037A 

REF 

5 

LAST 

226 

05*6524 

07154 

0 


CAOR 

0375 

REF 

251 

LAST 

252 

05*6525 

3 

0115 

1 


XCH 

0376 

REF 

5 

LAST 

252 

05*6526 

3 

0035 

1 


XCi 

0377 

REF 

252 

LAST 

252 

05*6527 

3 

0116 

1 


XCH 

0378 

REF 

7 

LAST 

252 

05 * 6530 

3 

0036 

1 


XCH 

0379 

REF 

217 

LAST 

249 

05*6531 

1 

0000 

0 


CCS 

0360 





05*6532 

0 

6534 

0 


TC 

0381 

REF 

1 



05*6533 

0 

6542 

1 


TC 

0382 

REF 

99 

LAST 

249 

05*6534 

3 

45 1 6 

1 


CAF 

0383 

REF 

8 

LAST 

252 

05*6535 

6 

0036 

1 


AO 

038A 

REF 

9 

LAST 

252 

05 * 6 536 

5 

0036 

1 


T5 

0385 

REF 

2 

LAST 

252 

05*6537 

0 

6542 

1 


TC 

0386 

REF 

6 

LAST 

252 

05*6540 

6 

0035 

1 


AO 

0367 

REF 

7 

LAST 

252 

05*6541 

3 

003 5 

1 


XCH 

0388 





05*6542 

2 

0016 

1 

ENDALINE 

reli 

0389 

REF 

25 

LAST 

252 

05*6543 

0 

2124 

1 


TC 

0390 





05 » 6544 


02124 

1 

VNLODDT 

OCT 


1021108-021 


DEC A, 1966 (MAIN) page 252 


USER'S OWN page no. 18 


VNLODDT USES (WSUBMON, DOES NOT TEST PSPLUCK, 

NVTEMP Dues not kill Monitor, 

NVSJBMON 

ENDOFjOe IN CASE OF ALARM IN LOAD REQUEST SeT UP. 

ENDIDLE 

END0FJ08 Terminate 

ENDOFJOB PROCEED WITHOUT DATA 

DELTA time is in DSPTEMIi +1. 

ZERO 

MPAC +2 NtEDEO FOR TP AGREE 

TlMEl LU ORDER TIME 

DSPTEMI +1 

MPAC +1 

ZERO 

dsptemi 

T1ME2 Hi ORDER TIME 

MPAC 

BANKCALL 
TPAGREE 
MPAC 
T 1ME2 

MPAC +1 

TlMEl 

A 

2 

ENDALINE 

ONE TiMEl WAS INCREMENTED SINCE PICKUP 

TlMEl 

TlMEl 

ENDALINE 

T1ME2 

TIME2 

ENDOFJOB 


0212A 


V/N FOR load delta TIME 


4 a^b 78 A YUL SYSTEH FOR AQCif; REVISION 0 OF PROGRAM S 0 LRUM 55 BY NASA IO 2 IIO 8 -O 2 I 


DEC A, 1966 


(MAIN) PAGE 2 S 3 


L EXTENDED VERBS FOR MODING USER'S OWN PAGE NO. 19 

P0391 PREPARE For Standby operation 

R 0392 PReSjAND prepares FoR STANDBY BY SfMAPSHoTT I NG INl* TlMEl* TiME 2 AS SOON 
R0393 AS INI CHANGES. Ij DOES THIS BY CoNllJOUS WAITLIST REODlSTS UNTIL A 
R039A change IN INI IS DETECTED. 

R0395 poStano Recovers time after Standby, it waits for a chan&e in ini ijust 

R0396 AS prestand DOES), THEN COMPUTES THe DIFFERENCE BETWEEN INI VALUeSCFULL 


R0397 

16 BITS) 

, ADDS this 

TO the previously 

snapshotted 

VALUES 

OF timei, 

TIME2 

R0398 

AND 

PLACES this New 

TIME INTO 

timei, 

TIME2 COUNTERS. 



R0399 

B 1 1 1 

OF 

INILOSAV = 

last value 

OF bill 

OF 

INI 




0400 





0 5 t 6 54 5 

2 

OOl 7 

0 

PRESTAND 

I NIH 1 NT 


PREPARE time FOR STANDBY 

0401 

REF 

100 

LAST 

252 

05»6546 

3 

4516 

1 


CAP 

ONE 


0402 

REF 

33 

LAST 

249 

05*6547 

0 

2173 

0 


TC 

WAITLIST 


0403 

REF 

1 



05*6550 

12552 

0 


CADR 

PRESTBY 


0404 

REF 

26 

LAST 

252 

05*6551 

0 

2124 

1 


TC 

ENDUFJ06 


0405 

REF 

1 



05*6552 

3 

0005 

1 

PRESTBY 

X s. H 

INI 

Called by waitlist 

0406 

REF 

8 

LAST 

192 

05*6553 

7 

4516 

0 


mas< 

bITl 

PUT Bill OF I?^l If'JTO bITl OF INUOSAV 

0407 

REF 

9 

LAST 

234 

05*6554 

5 

0032 

0 


TS 

LPRUPT 


0408 

REF 

9 

LAST 

253 

05.6555 

4 

4516 

0 


C5 

BITl 


0409 

REF 

1 



05.6556 

7 

1103 

0 


V1AS< 

INILOSAV 


0410 

REF 

10 

LAST 

253 

05*6557 

6 

0032 

0 


AD 

LPRJPT 


0411 

REF 

2 

LAST 

253 

05*6560 

5 

1103 

1 


TS 

INILOSAV 


A0412 












Called by waitlist every lo msec 

0413 

REF 

2 

LAST 

253 

05 * 6 56 1 

3 

0005 

1 

PRESTBYl 

ach 

INI 

Until a change in ini is detected. 

0414 

pef 

145 

LAST 

241 

05 * 6 562 

3 

0001 

0 


XCH 

Q 

PUT ALL 16 BITS OF INI INTO 0 

0415 

REF 

10 

LAST 

252 

05*6563 

4 

0036 

0 


CS 

TIMEI 

SNAPSHOT TIMEI 

0416 

REF 

1 



05 * 6564 

3 

1101 

0 


XCH 

T IMEISAV 


0417 

REF 

8 

LAST 

252 

05.6565 

4 

0035 

0 


cs 

T IME2 

snapshot TIME2 

0418 

REF 

1 



05*6566 

3 

1100 

1 


XCH 

T1ME2SAV 


0419 

REF 

146 

LAST 

253 

05*6567 

3 

0001 

0 


XCH 

Q 

PUT ALL 16 BITS OF INI INTO A 

0420 

REF 

1 



05*6570 

0 

6603 

1 


TC 

INI LOOK 


0421 

REF 

1 



05*6571 

0 

65 77 

1 


TC 

PRESTBY2 

RETURNS here IF NO CHANGE IN INI 

0422 

REF 

1 



05*6572 

3 

0572 

1 


XCH 

INIHITEM 

RETURNS HERE IF INI HAS CHANGED 

0423 

REF 

1 



05*6573 

5 

1102 

0 


TS 

INIHISAV 


0424 

REF 

1 



05*6574 

3 

0573 

0 


XCH 

INILOTEM 

Dune with biti of inilqsav, dont protect 

0425 

REF 

3 

LAST 

253 

05 *65 75 

5 

1103 

1 


TS 

INILOSAV 


0426 

REF 

25 

LAST 

234 

05*65 76 

0 

2256 

1 


TC 

TASKOVER 


0427 

ref 

101 

LAST 

253 

05*6577 

3 

4516 

1 

PRESTBY2 

caf 

ONE 

Perpetuates waitlist request every 

0428 

REF 

34 

LAST 

253 

05 * 6 6U0 

0 

2173 

0 


TC 

waitlist 

LU MSEC until INI CHANGES, 

0429 

REF 

1 



05*6601 


12561 

0 


CADR 

PRESTBYl 


0430 

REF 

26 

LAST 

253 

05*6602 

0 

2256 

1 


rc 

TASKOVER 



DEC 4, l9b6 


(MAIN) page 


AdAbTfiA YUL SYSTtifFOR AGCa; RtVIblON 0 OE PRDGRAm SOLRUMbb BY NASA 1021106-021 

> ' 


L EXTENDED VERBS FOR MOOING USER'S OVvN PAGE NO. 20 


RoA31 

INILOOK 

Returns to 

L+l IF INI 

HAS Not 

changed since last 

examination. 


R0A32 

IT Returns to 

L + 2 

IF INl Has 

changed 

since LAST 

EXAHlNATlON* WITH 


R0A33 

BITS 

16-8 OF 

INI IN BITS 9-1 

OF 

uaHi 

tem 

* AND BITS 7-1 OF INI 


R0A3A 

IN BITS 

i4-a 

OF INILOTEM. 








0A35 

REF 

2 

LAST 

253 

05 i66U3 

5 

0573 

0 

INILOOK 

T5 

INILOTEM 


0A36 

REF 

2 

LAST 

1 72 

05t6604 

3 

5504 

0 


CAP 

NEGO 


0A37 

REF 

2 

LAST 

253 

05 * 6 605 

5 

0572 

1 


IS 

IMHITEM 

PUT *1 for OF* -1 FOR UF. -u FOR NEITHER 

0A3 8 

REF 

147 

LAST 

253 

05 ♦ 6606 

3 

0001 

0 


XCH 

Q 


0A39 

REF 

1 



05 1 6 607 

5 

0574 

1 


TS 

LOOKRET 


OAAO 

REF 

10 

LAST 

253 

0 5 1 6 6 1 0 

3 

4516 

1 


CAP 

blTl 


OA^l 

REF 

3 

LAST 

254 

05*6611 

7 

0573 

1 


MA5< 

INILOTEM 


04A2 

REF 

11 

LAST 

253 

05*6612 

5 

0032 

0 


TS 

LPRUPT 

NEW value OF BlTl OF INI 

0443 

REF 

11 

LAST 

254 

05*6613 

3 

4516 

1 


CAF 

BlTl 


0444 

REF 

4 

LAST 

253 

05 *6614 

7 

1 103 

0 


MA&< 

INILOSAV 

Last value of biti of ini 

044S 





05*6615 

2 

5777 

1 


extend 



0446 

REF 

12 

LAST 

254 

05 * 6 6 1 6 

6 

0032 

0 


SJ 

LPRUPT 


0447 

REF 

218 

LAST 

252 

05*661 7 

1 

0000 

0 


CCS 

A 


0448 

REF 

1 



05*6620 

0 

6624 

1 


tc 

INIPREP 

INI has changed 

0449 

REF 

22 

LAST 

176 

05*6621 

0 

3062 

0 


TC 

CCSHOLE 


04bO 

REF 

2 

LAST 

254 

05*6622 

0 

6624 

1 


TC 

INIPREP 

INl HAS changed 

04bl 

REF 

2 

LAST 

254 

05*6623 

0 

0574 

1 


TC 

LOOKRET 

INI HAS NOT changed, RETURN TO L+ 1 , 

0452 

REF 

17 

LAST 

234 

05 * 6 624 

3 

0003 

1 

INIPREP 

XCH 

LP 


0453 

REF 

13 

LAST 

254 

05*6625 

5 

0032 

0 


TS 

LPRUPT 

SIORE LP 

0454 

REF 

4 

LAST 

254 

05*6626 

3 

0573 

0 


XCH 

INILOTEM 


0455 





05*6627 

2 

5777 

1 


exiend 



04 56 

REF 

6 

LAST 

181 

05*6630 

4 

4507 

0 


MP 

blT 8 

SHIFTS RIGHT 7 

0457 

REF 

3 

LAST 

254 

05*6631 

3 

0572 

1 


XCH 

INIHITEM 

PUTS BITS 7 -I OF INl INTO BITS 14-8 OF LP 

0458 

REF 

219 

LAST 

254 

05*6632 

1 

0000 

0 


CCS 

A 

PUTS BITS14-8 OF INl INTO BlTSy-l OF A 

0459 

REF 

7 

LAST 

254 

05*6633 

3 

4507 

1 


CAF 

BIT 8 

PUTS BITlb OF INI INTO BIT9 OF A 

0460 





05*6634 

0 

6636 

1 


TC 

*2 


0461 

REF 

8 

LAST 

254 

05*6635 

4 

4507 

0 


CS 

BIT 8 

PUTS BlTlb OF INl INTO BITS OF A 

0462 

REF 

4 

LAST 

254 

05*6636 

6 

0572 

1 


AD 

INIHITEM 

0463 

REF 

7 

LAST 

211 

05*663 7 

7 

460 7 

0 


MA5< 

L0W9 


0464 

REF 

5 

LAST 

254 

05*6640 

5 

0572 

1 


TS 

INIHITEM 


0465 

REF 

18 

LAST 

254 

05*6641 

3 

0003 

1 


XCH 

LP 

BIT14 THRU BITS 

0466 

REF 

1 



05*6642 

7 

66 51 

1 


MASX 

B14-B8 

0467 

REF 

5 

LAST 

254 

05 * 6 643 

5 

0573 

0 


TS 

INILOTEM 


0468 

REF 

12 

LAST 

254 

05*6644 

3 

4516 

1 


CAP 

BlTl 


0469 





05*6645 

2 

5777 

1 


extend 


RESTORE LP 

0470 

REF 

14 

LAST 

254 

05 * 6646 

4 

0032 

1 


M? 

LPRUPT 

0471 

REF 

3 

LAST 

254 

05*6647 

2 

0574 

0 


INDEX 

LOOKRET 

RETURN TO L+2 

04 n 




05*6650 

0 

0001 

0 


TC 

1 

0473 





05*6651 


37600 

0 

00 

CD 

1 

DCT 

37600 



4a4ii7HA YUL SYSTEM FOR A6C<t; REVISION 0 OF PROGRAM SOLRUMSS &Y 


L EXTENDED VERBS FOR MODING 


P0A7R 

RECOVER 

FROM 

standby 

OPERATION 





0A75 





05*6652 

2 

0017 

0 

POSTAND 

1 NHiNf 

0A76 

REF 

102 

LAST 

253 

05*6653 

3 

4516 

1 


CAP 

OA 77 

REF 

35 

LAST 

253 

05*6654 

0 

2173 

0 


I C 

0A78 

REF 

1 



05*6655 

1265 t 

0 


CA3R 

0A79 

REF 

27 

LAST 

253 

05*6656 

0 

2124 

1 


TC 

OABO 

ref 

3 

LAST 

253 

05*6657 

3 

0005 

1 

POSTBY 

XCH 

OAbl 

REF 

13 

LAST 

254 

05*6 660 

7 

4516 

0 


M ask 

0A82 

REF 

15 

LAST 

254 

05*6661 

5 

0032 

0 


T5 

0Ati3 

REF 

14 

LAST 

255 

05*6662 

4 

4516 

0 


C5 

OAbA 

REF 

5 

LAST 

254 

05 * 6663 

1 

1103 

0 


MASK 

0 Ab5 

REF 

1 6 

LAST 

255 

05 * 6 664 

6 

0032 

0 


AO 

0AB6 

REF 

6 

LAST 

255 

05 *66 65 

5 

U03 

1 


TS 

A0Ab7 











oabb 

REF 

4 

LAST 

255 

05 1 6666 

3 

0005 

1 

P05TBY1 

XCH 

0Ab9 

REF 

148 

LAST 

254 

05 * 6 6b 7 

3 

0001 

0 


XCH 

0A90 

REF 

89 

LAST 

252 

05*6670 

3 

5501 

0 


CAP 

0A91 

REF 

11 

LAST 

253 

05*6571 

5 

0036 

1 


TS 

0A92 

REF 

9 

LAST 

253 

05*6672 

5 

0035 

1 


T5 

0A93 

REF 

149 

LAST 

255 

05*6573 

3 

0001 

0 


XCH 

0A9A 

REF 

2 

LAST 

253 

05 *6674 

0 

6603 

1 


TC 

0A95 

REF 

1 



05*6675 

0 

6724 

0 


TC 

0A96 

REF 

15 

LAST 

255 

05*6676 

4 

4516 

0 


CS 

0A97 

ref 

7 

LAST 

255 

05.6677 

7 

1103 

0 


MASK 

0A98 





05.6700 

4 

0000 

0 


COM 

0499 

REF 

6 

LAST 

254 

05*6701 

6 

0573 

0 


AO 

0500 

REF 

1 



05*6702 

5 

1105 

1 


TS 

0501 

REF 

90 

LAST 

255 

05*6703 

3 

5501 

0 


CAP 

0502 

REF 

6 

LAST 

254 

05*6704 

6 

0572 

1 


AO 

0503 





05.6705 

2 

5777 

1 


EXTEND 

0504 

REF 

2 

LAST 

253 

05*6706 

6 

1 102 

0 


5J 

0505 

REF 

220 

LAST 

254 

05*6707 

1 

0000 

0 


CCS 

0506 

REF 

103 

LAST 

255 

05*6710 

6 

4516 

1 


AO 

0507 





05*6711 

0 

6713 

1 


TC 

0508 

REF 

1 



05*6712 

0 

6720 

1 


TC 

0509 

REF 

1 



05*6713 

5 

1104 

0 

DIFFCOM 

TS 

0510 

REF 

1 



05*6714 

3 

2166 

1 


CAF 

0511 

REF 

9 

LAST 

217 

05*6715 

0 

2052 

I 


TC 

0512 

REF 

I 



05*6716 


12730 

0 


CAOR 

0513 

REF 

27 

LAST 

253 

05*6717 

0 

2256 

1 


T C 

0514 

REF 

104 

LAST 

255 

05*6720 

6 

45 1 6 

1 

DIFFNEG 

AO 

0515 





05*6721 

4 

0000 

0 


COM 

0516 

REF 

16 

LAST 

249 

05*6722 

6 

45 O 5 

0 


AO 

0517 

REF 

1 



05*6/23 

0 

6713 

1 


TC 

0518 

REF 

105 

LAST 

255 

05*6724 

3 

4516 

1 

P0STBY2 

CAF 

0519 

ref 

36 

LAST 

255 

05*6725 

0 

2173 

0 


TC 


1021103-021 


DEC a f 1966 


(MAIN) PAGE 255 


One 

WAITLIST 

POSTBY 

END0FJ06 

INI 

BITl 

LPRUPT 

BITl 

IN 1 LOS A V 

LPRUPT 

INILOSAV 

INI 

0 

ZERO 

TIMEl 

T1ME2 

0 

INI LOOK 
P0STBY2 
BITl 

IMLOSAV 

INILOTEM 

INILODIF 

ZERO 

INIHITEM 

INIHISAV 

A 

ONE 

♦ 2 

DIFFNEG 

INIHIDIF 

PKI033 

NOVAC 

P0STBY3 

taskover 

ONE 

blTlO 

DIFFCDM 

ONE 

WAITLIST 


USER'S Own page no, 21 


RLCOVER time AFteH standby 


CALLED BY WAITLIST 

Put BITl OF INI INTO Bill Op INIlOSAV 


CmLLED by waitlist EVERY 10 MSEC UNTIL 
A CHANGE IN INl IS DETECTED. 

PUT ALL l6 BITS OF INI INTO 0 

ZERO TIMEl* TIME2 IN ANTICIPATION 
OF UPDATING, 

PUT ALL 16 BITS OF INI INTO A 

returns Here if ini has not changed 

RETURNS here IF INI HAS CHANGED 
FURM DP DIFFERENCE OF C(INl) TAKEN AFTER 
SIANDBY minus C(INl) TAKEN BEFORE 
STANDBY, THIS DIFF IS IN THE BITS 
CORRESPONDING TO TlMEU TIME2. 


DiFF IS + 

DIFF IS -NZf add BlTlO TO Hi PART 

GU TO EXEC TO FINISH UP 
Go TO EXEC TO FINISH UP 


perpetuates waitlist request EVERY 
10 MSEC Until ini changes. 


^BAb78A YUL SYSTEM FDR AGCA! REVISION 0 OF PROGRAM SOLKUMS5 BV NASA 1021108-021 


DEC A* 1966 


(MAIN) PAGE 256 


L 

EXTENDED VERBS FOR 

MODING 



USER’S OWN PAGE NO. 22 

0520 

0521 

REF 1 

REF 26 LAST 255 

05*672 b 12&6& 1 

05.6727 0 2256 1 

CADR 

t: 

POSTBYl 

taskover 



0522 

ref 

2 

LAST 

253 

05*6730 

4 

1101 

1 P0STBY3 

cs 

TlMElSAV 

Called by exec 

0523 

REF 

2 

LAST 

255 

05*6731 

6 

1105 

1 

AD 

INILODIF 

TIME WAS STORED COMP 

0524 

REF 

253 

LAST 

252 

05*6 732 

5 

0116 

1 

TS 

MPAC +1 


0525 

REF 

91 

LAST 

255 

05*6733 

3 

5501 

0 

CAF 

ZERO 


0526 

REF 

2 

LAST 

255 

05*673-4 

6 

1104 

0 

AD 

INIHIDIF 


0527 





05*6735 

2 

5777 

1 

EXTEND 



0528 

REF 

2 

LAST 

253 

05*6736 

6 

1100 

1 

SJ 

T1ME2SAV 

TIME WAS STORED COMP 

0529 

REF 

25A 

LAST 

256 

05*6737 

5 

0115 

1 

TS 

MPAC 


0530 





05*6740 

0 

6741 

0 

TC 

♦ 1 

JUST IN CASE OF OF 

0531 

REF 

92 

LAST 

256 

05*6741 

3 

5501 

0 

CAP 

ZERO 

MAKES TPAGREE SAFE FOR DPAGREE 

0532 

REF 

255 

LAST 

256 

05.6742 

5 

0117 

a 

TS 

MPAC +2 


0533 

REF 

32 

LAST 

252 

05*6743 

0 

5654 

0 

TC 

BANXCALL 


0534 

REF 

6 

LAST 

252 

05 * 6744 

07154 

0 

cadr 

TPAGREE 


0535 

REF 

256 

LAST 

256 

05*6745 

3 

0116 

1 

XCH 

MPAC +1 


0536 

REF 

8 

last 

252 

05 * 6746 

5 

0617 

i 

TS 

DSPTEMl +1 


0537 

REF 

257 

LAST 

256 

05*6 74 7 

3 

0115 

1 

XCH 

MPAC 


0538 

REF 

9 

LAST 

256 

05*6750 

5 

06 16 

0 

TS 

DSPTEMl 


0539 

REF 

1 



05.6751 

0 

6511 

1 

TC 

UPDATIME 



YUL SYbTEM FOR AGC^t REVISION 0 OF PROGRAM 50LRUM55 BY NA&A 1021108-021 


DEC 1966 


(MAIN) page 257 


L 

extended 

verbs for 

MODING 






USER»S Own page no. 23 

P05A0 



SELECT and 

INITUIE 

DESIRED 

SYSTEM test 

P^OGRAF 

L « 


05^1 

REF 

8 

LAST 

251 

05 t6752 

0 3302 

0 

SYSTEST 

tc 

GRABDSP 

FIXED BY the PHaNTI 

0542 

REF 

8 

LAST 

251 

05.6753 

0 3310 

0 


tc 

PREGBSY 


054 3 

REF 

7 

LAST 

168 

05.6754 

1 0612 

0 


CCS 

M0DRE6 

MUST NOT BE RUNNING ANYTHING. 

0544 

REF 

1 



05.6755 

0 7146 

0 


tc 

XVbOUT 


0545 

REF 

2 

LAST 

169 

05.6756 

0 2362 

1 


TC 

newmode 

FOR SYSTEM TEST. 

0546 





05.6757 

00007 

0 


OCT 

07 


0547 

REF 

1 



05 .6760 

3 7013 

1 

REDO 

CAP 

LQPL 

ASK FOR TEST OPTION (1 - 7J. 

0548 

REF 

258 

LAST 

256 

05.6761 

5 0117 

0 


TS 

MPAC +2 


0549 

REF 

1 



05.6762 

3 7012 

0 


caf 

testnv 


0550 

REF 

19 

LAST 

251 

05.6763 

0 3100 

0 


TC 

NVSUB 


0551 

REF 

17 

LAST 

251 

05.6764 

0 3315 

0 


TC 

PRENVBSY 


0552 

REF 

12 

LAST 

252 

05.6765 

0 3136 

0 


TC 

ENDiDLE 


U553 

REF 

2 

LAST 

257 

05 . 6 7t>6 

0 7146 

0 


TC 

XVBOUT 


0554 

REF 

1 



05.6767 

0 6760 

0 


TC 

REDO 


0555 





05.6770 

2 0017 

0 


INHINT 



0556 

REF 

2 

LAST 

124 

05.6771 

3 4501 

1 


caf 

PR 1020 


0557 

REF 

6 

LAST 

170 

05.6772 

0 2046 

1 


TC 

F INDVAC 


0558 

REF 

1 



05.6773 

12775 

I 


CAOR 

TSELECT 


0559 

REF 

28 

LAST 

255 

05.6774 

0 2124 

1 


TC 

ENOOFJOB 

LEAVING DISPLAY GRABBED FOR SYSTEM TEST 

0560 

REF 

a 

LAST 

232 

05.6775 

3 5362 

0 

TSELECT 

CAF 

SEVEN 


0561 

REF 

1 



05.6776 

7 1225 

1 


MA3< 

QPUACE 

SAFETY PLAY, 

0562 

REF 

221 

LAST 

255 

05.677 7 

2 0000 

0 


INDEX 

A 


0563 

REF 

1 



05.7000 

3 7002 

1 


CAF 

testcadr 


0564 

REF 

3 

LAST 

123 

05.7001 

0 5723 

1 


TC 

BANXJUMP 


05o5 

REF 

9 

LA5T 

249 

05*7002 

12075 

0 

testcadr 

CADR 

alm/end 

0 ILLEGAL. 

0566 

REF 

1 



05.7003 

24511 

1 


cadr 

GYDRFT 

1 gyro drift TEST. 

0567 

ref 

1 



05.7004 

24606 

1 


cadr 

acceltst 

2 PiPA SCALE Factor determination. 

0568 

REF 

1 



05.7005 

24000 

1 


C A l)R 

ALGNTST 

3 IMU ALIGNMENT TEST 

0569 

REF 

1 



05.7006 

24372 

1 


CADR 

IMUCHK 

4 IMU CHECK. 

0570 

REF 

1 



05.7007 

24203 

0 


cadr 

GYROTORX 

5 GYRO TOkOUiNG TEST, 

0571 

REF 

1 



05.7010 

23‘.21 

1 


cadr 

LCHK 

6 c relay check. 

0572 

REF 

1 



05.7011 

23534 

1 


cadr 

dcheck 

7 D5KY Check. 

0573 





05.7012 

02101 

0 

testnv 

OCT 

2101 


0574 

REF 

2 

LAST 

257 

05.7013 

01225 

0 

lqpl 

ADRES 

QPLACE 


0575 

REF 

10 

LAST 

249 

05.7014 

0 5720 

1 

goshosum 

TC 

POSTJUMP 

SI ART ROUTINE TO DISPLAY SUM OF EACH 

0576 

REF 

1 



05.7015 

23025 

1 


CADR 

ShO*^5UM 

BANK ON USKY 


^a^t>7HA YUL system FqR aGC-:*: REVISION 0 0^ PRo&RAM SoLRUM55 BY NASA 1021108-021 


Dec 1956 


(Main) page ?sh 


L extended verbs for M0DIN3 USER'S OWN PAGE NO. 2A 

pQsr? Verb 75 allows the ground to perform some i/o operations with tHe dsky. Four options are 

R0579 mechanized FOR FLIGHT 501 tWiTH MAJu^ MODES DURING ALLOWED) - 


R 0 5 B C 



1 

GIMBAL MDTOK 

POWER DN 



R0581 



2 

GlMBAL MDIQR 

POWER OFF 


R05b2 



3 

lift 

-OFF <AND 

■ GUIDANC 

E 

RELEASE) . 

R05bA 



4 

SaB- 

SM SEPARATE 




R05b5 



5 

FDAI 

ALIGN, 





05b6 

REF 

9 

LAST 

257 

05*7016 

0 

3302 

0 

EXTkAI/0 

05b7 

REF 

9 

LAST 

257 

05*7017 

0 

3310 

D 


05b8 

REF 

1 



05*7020 

3 

7143 

0 

75REL0AD 

05b9 

REF 

259 

LAST 

257 

05*7021 

5 

01 1 / 

0 


05VC 

REF 

1 



05*7022 

3 

7144 

1 


0591 

REF 

20 

LAST 

257 

05*7023 

0 

3100 

0 


0592 

REF 

18 

LAST 

257 

05*7024 

0 

3315 

0 


0593 

REF- 

13 

LAST 

257 

05*7025 

0 

3136 

0 


059 A 

REF 

3 

LAST 

257 

05*7026 

0 

7146 

0 


0595 

REF 

1 



05*702 / 

0 

7020 

1 


0596 

ref 

1 



05*7030 

1 

0616 

1 


0597 





05*7031 

0 

7035 

0 


0596 

REF 

2 

LAST 

258 

05*7032 

0 

7020 

1 


0599 

REF 

3 

LAST 

258 

05*7033 

0 

7020 

1 


0600 

REF 

4 

LAST 

258 

05*7034 

0 

7020 

1 


0601 

REF 

1 



05*7035 

7 

7141 

0 

♦ 4 

0602 

REF 

222 

LAST 

25/ 

05*7036 

1 

0000 

0 


0603 

REF 

5 

LAST 

258 

05*7037 

0 

7020 

I 


060A 

REF 

2 

LAST 

25a 

05*7040 

2 

06 1 6 

1 


0605 





05*7041 

0 

7041 

0 


0606 

REF 

1 



05*7042 

0 

7066 

0 


0607 

REF 

1 



05.7043 

0 

7075 

1 


0608 

REF 

1 



05*7044 

0 

7104 

0 


0609 

REF 

1 



05*7045 

0 

7052 

1 


0610 

REF 

1 



05 * 7046 

0 

7124 

1 


0611 

REF 

6 

LAST 

258 

05*704/ 

0 

7020 

1 


0612 

REF 

7 

LAST 

25b 

05*7050 

0 

7020 

1 


0613 

REF 

8 

LAST 

25b 

05*7051 

0 

7020 

1 



MAJOR modes ox, 

MAJOR MODES OX, 

MAJOR MODES 02 AND OA, 

MAJOR MODE U, 

MAJOR MODES OX. 

TC GRABDSP 

TC PREGBSY 

CAF LV75TEMP AaK FOR FUNCTION NUMBER, 

TS MPAC +2 

CAF STATENV 

TC NVSUB 

TC PRENVeSY 

TC END IDLE 

1 C XVBOUT 

TC 75REL0AD 

CCS V75TEMP MAKE SURE FUNCTION NUMBER IS LEGIT, 

K +A 

TC 75REL0AD 

TC 75REL0AD 

TC 75RtL0AD 

MASK 75hll2 

TC^ 75RELDAD 

INDEX V75TEMP 

TC +0 

TC 75FfMl 

TC 75FN2 

TC 75FN3 

TC 75FNA 

TC 75FN5 

TC 75REL0AD 

rc tsrelqad 

TC 75REL0AD 


^l' 


I i m*l ^ i 


\ ^ W 




r 






^b^578A YUL system FOR AGcA; REVISION 0 OF PROGRAM 5DLRUM55 ev NASA 1021108-021 


DEC a » 1966 


(MAIN) PAGE 259 


extended verbs for mod ins 


USER'S OWN page NO, 25 


P0614 



FUNCTION 

4 

- DO 5413 

SEPARATE 

■ 



0615 

REF 

3 

LAST 

169 


05*7052 

0 2346 

1 75FNA 

TC 

CHECkMM 

0616 






05t7053 

00014 

1 

OCT 

14 

0617 

REF 

1 




05,7054 

0 7145 

0 

TC 

malaprop 

0618 






05,7055 

2 0017 

0 

PHINT 

0619 

REF 

9 

LAST 

254 


05,7056 

3 4507 

1 

CAP 

BITS 

0620 

REF 

7 

LAST 

221 


05,7057 

/ 0646 

1 

MA5< 

FLAGWRDl 

0621 

REF 

223 

LAST 

258 


05 ,7 060 

1 0000 

0 

CCS 

A 

0622 

ref 

4 

LAST 

258 


05,7061 

0 7146 

0 

TC 

XVBOUT 

0623 

REF 

3 

LAST 

170 


05,7062 

3 2160 

1 

CAF 

PRIQ25 

062A 

REF 

7 

LAST 

25/ 


05,7063 

0 2046 

1 

TC 

FINDVAC 

0625 

REF 

2 

LAST 

170 


05,7064 

64336 

0 

CAOR 

sabsmsep 

062B 

REF 

5 

LAST 

259 


05,7065 

0 7146 

0 

TC 

XVbOUT 

R0629 



FUNCTION 

1 

- GIM3AL 

MOTOR POWER ON - 

DURING 

PRE-LAUNCH 

0630 

REF 

1 




05 ,7066 

3 7140 

0 75FNI 

CAF 

75MA5K 

0631 

REF 

8 

LAST 

257 


05,7067 

7 0612 

0 

MASK 

MODREG 

0632 

REF 

224 

LAST 

259 


05,7070 

1 0000 

0 

CCS 

A 

0633 

REF 

2 

LAST 

259 


05,7071 

0 7145 

0 

TC 

MALAPROP 

063A 

REF 

1 




05,7072 

0 3373 

0 

TC 

RELAYON 

0635 






05,70/3 

40200 

1 

OCT 

40200 

0636 

REF 

6 

LAST 

259 


05,7074 

0 7146 

0 

TC 

XVBOUT 

R0637 



FUNCTION 

2 

- GIM3AL 

MOTOR POWER OFF 

- DURING 

PRE-LAUNCH 

0638 

REF 

2 

LAST 

259 


05,7075 

3 7140 

0 75FN2 

CAP 

75MASK 

0639 

REF 

9 

LAST 

259 


05,7076 

7 0612 

0 

MASK 

MODREG 

06A0 

REF 

225 

LAST 

259 


05,7077 

1 0000 

0 

CCS 

A 

06AI 

REF 

3 

LAST 

259 


05,7100 

0 7145 

0 

TC 

MALAPROP 

0642 

REF 

1 




05,7101 

0 3405 

0 

TC 

RELAYOFF 

06A3 






05,7102 

40200 

1 

OCT 

40200 

06^4 

REF 

7 

LAST 

259 


05,7103 

0 7146 

0 

TC 

XVBOUT 


NU MODE 13 planned. 


Switch set - function already done 


Ab^+STBA 

YUL 

system for A&cA 

: REV I bl ON 

0 Of 

:d( 

L 

extended 

verbs FDR 

MOD I N o 



P06A5 



FUNCTION 3 

- DO lift 

-OFF IF 

If 

06A6 

ref 

4 

LAST 

259 

05*7104 

0 2346 

1 

06<+7 





05*7105 

00004 

0 

06a8 

REF 

1 



05*7106 

0 7120 

0 

0649 





05*7107 

2 0017 

0 

0650 

REF 

7 

LAST 

182 

05,7110 

3 4515 

1 

0651 

REF 

8 

LAST 

259 

05*7111 

7 0646 

1 

0652 

REF 

226 

LAST 

259 

05*7112 

1 0000 

0 

0653 

REF 

8 

LAST 

259 

05,7113 

0 7146 

0 

065A 

REF 

2 

LAST 

170 

05*7114 

3 2157 

0 

0655 

REF 

0 

LAST 

259 

05*7115 

0 2046 

1 

0656 

REF 

2 

LAST 

170 

05,7116 

64000 

0 

0659 

REF 

9 

LAST 

260 

05,7117 

0 7146 

0 

0660 

ref 

5 

Last 

260 

05,7120 

0 2346 

1 

0661 





05*7121 

00002 

0 

0662 

ref 

4 

LAST 

259 

05*7122 

0 7145 

0 

0663 

REF 

2 

LAST 

258 

05*7123 

0 7107 

0 

R066 A 



FUNCTION 5 

- FDAI ALIGN ON. 


0665 

REF 

3 

LAST 

259 

05*7124 

3 7140 

0 

0666 

REF 

10 

LAST 

259 

05,7125 

7 0612 

0 

0667 

REF 

227 

LAST 

260 

05*712g 

1 0000 

0 

0668 

REF 

5 

LAST 

260 

05*7127 

0 7145 

0 

0669 

REF 

2 

LAST 

259 

05,7130) 

0 3373 

0 

0670 





05*7131 

40400 

1 

06 n 





05,7132 

2 0017 

0 

06 72 

REF 

1 



05,7133 

3 7142 

1 

06 73 

REF 

37 

LAST 

255 

05*7134 

0 2173 

0 

06 ?A 

REF 

1 



05*7135 

50172 

0 

0675 

REF 

10 

LAST 

260 

05*7136 

0 7146 

0 

06 7b 





05*7137 

77715 

1 

06 77 





05*7 14u 

00u70 

0 

06 7b 





05,7141 

77770 

1 

0679 





05,7142 

01 75 0 

1 

0680 

REF 

3 

LAST 

258 

05*7143 

00616 

0 


Cr, 




Ca ‘ I 






SOLf^UM55 By NASA 1021106-021 


DEC a, 1966 (MAIN) pA&e 260 


USER'S OWN page NO, 26 


MAJOR MODE QA 


75FN3 

T C 

CHECKMM 


DCT 

4 


TC 

CHECKM02 

+ 3 

I NHINT 



CAF 

6IT2 


MASK 

FLAGWRDl 


CCS 

A 


TC 

XVBOUT 


CAF 

PR 1024 


TC 

FINOVAC 


cadr 

LIFTOFF 


TC 

XVBDUT 

CHECKM02 

TC 

CHECKMM 


DCT 

00002 


TC 

MALAPROP 


TC 

75FN3 +3 


75FN5 

CAF 

75MA5K 


MASK 

MODREG 


CCS 

A 


TC 

MALAPROP 


TC 

relayon 


T 

INHINT 

40400 


CAF 

105ECS75 


TC 

waitlist 


CADR 

fdoftski 


TC 

XVBOUT 

-.5SEC75 

DEC 

-50 

75MASK 

DCT 

70 

75HI12 

DCT 

77770 

105ECS75 

DEC 

1000 

LV75TEMP 

ADRES 

V75TEMP 


TEST IF PLATFORM IS INERTIAL (MM qa) 

II IS NOT. TEST IF STILL GYKOCDMPASSING 


Check if gyrocompas^ing 

NuT INERTIAL OR GYROCOMPASSING 


TORN OFF IN 10 SECONDS, 


» 





• 

% 




:V 






I 


i • * -♦ 



% t 





I 


L 


t 


I 


AB^b7tiA YUL system FOR AGCA; REVISION 0 OF PROGRAM SOLRUM65 BY 


L extended verbs KOR MODIfJo 


PObBl 

THE 

Following 

PROGRAM 

06B29 





0683 

REF 

3 

Last 

199 

06835 





0684 

REF 

1 



06845 

REF 

1 



06 b 6 

REF 

8 

LAST 

260 

06855 

REF 

2 

LAST 

261 

0686 

REF 

16 

LAST 

255 

06865 

ref 

260 

LAST 

258 

0687 

REF 

6 

LAST 

260 

06875 





0688 

REF 

1 



06885 

REF 

U 

LAST 

260 

0689 

REF 

2 

LAST 

157 

06895 

REF 

2 

LAST 

236 

0690 

REF 

9 

LAST 

260 

06905 

REF 

228 

LAST 

260 

0691 

REF 

1 



06915 

REF 

1 



0692 

REF 

3 

last 

151 

069 25 

REF 

261 

LAST 

261 

0693 

REF 

2 

LAST 

157 

06935 

REF 

3 

LAST 

257 

0694 





069A5 

REF 

1 



0695 

REF 

1 



0696 

REF 

10 

LAST 

258 

06965 

REF 

10 

LAST 

250 

06966 

REF 

17 

LAST 

261 

0697 

REF 

2 

LAST 

157 

06975 

REF 

2 

LAST 

261 

0698 

REF 

262 

LAST 

261 

06982 

REF 

1 



06985 

REF 

21 

LAST 

258 

0699 

REF 

19 

LAST 

258 

06995 

REF 

14 

LAST 

253 

0700 

ref 

1 



0701 

REF 

1 



07013 

REF 

106 

LAST 

255 

07015 

REF 

3 

LAST 

261 

0702 

REF 

4 

LAST 

261 

0703 

REF 

7 

LAST 

261 

07035 





0704 

REF 

2 

LAST 

261 

070A5 

REF 

3 

LAST 

261 

0705 

ref 

3 

LAST 

261 

07055 

REF 

229 

LAST 

261 

0706 

REF 

230 

LAST 

261 

07065 

REF 

4 

LAST 

261 


IMPLEHENTS major mode 27 OE FLIG 



13,6 75 

i3 


BA\< 

13f675i 

0 

3430 

0 

76UPDATE 

TC 

13*6754 


?OOOU 

0 


OCl 

13*6755 

4 

7174 

0 


Cb 

13*6756 

0 

6762 

1 


rc 

13 *675 7 

3 

4515 

1 

71UPDATE 

CAF 

13*6760 

0 

6 762 

1 


rc 

13*6/61 

3 

45 1 6 

I 

7 /UPDATE 

caf 

13*6762 

5 

0115 

1 

DATUPDAT 

15 

13*6763 

0 

2346 

1 


TC 

13*6764 

00024 

1 


OCl 

13*6765 

0 

7062 

1 


TC 

13 * 6 766 

4 

0612 

0 

STUFMODE 

C5 

13*6767 

5 

1116 

0 


T5 

13*6770 

3 

6754 

1 


CAF 

13*6771 

7 

0646 

1 


MASX 

13*6772 

1 

0000 

0 


CCS 

13,6773 

0 

7203 

1 


TC 

13*677h 

3 

256 7 

1 


CAF 

13,6775 

5 

0672 

1 


T5 

13,6776 

3 

0115 

1 


XCH 

13*6777 

5 

1117 

1 


T5 

13*7000 

0 

2362 

1 


TC 

13*7001 

( 

0002 7 

1 


DCT 

13*7002 

4 

7132 

1 


C5 

13* 7003 

5 

1 122 

1 


T5 

13*7004 

0 
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45 1 6 

1 

TS+-CHK 

CAF 

023A 

REF 

47 

LAST 

234 

11 

» 6 3 0 6 

5 

0034 

0 


TS 

0235 

REF 

6 

LAST 

269 

11 

,630 f 

6 

4476 

0 


AD 

02 36 

REF 

23 

LAST 

269 

11 

,6310 

5 

1771 

1 


T5 

0237 

REF 

3 7 

LAST 

268 

11 

,6311 

0 

6013 

0 


7C 

0238 

REF 

24 

LAST 

2 70 

11 

*6312 

6 

1 771 

1 


AD 

0239 

REF 

48 

LAST 

270 

11 

♦ 6313 

6 

0034 

0 


AD 

02AO 

REF 

49 

LAST 

270 

11 

♦ 631^, 

5 

0034 

0 


T5 

02-^1 

REF 

251 

LAST 

268 

11 

,6315 

4 

0000 

0 


CS 

02A2 





11 

,6316 

2 

5777 

1 


1 NDEX 

02<t3 

REF 

1 



11 

,6317 

6 

6376 

0 


6 

02aA 

REF 

25 

LAST 

270 

11 

♦ 6320 

5 

1 ni 

1 


TS 

0245 

REF 

38 

LAST 

270 

11 

♦ 6321 

0 

6013 

0 


TC 

0246 

REF 

26 

last 

270 

11 

♦ 6322 

6 

1771 

1 


AD 

0247 

REF 

50 

LAST 

270 

11 

• 6323 

6 

0034 

0 


AD 

0248 

REF 

4 

LAST 

269 

11 

♦ 6324 

0 

6033 

1 


TC 

R0249 

NOT 

POSSIBLE 

TO Check wovi pulse in nxii 



R0250 

START WOVI pulse 

CHECK 

AND INHINT RELINT 

CHECK 


0251 

REF 

1 



11 

♦ 6325 


0017 

0 

RUPTCHK 

I NDEX 

0252 

REF 

1 



11 

♦ 6326 

3 

5501 

Q 


CAF 

0253 





11 

♦ 6327 

5 

0024 

1 


TS 

0254 

REF 

1 



11 

♦ 6330 

2 

0016 

1 


INDEX 

0255 

REF 

12 

LAST 

255 

11 

♦ 6331 

6 

0036 

1 


AD 

0256 

REF 

27 

LAST 

270 

11 

♦ 6332 

5 

1771 

1 


TS 

0257 

ref 

28 

LAST 

270 

11 

,6333 

4 

1771 

0 

TENMS 

CS 

0258 

REF 

13 

LAST 

270 

11 

♦ 6334 

6 

0036 

1 


AD 

0259 

REF 

252 

LAST 

270 

11 

♦ 6335 

1 

0000 

0 


CCS 

0260 

REF 

253 

LAST 

270 

11 

♦ 6336 

1 

0000 

0 


CCS 

0261 

ref 

1 



1 1 

♦ 6337 

0 

6325 

0 


TC 

0262 





11 

,6340 

0 

6342 

1 


TC 

0263 

REF 

1 



11 

163^1 

0 

6333 

1 


T C 

0264 

REF 

1 



11 

,6342 

3 

6001 

0 


CAF 

0265 

ref 

254 

LAST 

270 

11 

♦ 6343 

1 

0000 

0 

7-8WAIT 

CCS 

0266 

REF 

1 



11 

♦ 6344 

0 

6343 

0 


TC 

0267 

REF 

2 

LAST 

270 

11 

♦ 6345 

2 

0017 

0 


INDEX 

0268 





11 

♦ 6346 

1 

0024 

0 


CCS 

0269 

REF 

2 

LAST 

270 

11 

♦ 634 / 

0 

6325 

0 


TC 

0270 

REF 

3 

LAST 

270 

11 

♦ 6350 

3 

4516 

1 


CAF 

0271 

REF 

38 

LAST 

260 

11 

♦ 6 3 5 1 

0 

2173 

0 


TC 

0272 

REF 

2 

LAST 

265 

11 

♦ 6352 

22401 

1 


CADR 

0273 

REF 

7 

LAST 

270 

11 

♦ 6353 

3 

4476 

0 


XCH 

0274 

REF 

1 



11 

♦ 6354 

6 

6000 

1 


AD 

0275 

REF 

2 

LAST 

270 

11 

♦ 6355 

2 

0016 

1 


1 ndex 

0276 

REF 

255 

LAST 

270 

11 

♦ 6356 

1 

0000 

0 

WAITI 

CCS 

02 n 

REF 

4 

LAST 

268 

1 1 

♦ 635 7 

6 

4515 

1 


AD 

0278 





11 

,6360 

0 

6362 

0 


TC 

0279 

REF 

1 



11 

♦ 6361 

0 

6374 

1 


TC 

0280 





11 

♦ 6362 

2 

577 7 

1 


INDEX 
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NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 270 


SCONl 

OVCTR 

USER 

«S OWN PAGE NO, 6 

SCON + MAX 
SKEtPl 

errors 

C(A) 

= ♦ WITH overflow 

SKEEPl 

C(A) 

= ♦! 

OVCTR 

OvCTR 

C(A) 

= +3 

A 

5777 

C(A) 

= 77774 

SCONTS 

SKEEPl 

ERRORS 

C(A) 

= -0 WITH UNDERFLOW 

SKEEPl 

C (A) 

? “1 

OVCTR 

C lA) 

= -1 + 2 


-ONECHK -1 


INHINT 

SCONO 

002A 

RELINT 

TIMEI 

SKEtPl 

SKEEPl 

TlMEl 

A 

A 

RUPTCHK 
♦ 2 

lENMS 
T N( 1 WA I T 
A 

7-ertAlT 

iNHlNT 

002A 

RUPTCHK 

SCONl 

WAITLIST 

TSKADR5 

SCON+MAX 

OVCON 

HELINT 

A 

SCON 2 

+ 2 

WOVIRPT 
5 777 


ZKUPT 


Check for next pulse tp timei 


SIART AGAIN, TIMING IS OFF DUE TO RUPT 
lU MS PULSE HAS ARRIVED AT TIMEI 

SIART 7 TO 8 MS WAIT 


ZKUPT 

THERE WAS AN INTERRUPT, START AGAIN 


WILL STAY IN OVERFLOW, UNDERFLOW FoR 
approximately 3 MS 


4a^t>7BA 

YUL 

SYSTEM FOR AGCA; REVISION 

0 

OF PROGRAM 50LRUM55 BY 

L 

AGC 

SELF 

-CHECK 







02 61 

REF 

1 



11 »6363 

6 

5504 

0 


6 

0262 

REF 

256 

LAST 

270 

1 1 * 63 6A 

3 

0000 

1 


XCH 

0283 

RLF 

2 

LAST 

270 

1 1 *6365 

2 

5501 

1 


INDEX 

026^ 

REF 

257 

LAST 

271 

1 1 » 6366 

4 

0000 

0 


C5 

0285 

REF 

258 

LAST 

271 

11 *6367 

7 

0000 

0 


MASK 

0286 

REF 

259 

LAST 

271 

1 1 *6370 

4 

0000 

0 


C5 

0287 

REF 

260 

LAST 

271 

1 1*6371 

5 

0000 

1 


TS 

0288 

REF 

39 

LAST 

270 

11*6372 

0 

6013 

0 


TC 

0289 

REF 

1 



1 1*6373 

0 

6356 

1 


TC 

0290 

REF 

3 

LAST 

270 

11 *637^* 

2 

0017 

0 

WOVIRPT 

INDEX 

0291 

REF 

29 

LAST 

270 

11.6375 

5 

1771 

1 


TS 

0292 





1 1 *6376 

37775 

0 

SCONTS 

octal 

0293 

REF 

3 

LAST 

270 

11*6377 

2 

0Ul6 

1 


INDEX 

R029A 

INTERRUPT should 

appear before 

NEXT I 

NSTRUCTION 


0295 

REF 

1 



1 1 .6«r00 

0 

6410 

1 


TC 

0296 





11*6901 

4 

0024 

0 

TSKADRS 

C5 

0297 

REF 

1 



11*6902 

6 

6002 

Q 


AD 

029B 

REF 

3 

LAST 

269 

11 * 6 90 3 

0 

6023 

0 


TC 

0299 

REF 

1 



11 * 6 909 

3 

17 66 

1 


XCH 

0300 

ref 


LAST 

270 

11.6905 

6 

45 1 6 

1 


AD 

0301 

REF 

2 

LAST 

271 

1 1 * 6906 

3 

1766 

1 


XCH 

0302 

REF 

29 

LAST 

256 

11*6907 

0 

2256 

1 


TC 


0303 

ref 

2 

LAST 

140 

11*6410 

1 

1762 

1 

SOPTIONl 

f- c. 

0304 

REF 

2 

LAST 

265 

11*6911 

0 

3000 

1 


TC 

0305 

REF 

3 

LAST 

271 

11*6912 

0 

3000 

1 


TC 

0306 





11*6913 

0 

64 1 4 

0 


TC 

R0307 

COUNTS DOWN 

15 bit 

number (APPROXIMATELY 

10 SECONDS) 

0308 

REF 

8 

LAST 

270 

11*6914 

4 

4476 

1 

COUNTCHK 

C5 

0309 

REF 

4 

LAST 

269 

1 1 *6915 

5 

1775 

0 


TS 

0310 

REF 

165 

LAST 

269 

11*6916 

5 

0001 

0 

COUNTS 

TS 

0311 

REF 

166 

LAST 

271 

11.6917 

i 

0001 

1 


CCS 

0312 

REF 

1 



1 1*6920 

0 

6434 

1 


rc 

0313 





11*6921 

37776 

0 

5C0NSU 

DCTAL 

0314 





1 1 * 6 922 

0 

6424 

0 


TC 

0315 

REF 

1 



1 1 * 6923 

0 

6443 

i 


TC 

0316 

REF 

5 

LAST 

271 

1 1 .6424 

6 

1775 

0 


AD 

0317 

REF 

5 

LAST 

270 

1 1*6425 

0 

6034 

0 


TC 

0318 

REF 

16 

LAST 

148 

1 1 *6 426 

1 

0215 

0 


CCS 

0319 

REF 

1 



11*6427 

0 

7377 

0 


TC 

0320 

REF 

6 

LAST 

271 

11*6430 

4 

1775 

1 


C5 

0321 

REF 

2 

LAST 

271 

11 *6931 

6 

5504 

0 


AD 

0322 

REF 

4 

LAST 

269 

11*6932 

5 

1774 

1 


T 5 

0323 

REF 

1 



11 *6933 

0 

64 1 6 

1 


TC 

0324 

REF 

261 

LAST 

271 

11 * 6 934 

4 

0000 

0 

-NMBR 

C5 

0325 

REF 

7 

LAST 

271 

11 *6935 

5 

1775 

0 


] S 

0326 

REF 

5 

LAST 

271 

11*6936 

6 

1774 

1 


A D 

0327 

REF 

6 

LAST 

271 

11*6937 

0 

6033 

1 


TC 
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5C0NMAX 

A 

SCONO 

A 

A 

A 

A 

ERRORS 

WAITI 

INHINT 

SKEtPl 

37775 

RELlNT 

5u -0 

SORT iONl 

0024 

ZRUPTCON 

End of pulses check 

C(ZRUPT) = ADDRESS OF TSKADRS 

-ZEROCHK 

SCOUNT 

5C0N1 

SCOUNT 

TASKOVER 

ADD +1 TO SCOUNT REGISTER AT THIS 

PUINT OF self-check. 

SMODE 

smodech< 

3 OPTIONS OF self-check 

End of PULSES ONLY CHECK 

SMOOECHK 

♦ 1 

Continue if c(smode) is a neq. numbsr 

scon+max 

5KEEP5 

0 

Q 

-NMBR 

37776 

+ 2 

OF COUNT 

SKEEP5 

-ONLCHK 

NEWJOP 

DUMEXIT 

SKEEP5 

SCONMAX 

SKEEP4 

COUNTS 

A 

5KEEP5 

SKEEP4 
-ONECHK -1 

-0 


4«4578A YUL system FDR AGC^»: REVISION 0 Oh PROGRAM SoLRUMSS By NASA 1021108-021 
L AGC self-check USER'S 


0328 

REF 

8 

LAST 

271 

1 1 t 6 

4 

1775 

1 


cs 

SKEEP5 

0329 

REF 

262 

LAST 

271 

11 f 6 4 1 

4 

ooou 

0 


C5 

A 

0330 

REF 

2 

LAST 

271 

1 1 ♦ 6^42 

0 

64 1 6 

1 


TC 

COUNTS 

R0331 

COUNTS DOWN ( 

OVERFLOW 

NUMBER 

(APPROXIMATELY 3.5 5E 

COSJDS) 


0332 

REF 

1 



1 1 

5 

1777 

1 

OFCOUNT 

TS 

SKEEP7 

0333 

ref 

9 

LAST 

271 

111 64^^ 

3 

4476 

0 


CAF 

SCON+MAX 

033A 

REF 

263 

LAST 

2 72 

11 1 6 4 b 

6 

0000 

1 


AD 

A 

0335 

REF 

5 

LAST 

271 

1 1 f 6 ^^6 

6 

4516 

1 

C0UNT50F 

AD 

SCONl 

0336 





1 1 1 6 ^4 7 

2 

0017 

0 


INHINT 


0337 

REF 

\6T 

LAST 

271 

1 1 f 6 ^50 

3 

0001 

0 


XCH 

Q 

0338 

REF 

166 

LAST 

272 

11 f 

1 

0001 

1 


CCS 

Q 

0339 

REF 

2 

LAST 

267 

11 l6^^52 

5 

1776 

0 


TS 

SKEEP6 

03^0 

REF 

1 



11 1 6 4b 3 

0 

6466 

0 


TC 

ENDOF 

03‘tl 





11 1 6 454 

2 

0016 

1 


RtLINT 


03^2 

REF 

2 

LAST 

272 

1 1 1 64bb 

6 

1 77 ? 

1 


AD 

SKEEP7 

0343 

REF 

3 

LAST 

272 

11 i64b6 

5 

1777 

1 


T5 

SKEEP7 

0344 





llf645/ 

0 

6461 

1 


TC 

+ 2 

0345 

REF 

40 

LAST 

271 

1 1 I 6 4 6 0 

0 

6013 

0 


TC 

errors 

0346 

REF 

17 

LAST 

271 

11 1 6 46 1 

1 

0215 

0 


CCS 

NEWJOB 

0347 

REF 

2 

LAST 

271 

1 1 1 6 462 

0 

7377 

0 


TC 

DUMEXIT 

0348 

REF 

10 

LAST 

272 

11 1 6 4 6 3 

3 

4476 

0 


CAP 

bCON+KAX 

0349 

REF 

3 

LAST 

272 

1 1 1 6 4 6 4 

6 

1776 

0 


AD 

SKEEP6 

0350 

REF 

1 



1 1 1 6 4 6 b 

0 

6446 

1 


TC 

COUNT50F 

0351 

REF 

264 

LAST 

111 

1 1 1 6 466 

4 

0000 

0 

ENDOF 

CS 

A 

0352 





1 1 f 646 1 

2 

0016 

1 


RElINT 


0353 

REF 

4 

LAST 

112 

11 i6470 

6 

177 7 

1 


AD 

SKEEP7 

0354 

ref 

4 

LAST 

271 

1 1 1 647 1 

0 

6023 

0 


TC 

-ZEROCHK 


R03S5 REt^lSTER 1777 ALWAYS HOLDS LOWEST (X-U ADDRESS JJ5T CHECKED 
R0356 REGISTER 1776 HOLDS BEFORE CONTENTS OF X 

R03S7 REGISTER 1775 HOLDS BEFORE CONTENTS OF X-l 


R0358 

register 1774 IS 

STARTING ADDRESS 






R0359 

PUTS OWN address 

IN registers 

OCT 1774 

through QCT 60 (APPROX. 1.2 SEC) 


0360 

REF 1 

ll ♦6472 

3 

6004 

0 

ERASCHK 

CAF 

CONERA52 01774 

0361 


lli6473 

5 

17/7 

1 


TS 

177 7 


0362 


11 16474 

2 

0016 

1 

ERASLOOP 

RElINT 



0363 


11 16475 

1 

1777 

0 


CCS 

1777 


0364 


1 1 164 76 

5 

177 7 

1 


TS 

1777 


03645 


11 i647/ 

2 

0017 

0 


I NHINT 



0365 


1 1 i6500 

2 

17 7 7 

0 


NDX 

1777 


0366 


lli6501 

4 

0001 

1 


CS 

0001 


0367 

REF 265 LAST 272 

11 i6502 

4 

0000 

0 


CS 

A 


0368 


11 i6503 

5 

1776 

0 


TS 

1776 PUT 

C{X 

0370 


111 6504 

2 

1777 

0 


NDX 

1777 


0371 


11 i65U5 

4 

0000 

0 


CS 

0000 


03 72 

REF 266 LAST 272 

lli6506 

4 

0000 

0 


cs 

A 


03 721 


1 1 i6507 

5 

177 5 

0 


TS 

1775 PUT 

C(X 

03722 


1 1 i65iO 

4 

177 7 

0 


CS 

1777 


03723 

REF 267 LAST 272 

11 i65il 

4 

0000 

0 


cs 

A 



DEC A* 1966 
OWN page no* 


) IN 1776 

-1) IN 1775 


4ti^tj7aA YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUM55 BY 


L AGC SELF -CHECK 


03 f2A 

REF 

3 

LAST 

148 

11 *6512 

5 

1760 

1 


T 5 

03725 





1 1*6513 

2 

177 { 

0 


■NIDK 

03726 





11*6514 

5 

0000 

1 


TS 

03 fZ r 

REF 

6 

LAST 

272 

1 1*6515 

6 

4516 

1 


AD 

03 128 





1 1*6516 

2 

1 ^77 

0 


NDK 

0373 





11*6517 

5 

0001 

0 


JS 

037A 





11*6520 

2 

177 7 

0 


INDEX 

0375 





11*6521 

4 

0001 

1 


CS 

0376 





1 1 *6522 

2 

17 77 

0 


index 

0377 





1 1 *6523 

6 

0000 

1 


AD 

0378 

REF 

7 

LAST 

271 

11*6524 

0 

6034 

0 


TC 

0379 





11*6525 

4 

1777 

0 

COMPLMNT 

CS 

03BO 





11*6526 

2 

1 777 

0 


INDEX 

0381 





1 1 *6527 

5 

0000 

1 


T5 

0382 

REF 

1 



1 1*6530 

6 

4335 

0 


AD 

0383 





1 1 *6531 

2 

1777 

0 


i NDEX 

038A 





1 1*6532 

5 

0001 

0 


T5 

0385 





1 1 ♦ 6 5 33 

2 

17 77 

0 


I NDEX 

0386 





11*6534 

4 

0000 

0 


CS 

0387 





11*6535 

2 

1777 

0 


INDEX 

0388 





1 1 * 6536 

6 

0001 

0 


AD 

0389 

REF 

8 

LAST 

273 

11*6537 

0 

603a 

0 


TC 

0390 





1 1 * 6 540 

A 

1776 

1 


CS 

0391 

REF 

268 

LAST 

272 

11*6541 

4 

0000 

0 


CS 

0392 





1 1 ♦ b5‘+2 

2 

1777 

0 


NDX 

0393 





11 * 6 5 4 3 

5 

0001 

0 


TS 

039A 





1 1 ♦ 65h4 

4 

1/75 

1 


CS 

0395 

REF 

269 

LAST 

273 

11*6545 

4 

0000 

0 


CS 

03951 





11 * 6546 

2 

1777 

0 


NDX 

03952 





11*6547 

5 

0000 

1 


TS 

03953 

REF 

3 

LAST 

271 

11*6550 

4 

550A 

1 


CS 

0396 

REF 

4 

LAST 

273 

11*6551 

5 

1760 

1 


TS 

0397 

REF 

16 

LAST 

272 

1 1.6552 

1 

0215 

0 


CCS 

0398 

REF 

3 

LAST 

272 

1 1*6553 

0 

7377 

0 


TC 

0399 





1 1 * 6554 

4 

1777 

0 

ENDERA5 

CS 

0400 

REF 

1 



11*6555 

6 

6003 

1 


AD 

0401 

REF 

270 

LAST 

273 

1 1 * 6556 

1 

0000 

0 


CCS 

0402 





11 *655f 


14000 

1 

SC0N3/8 

octal 

0403 





1 1 * 6560 

63777 

0 

5CON-3/e 

dctal 

0404 

REF 

1 



11*6561 

0 

6a74 

0 


TC 

0405 

PEF 

4 

LAST 

271 

11.6562 

2 

0016 

1 


INDEX 

R0406 

C5 1 

ALL 

REGISTERS FROM OCT 57 

through 

acT 

20 


R04Q7 

ALL 

COUNTERS 

» PLUS 4 

SPARES, 

PLUS 4 

RJPT 

REGISTERS* 

R040ft 

PLUS CYCLE AND SHIFT 

REGISTERS 





0409 

REF 

2 

LAST 

120 

11 * 6 563 

3 

3220 

1 

CNTRCHK 

C AF 

0410 

REF 

30 

LAST 

271 

11*6564 

5 

1771 

1 

CNTRLOOP 

T5 

0411 

REF 

1 



11*6565 

6 

4512 

0 


AD 

0412 

REF 

271 

LAST 

273 

11*6566 

2 

0000 

0 


1 NDEX 

0413 





11*6567 

4 

0000 

0 


CS 
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USER'S OWN PAGE NO, 9 

ERESTORE 

IF RESTART, RESTORE C(X) AND C(X-1} 

1777 

0000 

5C0N1 

PUT OWN Address in x-i 

1777 

0001 

1777 

0001 

1777 

0000 

-ONECHK 

Put own Address in x 

1777 

1777 

0000 

SCON-1 

Puts complement of address in x-i 

1777 

0001 

1777 

0000 

1 7 7 7 

0001 

-ONECHK 

PUTS complememt of address in X 

1776 

A 

1777 

0001 

1775 

A 

restore C(X) 

1777 

0000 

restore C(X-l) 

SCONMAX 

EKESTORE 

NEW JOB 
DUMEXIT 

IF restart, do not restore C(X). C{X-1) 

1777 

CONERASl 

A 

lAOOO 

63777 

ERASLOOP 

HELINT 

♦60 OCT 


LOWS 

SKEEPl 

CONCNTRl 

a 

0000 

+ ^ 0 OC T 


4d^57bA YUL SYSTEM FDR AGC^t; REVISION 0 OF PRDC3RAM SoLRUMSS SY 


L AGC self-check 


0414 

REF 

31 

last 

2 73 

1 1 t6570 

1 1 771 

0 


CCS 

0415 

REF 

] 



1 1^6571 

0 6564 

0 


rc 

0416 

REF 

1 



1 1 *6572 

3 6005 

1 

CYCL5HFT 

CAF 

0417 

REF 

25 

LAST 

78 

1 U 65 73 

5 0020 

0 


T5 

0418 

REF 

11 

last 

96 

11*6574 

5 0022 

1 


T5 

0419 

REF 

10 

LAST 

104 

11*6575 

5 0021 

1 


T5 

0420 

REF 

3 

LAST 

41 

11*6576 

5 0023 

0 


T5 

0421 

REF 

26 

LAST 

274 

11*6577 

6 0020 

0 


AD 

0422 

REF 

12 

LAST 

274 

11*6600 

6 0022 

1 


AD 

0423 

REF 

11 

LAST 

274 

11*6601 

6 0021 

1 


AD 

0424 

REF 

4 

LAST 

274 

1 1 *6602 

6 0023 

0 


AD 

0425 

REF 

1 



1 1 * 6 603 

6 4664 

1 


AD 

0426 

REF 

9 

LAST 

273 

11*6604 

0 6034 

0 


TC 

0427 

REF 

3 

LAST 

271 

11*6605 

3 1767 

0 


XCH 

0428 

REF 

7 

LAST 

273 

11*6606 

6 4516 

1 


AD 

0429 

REF 

4 

LAST 

274 

1 1*6607 

3 1767 

0 


XCh 

0430 

REF 

3 

LAST 

271 

11 *6610 

1 1762 

1 

SOPT I0N2 

CCS 

0431 

REF 

1 



1 1*6611 

0 6'+ 1 4 

0 


K 

0432 

REF 

4 

LAST 

271 

11*6612 

0 3000 

1 


TC 

0433 

ref 

5 

LAST 

2 74 

11 *6613 

0 3000 

1 


TC 

0434 

REF 

1 



11 * 6 6 1 4 

0 6646 

0 


TC 

R0435 

THE 

bnkcon constants 

(BAN< NUMBERS) ARE 

used by ROReCHK 

R0436 

THEY 

must be 

IN THE 

following 

TABLE FDRM 


0437 





11*6615 

02000 

0 

BNKCONl 

octal 

0436 





11*6616 

04000 

0 

BNKC0N2 

OCTAL 

0439 





11*651 7 

06000 

1 

BNKC0N3 

octal 

0440 





1 1 *6620 

lOOOO 

0 

BNKC0N4 

octal 

0441 





1 1 *6621 

12000 

1 

BNKC0N5 

octal 

0442 





11*6622 

14000 

1 

BNKC0N6 

octal 

0443 





11*6623 

16000 

0 

8NKC0N7 

octal 

0444 





1 1 * 6624 

20000 

0 

BNKCONIO 

octal 

0445 





11*6625 

22000 

1 

BNKCONl 1 

octal 

0446 





11 1 6 62 6 

24000 

1 

BNKC0N12 

octal 

0447 





11 *6627 

26000 

0 

BNKC0N13 

octal 

0448 





1 1*6630 

30000 

1 

BNKCON 14 

octal 

0449 





1 1 * 663 1 

42000 

1 

BNKC0N21 

octal 

0450 





11*6632 

44000 

1 

BNKCON22 

octal 

0451 





1 1*6633 

46000 

0 

BNKCON23 

octal 

0452 





1 1 * 6534 

50000 

1 

BNKCON24 

octal 

0453 





1 1 *6635 

52000 

0 

BNKCON25 

octal 

0454 





11*6536 

54000 

0 

BNKC0N26 

OCTAL 

0455 





11.6637 

56000 

1 

BNKC0N27 

octal 

0456 





11*6640 

60000 

1 

BNKC0N30 

octal 

0457 





11 *6 64 1 

62000 

0 

BNKCON 31 

octal 

0458 





11*6642 

64000 

0 

BNKCON32 

octal 

0459 





1 1*6643 

66000 

1 

BNKC0N33 

octal 

0460 





11*6644 

70000 

0 

BNKC0N34 

octal 
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R0469 

R0470 
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R0472 

R0A73 

R0474 

04 75 

0476 

0477 

0478 

04 79 

0480 

0481 

0482 

0483 

0484 

0485 

0486 

0487 

0488 

0489 

0490 

0491 

0492 

0493 

0494 

0495 

0496 

0497 

0498 

0499 

0500 

0501 

0502 

0503 

0504 

0505 

0506 

0507 


AGC SELF-CHECK 


USER'S OWN PAGE NO. 11 


11*6645 00000 1 BANkSTOP OCTAL 00000 


PUT +0 after last bank to be checked 


takes between 17 and 20 SECONDS FoR RDPECHK TO GO THROUGH ALL BANKS, 
INITIALIZE 20PTI0NS TO -1 TO PERFORM ROPECHk 
SKEEP l HOLDS SUM 

HOLDS present CONTENTS OF ADuReSS IN ROPCHe< AnD ShOWSUM RqUtINeS 
HOLDS ACTUAL BANK NUMBER USED IN THE BANK REGISTER BUT CYCLED 5 
LEFT FOR DISPLAY IN SHOWSUM ROUTINE 
HOLDS PRESENT ADDRESS 102000 TO 05777 IN 

(00000 TO 01777 IN 
DISPLAY IN SHOWSUM 
NUMBER 
TC self 


SKEEP2 

SKEEP2 

PLACES 

SKEEP3 


SKEEP3 

SKEEP4 

SKEEP5 

5KEEP6 

5KEEP7 


Holds bugger word for 

HOLDS address OF BANK 
COUNTS Two SUCCESSIVE 
HOLDS END OF BANK NUMBERS 
COUNTS DOWN FIXED FIXED BANKS 


FXFX BANKS) 
FXSW BANKS) 
ROUTINE 


WORDS 


REF 

8 

LAST 

274 

1 1 * 6 64b 

4 

4516 

0 

ROPECHK 

CS 

SCONl 


REF 

1 



11*6647 

5 

1 761 

0 


T5 

20PTI0NS 


REF 

1 



11*6650 

3 

7023 

1 

FXFXCHK 

CAF 

FXCONl 

43776 

REF 

4 

LAST 

272 

1 1 *6651 

5 

1776 

0 


T5 

SKEEP6 


REF 

1 



11*6652 

3 

6615 

0 


CAF 

BNKCONI 

02000 

REF 

4 

LAST 

269 

11*6653 

5 

1773 

0 


TS 

SKEEP3 


REF 

1 



11*6654 

3 

6766 

0 


CAF 

5TBNKC0N 


REF 

6 

LAST 

271 

11*6655 

5 

1774 

1 


T5 

SKEEP4 


REF 

9 

LAST 

275 

11*6656 

3 

4516 

1 


CAF 

SCONl 


REF 

5 

LAST 

2 72 

11*6657 

5 

177 7 

1 


TS 

SKEEP7 


REF 

3 

LAST 

271 

lit 6 6b0 

3 

5501 

0 

FXFXBNKS 

CAF 

5CONO 


REF 

32 

LAST 

274 

lit 666 i 

5 

1771 

1 


TS 

SKEEPl 


REF 

5 

LAST 

270 

1 1 »6bb2 

3 

4515 

1 


CAF 

SC0N2 


REF 

9 

LAST 

272 

11 *6663 

5 

1 7 75 

0 


TS 

SKEEP5 

COUNTS 

ref 

5 

LAST 

275 

11*6664 

2 

1773 

1 

FXADRS 

INDEX 

SKEEP3 






11*6665 

3 

0000 

1 


CAP 

0000 


REF 

1 



11 *6666 

0 

6774 

0 


TC 

ADSJM 


ref 

1 



1 1*6667 

0 

6721 

0 


TC 

ADRSCHK 


REF 

6 

LAST 

275 

1 1*6670 

5 

1777 

1 

BANK2 

TS 

SKEEP7 


REF 

1 



11*6671 

3 

7024 

0 


CAF 

FXC0N2 

45776 

REF 

5 

LAST 

275 

1 1*6672 

5 

1776 

0 


TS 

SKEEP6 


REF 

1 



1 1 *6673 

3 

661 6 

0 


CAP 

BNKC0N2 

04000 

REF 

6 

LAST 

275 

1 1*6674 

5 

1773 

0 


TS 

SKEEP3 


REF 

1 



1 1*6675 

0 

6660 

1 


TC 

FXFXBNKS 


REF 

6 

LAST 

275 

11*6676 

3 

4515 

1 

FXSWBNK5 

CAF 

SC0N2 


REF 

10 

LAST 

275 

11*6677 

5 

1775 

0 


T5 

SKEEP5 

COUNTS 

REF 

4 

LAST 

275 

1 1*6700 

3 

5501 

0 


CAF 

SCONO 


REF 

33 

LAST 

275 

1 1*6701 

5 

1 771 

1 


rs 

SKEEPl 


REF 

7 

LAST 

275 

11*6702 

5 

1773 

0 


TS 

SKEEP3 


REF 

8 

LAST 

275 

1 1*6703 

6 

1773 

0 

SWADRS 

AD 

5KEEP3 


REF 

7 

LAST 

275 

11*6704 

2 

1774 

0 


INDEX 

SKEEP4 






11*6705 

6 

0000 

1 


AD 

0000 


REF 

1 



11*6706 

0 

5 7 30 

0 


TC 

DATACALL 



DOWN TWO TC SELF WORDS 


COUNTS down two TC SELF WORDS 


4a^‘>78A YUL SYSTEM FOR AGC^: REVISION 0 OF PROGRAM 50LRUM55 BY 


L AGC self-check 


USU8 

REF 

2 

LAST 

275 

1 1*6707 

0 

67 74 

0 


TC 

0509 

REF 

1 



11 * 6 7 1 0 

6 

6617 

1 


AD 

0510 

REF 

2 

LAST 

275 

11*6711 

0 

6721 

0 


TC 

R0511 

SUBROUTINES ADR5+ 

1* ADRSCHK* 

OPTION* 

mxtbnk* adsum* and 

R0512 

USED 

BY 

BOTH 

FXFX 

AND FXSft BANKS 




0513 

REF 

9 

LAST 

275 

11*6712 

3 

1773 

0 

ADR5+1 

XCH 

051A 

REF 

10 

LAST 

275 

11 *6713 

i 

to 

4516 

1 


AD 

0515 

REF 

10 

LAST 

276 

11*6714 

5 

1773 

0 


T5 

0516 

REF 

7 

LAST 

275 

11*6715 

1 

177 7 

0 


CCS 

0517 

REF 

1 



11*6716 

0 

6664 

0 


TC 

0518 

REF 

2 

LAST 

276 

11*671 J 

0 

666A 

0 


TC 

0519 

REF 

1 



11*6720 

0 

6703 

0 


TC 

0520 

REF 

272 

LAST 

273 

11*6721 

1 

OUOQ 

0 

adrschk 

CCS 

0521 

REF 

1 



11*6722 

0 

6730 

0 


TC 

0522 

REF 

2 

LAST 

276 

11 *6723 

0 

6730 

0 


TC 

0523 

REF 

3 

LAST 

276 

11 *6 724 

0 

6 730 

0 


TC 

052A 

REF 

11 

LAST 

275 

11*6725 

1 

1775 

1 


CCS 

0525 

REF 

12 

LAST 

276 

1 1 *6726 

5 

1775 

0 


TS 

0526 

REF 

4 

LAST 

276 

11*6727 

0 

6735 

0 


TC 

0527 

REF 

13 

LAST 

276 

11*6730 

1 

1 775 

1 

CONTINU 

CCS 

0528 





11*6731 

0 

6733 

0 


TC 

0529 

REF 

1 



11*6732 

0 

6743 

1 


TC 

0530 

REF 

7 

LAST 

275 

11*6733 

3 

4515 

1 


CAF 

0531 

REF 

lA 

LAST 

276 

ll*673-* 

5 

1 775 

0 


TS 

0532 

REF 

19 

LAST 

273 

1 1 *6735 

1 

0215 

0 


CCS 

0533 

REF 

A 

LAST 

273 

11 *6736 

0 

7377 

0 


TC 

053A 

REF 

11 

LAST 

276 

11*6737 

4 

1 773 

1 


cs 

0535 

REF 

6 

LAST 

275 

1 1*6740 

6 

1776 

0 


AD 

0536 

REF 

273 

LAST 

276 

11*6741 

5 

0000 

1 


T5 

0537 

REF 

1 



1 1 *6742 

0 

6712 

0 


TC 

0538 

REF 

2 

LAST 

275 

11 *6743 

1 

1761 

1 

SORT ION 

CCS 

0539 

REF 

2 

LAST 

265 

11 *6744 

0 

703 7 

1 


1 C 

05A0 

REF 

1 



11*6745 

0 

6750 

0 


TC 

05A1 

REF 

1 



1 1 * 6746 

0 

7005 

0 


TC 

05a2 

REF 

10 

LAST 

274 

11*6747 

0 

6034 

0 


TC 

05A3 

REF 

8 

LAST 

275 

11*6750 

3 

177^ 

1 

NXTBNK 

XCH 

05AA 

REF 

11 

LAST 

276 

11*6751 

6 

A516 

1 


AD 

05A5 

REF 

9 

LAST 

276 

1 1*6752 

5 

1774 

1 


TS 

05A6 

REF 

B 

LAST 

276 

11*6753 

1 

1777 

0 


r ^ a 

05A7 

REF 

1 



11*6754 

0 

6670 

0 


TC 

05A8 





11 * 6 7 5 5 

0 

6756 

0 


TC 

05a9 

REF 

12 

LAST 

276 

1 1*6756 

4 

4516 

0 


cs 

0550 

REF 

9 

LAST 

276 

11*6757 

5 

1777 

1 


TS 

0551 

REF 

1 



11*6760 

3 

6772 

0 


CAF 

0552 

REF 

7 

LAST 

276 

11*6761 

5 

17 76 

0 


TS 

0553 

REF 

10 

LAST 

276 

11*6 762 

2 

1774 

0 

ENDBANKS 
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SKEEP5 
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SDISPLAY 
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REVISION 

0 
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L 
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SELF 

-CHECK 







05SA 





11 1 6 763 


0000 

0 


CS 

U5S5 

REF 

27A 

LAST 

2 76 

11 ♦ 6 7 6“+ 

1 

0000 

0 


CCS 

0556 

REF 

1 



11^6765 

0 

6676 

0 


TC 

0557 

REF 

2 

LAST 

275 

11 »6766 

06615 

0 

STBNKCON 

AORES 

0558 

REF 

2 

LAST 

277 

11 16767 

0 

6676 

0 


TC 

0559 

REF 

3 

LAST 

276 

11*6770 

1 

1 761 

1 


CCS 

0560 

REF 

2 

LAST 

257 

11*6771 

0 

7025 

1 


TC 

0561 





11*6772 

A 1776 

1 

S^CON 

OCTAL 

0562 

ref 

1 



1 1 *5773 

0 

7102 

0 


TC 

0563 

REF 

9 

LAST 

269 

1 1 *677^ 

5 

1772 

1 

ADSUM 

TS 

056A 

REF 

3A 

LAST 

275 

1 1 *5775 

6 

1771 

1 


AO 

0565 

REF 

35 

Last 

277 

11*6776 

5 

1771 

1 


TS 

0566 

REF 

5 

LAST 

275 

11*5777 

3 

5501 

0 


CAP 

0567 

REF 

36 

LAST 

277 

1 1 *7000 

6 

1 771 

1 


AO 

0568 

REF 

37 

LAST 

277 

11*7001 

5 

1771 

1 


TS 

0569 

REF 

10 

LAST 

277 

11*7002 

4 

1772 

0 


CS 

0570 

REF 

12 

LAST 

276 

11*7003 

6 

1773 

0 


AO 

05 n 

REF 

169 

LAST 

272 

11 *700A 

0 

OUOl 

0 


TC 


0572 

REF 

170 LAST 277 

11 *7005 

3 

0001 

0 

BNKCHK 

XCH 

0573 

REF 

A LAST 266 

11*7006 

5 

0115 

1 


T5 

057A 

REF 

38 LAST 277 

11*7007 

1 

1771 

0 


r ^ r 

V D 

0575 



11*7010 

0 

7014 

0 


TC 

0576 

REF 

Al LAST 272 

1 1*7011 

0 

6013 

0 


TC 

0577 



11*7012 

0 

7014 

0 


TC 

0578 

REF 

42 LAST 277 

11*7013 

0 

6013 

0 


TC 

0579 

REF 

39 LAST 277 

1 1 * 7014 

5 

1771 

1 


TS 

0580 

REF 

11 LAST 276 

11*7015 

2 

1774 
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INDEX 
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11*7016 

3 

0000 

I 
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0582 

REF 

1 

11*7017 

0 

3203 

0 
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ref 

275 LAST 277 

1 1*7020 

4 

0000 

0 


CS 
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REF 

40 LAST 277 

11*7021 

6 

1771 

1 


AO 

0585 

REF 

5 LAST 277 

11*7022 

0 

0115 

1 


TC 

0586 



11*7023 

43776 
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0587 



11*7024 

45 776 

0 
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R0588 

initialize 20PTI0NS 
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R0589 

start of routine that displays 

SUM OF 1 
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0590 

REF 

13 LAST 276 

11*7025 

3 

4516 

1 
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REF 

4 LAST 277 

11.7026 

5 

1761 
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TS 
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REF 

6 LAST 277 

11*7027 

3 
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0 
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0593 

REF 

4 LAST 274 

11*7030 

5 
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TS 
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REF 

4 LAST 271 

1 1.7031 

2 
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INDEX 

0595 

REF 

1 

11*7032 

3 
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0596 

ref 

10 LAST 255 
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0 
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REF 

1 
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REF 

5 LAST 273 
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INDEX 
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REF 
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REF 
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REF 

11 

LAST 

27? 
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REF 
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LAST 
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REF 
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1 1 f 7 044 

0 

7054 
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REF 
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LAST 
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LAST 
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1 1 f 704 7 

4 

0000 

0 


C5 

REF 

13 

LAST 

278 

1 1 f 7050 

2 

17 74 

0 


index 





llf7G51 

6 

0000 

1 


AD 

REF 

2 

LAST 

275 

llf7052 

0 

5 730 

0 


TC 





1 1 f 7053 

0 

7056 

0 


TC 

REF 

14 

LAST 

278 

11 f7054 

2 

1773 

1 

FXFXWORD 

INDEX 





llf7055 

3 

0000 

1 


CAF 

REF 

15 

LAST 

278 

U f 7056 

5 

1773 

0 


T5 

REF 

11 

LAST 

261 

Uf705 7 

0 

3302 

0 


TC 

REF 

11 

LAST 

261 

llf7360 

0 

3310 

0 


TC 

REF 

1 



11 f7061 

3 

6006 

1 

NOKILL 

caf 

REF 

269 

LAST 

262 

Ilf 7062 

5 

0117 

0 


TS 

REF 

1 



Ilf 7063 

3 

600 7 

0 


caf 

REF 

23 

LAST 

262 

1 1 f 7 064 

0 

3100 

0 


TC 

REF 

1 



1 If 7065 

0 

7100 

1 


TC 

REF 

34 

LAST 

262 

1 1 f 7 06 6 

0 

5654 

0 


TC 

REF 

3 

LAST 

249 

11 f 7067 

14000 

1 


cadr 

REF 

16 

LAST 

262 

11 f7070 

0 

3136 

0 


TC 





11 f 7071 

0 

7074 

0 


TC 

REF 

1 



11 f7072 

0 

7076 

1 


TC 

REF 

1 



11 f 7073 

0 

7061 

1 


TC 

REF 

12 

LAST 

264 

11 f7074 

0 

3362 

0 


TC 

REF 

34 

LAST 

277 

11 f7075 

0 

2124 

1 


TC 

REF 

13 

LAST 

278 

11 f 7076 

0 

3362 

0 

SALLOW 

TC 

REF 

2 

last 

276 

1 1 f 7077 

0 

6750 

0 


TC 

REF 

1 



11 f 7100 

3 

6010 

0 

SBUSY 

CAF 

REF 

2 

LAST 

210 

11 t71CJl 

0 

3320 

0 


TC 

REF 

5 

LAST 

2 77 

U f7l02 

1 

1762 

1 

1/20PTN 

CCS 





11 f 7103 

0 

7i07 

0 


TC 

REF 

1 



11 f7104 

0 

736 7 

1 


TC 

ref 

6 

LAST 

274 

Ilf 7105 

0 

3000 

1 


TC 

REF 

1 



Ilf 7106 

0 

7113 

0 


TC 

REF 

5 

LAST 

274 

11 f 7107 

3 

1770 

0 


XCH 

REF 

lA 

LAST 

277 

1 1 f 7 1 1 0 

6 

4516 

1 


AD 

REF 

6 

LAST 

278 

Ilf 7111 

3 

1770 

0 


X CH 

REF 

2 

LAST 

274 

Ilf71l2 

0 

6646 

0 


T C 


MULTIPLY SUBROUTINES TAKE APPRUX ImA I ELY 30 SECONDS 
( 37777 J X (37777 THROUGH OOuOl) 


0 




I 


NASA 1021108-021 


DEC 4* 1966 


(MAIN) PAGE ^7ft 


USER'S OWN PAGE NO. 14 


SKEEP4 

0000 

LEFTS 

SKEEP2 

SKEEP7 

EXFXWORD 

FXFXWORD 

5KEEP3 

A 

SKEtP4 

0000 

DATACALL 
+ 3 

SKEEP3 

0000 

SKEEP3 

GRABOSP 

PREGBSY 

5UMA0RS 

MPAC +2 

VNCON 

NV5UB 

SBUSY 

BANKCALL 

FLASHON 

ENDI OLE 

+ 3 

SALLOW 

NOKILL 

FREEDSP 

ENDOFJO0 


CrCLES LEFT 5 PLACES 
HuLDS BANK number FoR DSKY DISPLAY 
12 INSTRUCTIONS TO PUT BUGGER WORD 
In SKEEP3. 

Gets fxsw bugger word 


GETS FXFX BUGGEk WORD 
S^EEP3 NOw HOLDS BUGGER WORD 


finished with SHOWSUM 

Proceed to next bank 

so CAN LOAD WITHOUT KILLING SHoWSUM, 


FREEDSP ALLOWS ANOTHER JOB TO DISPLAY. LEAVES 

NXTBNk Sum in Di^KY FOR 10 SEC. AFTER PROC. VERB 


5CADR 

NVSJBUSY 


SMODE 

*4 SlAY IN ROPECHK LOOP 

50PTI0N3 -3 

SMOOECHK SHOULD NOT COMe HERE 

MPNMBRS CONTINUE WITH SELF-CHECK 

SCOUNT *2 
SCONl 
SCOJNT +2 
ROPECHK 



r 





I 


4a^i»78A YUL SYSTEM K3R AGC^v: REVISION o Of- PROGRAM SOLRUMsS BY 


L AGC self-check 


R06A6 

CIA) 

COUNTS Down. 

C(LP) COUNTS UP. 




06A7 

REF 

u 

LAST 272 

ll»711j 

3 

44 76 

0 

MPNMBRS 

CAP 

06Ae 

REF 

12 

LAST 278 

11*7114 

5 

1772 

1 


TS 

0649 

REF 

12 

LAST 279 

11*7115 

3 

4476 

0 


CAF 

06S0 




11 i7ll6 

2 

5777 

1 


EXTEND 

06S1 

REF 

13 

LAST 279 

11*7117 

4 

17 72 

0 


MR 

06S2 

REF 

39 

LAST 269 

11*7120 

6 

0003 

1 


AD 

06b3 

REF 

27 7 

LAST 278 

11*7121 

4 

0000 

0 


C5 

0654 

REF 

13 

LAST 279 

11*7122 

6 

4476 

0 


AD 

0655 

REF 

5 

LAST 272 

11*7123 

0 

6023 

0 


TC 

0656 

REF 

20 

LAST 276 

1 1*7124 

1 

0215 

0 


CCS 

0657 

REF 

5 

LAST 276 

11*7125 

0 

73 7 7 

0 


TC 

0658 

REF 

14 

LAST 279 

11*7128 

1 

1772 

0 


CCS 

0659 

REF 

15 

LAST 279 

11*7127 

5 

1772 

1 


TS 

0660 

REF 

16 

LAST 279 

1 1 *7130 

1 

1772 

0 


CCS 

0661 

REF 

2 

LAST 278 

11*7131 

0 

7115 

0 


1 c 

R0662 

(-1) 

X 

(37777 THROUGH OOOOU 






0663 

REF 

14 

LAST 279 

11*7132 

3 

4476 

0 


CAF 

0664 

REF 

17 

LAST 279 

11*7133 

5 

1772 

1 


15 

0665 

REF 

2 

LAST 273 

11*7134 

3 

4335 

0 

MPHIGHI 

CAF 

0666 




1 1*7135 

2 

5777 

1 


EXTEND 

0667 

REF 

18 

LAST 279 

11*7136 

4 

1772 

0 


MP 

0666 

REF 

40 

LAST 279 

11*7137 

6 

0003 

1 


AD 

0669 

REF 

19 

LAST 279 

11*7140 

6 

1 7 72 

1 


AD 

0670 

REF 

6 

LAST 279 

11*7141 

0 

6023 

0 


TC 

0671 

REF 

21 

LAST 279 

11*7142 

1 

0215 

0 


CCS 

0672 

REF 

6 

LAST 279 

11*7143 

0 

7377 

0 


TC 

0673 

REF 

20 

LAST 279 

1 1*7144 

1 

1772 

0 


CCS 

0674 

REF 

21 

LAST 279 

11*7145 

5 

1772 

1 


TS 

0675 

REF 

22 

LAST 279 

11*7146 

1 

1772 

0 


CCS 

0676 

REF 

1 


11*7147 

0 

7134 

0 


TC 

R0677 

INTERCHANGE MULTIPLIER AND MULTIPLICAND 



R0678 

(37777 

THROUGH 00001) X (37777) 





R0679 

C(A) 

COUNTS DOWN. 

C(LP) COUNTS UP. 




0680 

REF 

15 

LAST 279 

11*7150 

3 

4476 

0 


CAF 

0681 

REF 

41 

LAST 277 

11*7151 

5 

1771 

1 


TS 

0682 

REF 

42 

LAST 279 

11*7152 

4 

1771 

0 

MPAGAIN 

C5 

0683 

REF 

278 

LAST 279 

11*7153 

4 

0000 

0 


C5 

0684 




11*7154 

2 

5777 

1 


EXTEND 

0685 

REF 

16 

LAST 279 

11*7155 

4 

4476 

1 


MP 

0686 

REF 

41 

LAST 279 

11*7156 

6 

0003 

1 


AD 

0687 

REF 

279 

LAST 279 

1 1 *7157 

4 

0000 

0 


C5 

0688 

REF 

17 

LAST 279 

11 *716u 

6 

4476 

0 


AD 

0689 

REF 

7 

LAST 279 

11*7161 

0 

6023 

0 


TC 

0690 

REF 

22 

LAST 279 

1 1*7162 

1 

0215 

0 


^ r* c 
w w 3 

0691 

REF 

7 

LAST 279 

11*7163 

0 

7377 

0 


TC 

0692 

REF 

43 

LAST 279 

11*7164 

1 

1 771 

0 


CCS 

0693 

REF 

44 

LAST 279 

11*7165 

5 

1771 

1 


T 5 

0694 

REF 

45 

LAST 279 

11*7166 

1 

1771 

0 


CCS 


1021108-021 


DEC 4, 1966 


(MAIN) PAGE 27 


USER'S OWN PAGE NO* IS 


5C0N+MAX 

SKEEP2 

scon+max 

SKEEP2 

LP C(A) = 37777 

A 

SCON+MAX 

-2ER0CHK 

NEWJOB 

DUMEXIT 

SKEEP2 

SKEEP2 

5KEEP2 

MPNMBRS +2 

SCON+MAX 

SKEEP2 

SCON-1 

5KEEP2 C(A) - -0 

LP 

SKEEP2 

-ZEROCHK 

NEWJOB 

DUMEXIT 

SKEEP2 

SKEEP2 

SKEEP2 

MPHIGHI 


SCON+MAX 

SKEEPl 

SKELPl 

A 

SCON+MAX 

LP C(A) = 37 r77 

A 

SCON+MAX 

-ZEROCHK 

NEWJOB 

DUMEXIT 

SKEEPl 

SKEEPl 

SKEEPl 


YUL b>5TtM FOR AGCA: REVISIUN 0 OF PROGRAM SOLRUM55 BY 


AGC SELF -CHECK 


0695 

REF 

1 




11*716? 

0 7152 

0 


TC 

R0696 

(37777 

rUROUG 

H 00001) 

X (-1) 





0697 

REF 

18 

LAST 

279 


11*7170 

3 4^*76 

0 


CAF 

0698 

REF 

46 

LAST 

2 79 


11*7171 

5 1771 

1 


TS 

0699 

REF 

4 7 

LAST 

280 


11*7172 

4 1771 

0 

MPH1GH2 

cs 

0700 

REF 

200 

LAST 

279 


11*7173 

4 0000 

0 


cs 

0701 






11*7174 

2 5777 

1 


EXTEND 

0702 

REF 

3 

LAST 

279 


11*7175 

4 4335 

1 


MP 

0703 

REF 

42 

LAST 

279 


11 *71 76 

6 0003 

1 


A3 

070A 

REF 

48 

LAST 

260 


11*717 7 

6 1771 

1 


AD 

0705 

REF 

8 

LAST 

279 


11*7200 

0 6023 

0 


TC 

0706 

REF 

23 

LAST 

279 


11*7201 

1 0215 

0 


r c 

0707 

REF 

8 

LAST 

279 


11.7202 

0 7377 

0 


TC 

070B 

REF 

49 

LAST 

280 


1 1*7203 

1 1771 

0 


CCS 

0709 

REF 

50 

LAST 

280 


1 1.7204 

5 1771 

1 


7S 

0710 

REF 

51 

LAST 

280 


1 1.7205 

1 1771 

0 


CCS 

0711 

REF 

1 




1 1.7206 

0 7172 

1 


TC 

0712 

REF 

1 




11*7207 

0 7212 

I 


TC 

R0713 

THESE 2 

CONSTANTS 

USED BY DIVIDE SUBROUTINES 


071A 






11,7210 

37776 

0 

DVCONl 

3CTAL 

0715 






11*721 1 

50001 

0 

DVCONB 

DCl AL 

R07i6 

DIVIDE 

1/4 BY 

3/8 







R0717 

ONCE 

THROUGH 

ALL 

DEVIDE SUBROUTINES ' 

FAKES APPROX. 0.012 

R0718 

TOTAL TIME 

t devide 

SUBROUTINES IS i 

C^RPROX, 20 

SECONDS 

0719 

REF 

2 

LAST 

272 


11*7212 

3 6004 

D 

OVl 

caf 

0720 

REF 

11 

LAST 

278 


11*7213 

5 1777 

1 


TS 

0721 

REF 

3 

LAST 

269 


11*7219 

3 655 7 

0 

DVl + ■*■ 

CAF 

0722 

REF 

171 

LAST 

277 


11*7215 

5 0001 

0 


TS 

0723 

REF 

2 

LAST 

269 


11.7216 

3 4502 

1 


caf 

072A 






11*7217 

2 5777 

1 


EX FEND 

0725 

REF 

172 

LAST 

280 


11*7220 

5 0001 

0 


Ds/ 

0726 

REF 

52 

LAST 

280 


11*7221 

5 1771 

1 


rs 

0727 

REF 

43 

LAST 

280 


1 1 *7222 

3 0003 

1 


XCH 

0728 

REF 

23 

LAST 

279 


11*7223 

5 1772 

1 


IS 

0729 

REF 

173 

LAST 

200 


11*7224 

4 0001 

1 

DV1 + - 

cs 

0730 






11*7225 

2 5777 

1 


EXTEND 

0731 

REF 

3 

LAST 

269 


11*7220 

5 6560 

1 


DV 

0732 

REF 

53 

LAST 

280 


11*7227 

6 1771 

1 


AD 

0733 

REF 

15 

LAST 

276 


11*7230 

5 1775 

0 


TS 

073A 

REF 

44 

LAST 

280 


11*7231 

3 0003 

1 


XCH 

0735 

REF 

16 

LAST 

278 


11 .7232 

5 1773 

0 


TS 

0736 

ref 

174 

LAST 

280 


11*7233 

3 0001 

0 

OVl — 

XCH 

0737 






11.7234 

2 5777 

1 


EXTEND 

0738 

REF 

h 

LAST 

280 


11*7235 

5 6560 

1 



0739 

REF 

54 

LAST 

280 


1 1 * 7236 

5 1771 

1 


T S 

07A0 

REF 

45 

LAST 

280 


11.7237 

3 0003 

1 


XCH 

07A1 

REF 

14 

LAST 

278 


11*7240 

5 1774 

1 


TS 

0742 

REF 

175 

LAST 

280 


11*7241 

3 0001 

0 

DV1- + 

XCH 

0743 






11*7242 

2 5777 

1 


EXTEND 


ASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 280 


USER'S PAGE NO. 16 


MPAGATN 

5C0N+MAX 

SKEEPI 

SKEEPl 

A 

SCON-1 

LP 

SKEEPl 

-zerochk 

NEWJOB 

DUMEXIT 

SKEEPl 

SKEEPl 

SKEEPl 

MPHIGH2 

DVl 

37776 

50001 

SECONDS 


C0NERAS2 

SKEEP7 

5C0N3/8 

0 

SCONl/4 

017 74 

Q 

SKEEPl 

LP 

SKEEP2 

C(A) 5 25252 

Q 

+ 1/4 

SCON-3/8 

SKEEPl 

SKEEP5 

CIA) = 52525 

C(A) = -0 

LP 

SKEEP3 

Q 

5C0N-3/8 

SKEEPl 

LP 

SKEEP4 

0 

-1/4 


L 

01 

074D 

0746 

0747 

074 8 

0749 

07b0 

07bl 

0 

0753 

R0754 

0755 

0756 

0757 

0758 

0759 

0760 

0761 

0762 

0763 

0764 

0765 

0766 

0767 

0768 

0769 

0770 

07 71 

0772 

0773 

R0774 

R0775 

0776 

0777 

0778 

07 79 

0780 

0781 

0782 

0783 

0784 

0785 

0786 

0787 

R0788 


YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM SOLRUM55 BT NASA 1021108-021 


DEC 4, 1966 


(MAIN) Page igi 


AGC SELF-CHECK 


USER'S OWN PAGE NO. 17 


REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 


4 

55 

56 
4 6 

57 
24 
17 

15 

16 
11 


REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 

REF 


2 

18 

176 

27 

28 
26 
47 
12 

19 
281 
282 

1 

20 
16 

1 


DIVIDE 
AFTER C 
REF 19 
REF 29 
REF 30 
REF 283 


REF 

REF 

REF 

REF 

REF 

REF 

REF 


20 

16 

177 

9 

17 

284 

1 


LAST 280 

11 f 7243 

5 

6557 

0 


DV 

SC0N3/8 

LAST 280 

1 1W244 

6 

1771 

1 


AD 

skeepi 

LAST 281 

1 1 »7245 

5 

1771 

1 


T5 

SKEEPl 

LAST 280 

1U7246 

4 

0t)03 

0 


C5 

LP 

LAST 281 

11 ♦724 7 

6 

1771 

1 


AD 

SKEEPl 

LAST 280 

11 *7250 

6 

1772 

1 


AD 

SKEEP2 

LAST 280 

1117251 

6 

1773 

0 


AD 

SKEEP3 

LAST 280 

llt7252 

6 

1774 

1 


AD 

SKEEP4 

LAST 280 

11 i7253 

6 

1775 

0 


AD 

SKEEP5 

LAST 276 

11»7254 

0 

6033 

1 


TC 

-UNECHK 

INCREASING BIT POSITIONS 

by 1/2 

(13 DEVISIDNS) 


LAST 278 

11 i7255 

3 

4 5 1 6 

1 

0V2 

CAF 

SCONl 

LAST 281 

llt7256 

5 

177 2 

1 

DV2L00P 

T5 

SKEEP2 


11 i7257 

2 

5777 

1 


EXTEND 


LAST 267 

1 1 1 7 260 

5 

4501 

1 


DV 

SCONl/2 

LAST 281 

11 f 7 2 6 1 

5 

1773 

0 


T5 

SKEEP3 

LAST 280 

11 i7262 

6 

OOOl 

0 


AD 

0 

LAST 274 

11*7263 

5 

0020 

0 


T5 

CYR 

LAST 281 

11*7264 

4 

0020 

1 


CS 

CYR 

LAST 281 

11*7265 

6 

1772 

i 


AD 

SKtEP2 

LAST 2B1 

11*7266 

6 

0C03 

1 


AD 

LP 

LAST 281 

11*7267 

0 

6033 

1 


TC 

-ONECHK 

LAST 281 

11*7270 

4 

1773 

1 


CS 

SKEEP3 

LAST 280 

11*7271 

6 

0000 

1 


AD 

A 

LAST 281 

11*7272 

5 

0000 

1 


T5 

A 


11*7273 

0 

7275 

0 


TC 

*2 


11*7274 

0 

7300 

0 


TC 

DV3 

LAST 281 

11*7275 

3 

1773 

0 


XCH 

SKEEP3 

LAST 281 

11 *72 7b 

6 

4516 

1 


AD 

SCONl 


11*7277 

0 

7256 

1 


TC 

DV2L00P 

SEPARATE 

DECREASING BIT POSITIONS BY 37777 ( 14DEV1SI0NS) 

(A) = BEFORE CCA) AND 

AFTER C(3) 

= -C(A) 



LAST 280 

11 *7300 

4 

4476 

1 

DV3 

CS 

SCON+MAX 

LAST 281 

1 1 *7301 

5 

0020 

0 


TS 

CYR 

LAST 281 

11*7302 

4 

0020 

1 

DV3L00P 

CS 

CYR 

LAST 281 

11*7303 

4 

0000 

0 


CS 

A 


i 1*7304 

2 

5/77 

1 


EX T End 


1 LAST 281 

11*7305 

5 

4476 

0 


DV 

SCON+MAX 

LAST 281 

11*7306 

5 

1774 

1 


TS 

SKEEP4 

LAST 281 

11 * 7 30 7 

6 

0001 

0 


AD 

0 

LAST 280 

11*7310 

0 

6023 

0 


TC 

-ZEROCHK 

LAST 281 

11*7311 

1 

1774 

0 


CCS 

SKEEP4 

LAST 281 

11*7312 

1 

0000 

0 


r r- r 

Ih, ^ O 

A 


11*7313 

0 

7302 

1 


TC 

DV3L00P 

37776 BY 

37776 







♦MAX FOR 

Positive sign 

AND -MAX 

FOR NEGATIVE SIGN 


-1 


1 


C(0) = - absolute VALUE OF uEVISOr = 40001 


C(A) = -0 

C(A) = 37776 
CIA) = 37776 
C(A) = 37777 
CtA) = -0 
CtA) = +1 
CtA) = +1 


OVERFLOW AT END OF DV2 SUBROUTINE 


C(CYR) = 20000 




4bHt)70A YUL SYSTEM FDR AGCA: REVISION 0 Of- PROGRAM SOLRUMSS BY 


L AGC SELF-CHECK 


0791 

REF 

1 



11*7314 

3 

7210 

0 

DVA + + 

CAP 

0792 





11*7315 

2 

5 77 7 

1 


EKTENO 

0793 

ref 

2 

LAST 

202 

11*7316 

5 

7210 

Q 


OV 

0794 

ref 

178 

LAST 

201 

11*731/ 

6 

OUOl 

0 


AD 

079S 

REF 

13 

LAST 

281 

1 1 *7320 

0 

6033 

1 


1C 

0796 

REF 

48 

LAST 

281 

11*7321 

3 

0003 

1 


xch 

0797 

REF 

17 

LAST 

281 

1 1 *7322 

5 

1775 

0 


IS 

079B 

REF 

3 

last 

282 

1 1 * 7 3 2 3 

4 

7210 

1 


C5 

0799 

REF 

18 

LAST 

281 

1 1*7324 

5 

17 74 

1 


T5 

oeoo 

REF 

4 

LAST 

282 

11*7325 

3 

7210 

0 

0VA + - 

CAF 

0801 





11*7326 

2 

5777 

1 


EXTEND 

0802 

ref 

19 

last 

282 

11,7327 

5 

1774 

I 


0 ^ 

0803 

REF 

285 

LAST 

281 

11,7330 

4 

0000 

0 


C5 

0804 

ref 

179 

LAST 

282 

11*7331 

6 

0001 

0 


AD 

0805 

REF 

14 

LAST 

282 

1 1 * 7332 

0 

6033 

1 


TC 

0806 

REF 

49 

LAST 

282 

11*7333 

6 

0003 

1 


AD 

0807 

REF 

18 

LAST 

282 

11*7334 

6 

1775 

0 


AD 

0808 

REF 

19 

LAST 

282 

11*7335 

5 

1 775 

0 


TS 

0809 

REF 

5 

LAST 

282 

11*7336 

4 

7210 

1 

D\/4- + 

C5 

0810 





11*7337 

2 

577 7 

1 


Exi E nd 

0811 

REF 

6 

LAST 

282 

1 1 ,7340 

5 

7210 

0 


DV 

0812 

REF 

286 

LAST 

282 

11*7341 

4 

0000 

0 


cs 

0813 

REF 

180 

LAST 

282 

11*7342 

6 

0001 

0 


AD 

0814 

REF 

15 

LAST 

282 

11*7343 

0 

6033 

1 


TC 

0815 

REF 

50 

LAST 

282 

11*7344 

4 

0003 

0 


CS 

0816 

REF 

20 

LAST 

262 

1 1*7345 

6 

1 775 

0 


AD 

0817 

REF 

21 

LAST 

282 

11 *73‘t6 

5 

1775 

0 


T 5 

0818 

REF 

7 

LAST 

282 

11*7347 

4 

7210 

1 

DV4 — 

CS 

0819 

REF 

20 

LAST 

282 

11*7350 

5 

1774 

1 


T 5 

0820 





11*7351 

2 

5777 

1 


EXI END 

0821 

REF 

21 

LAST 

282 

11*7352 

5 

1774 

1 


DY 

0822 

REF 

181 

last 

282 

11*7353 

6 

OOOl 

0 


AD 

0823 

REF 

16 

LAST 

282 

11*7354 

0 

6033 

L 


T C 

0824 

REF 

51 

LAST 

282 

11*7355 

4 

0003 

0 


CS 

0825 

REF 

22 

LAST 

282 

11*7356 

6 

1775 

0 


AD 

0826 

REF 

17 

LAST 

282 

11*7357 

0 

6034 

0 


TC 

0827 

REF 

24 

LAST 

280 

11*7360 

1 

0215 

0 


w ^ s 

0828 

REF 

9 

LAST 

280 

11*7361 

0 

7377 

0 


T C 

0829 

REF 

12 

LAST 

280 

11*7362 

1 

1777 

0 


^ c 

V D 

0830 





11*7363 

0 

7365 

0 


TC 

0831 

REF 

2 

LAST 

278 

11*7364 

0 

7367 

1 


1 C 

0032 

REF 

13 

LAST 

282 

11*7365 

5 

1777 

1 


T S 

0833 

REF 

1 



11*7366 

0 

7214 

1 


T V 

0834 

REF 

7 

LAST 

278 

11*736? 

3 

1 770 

D 


XCH 

0835 

REF 

17 

LAST 

281 

11*7370 

6 

4516 

1 


A D 

0836 

ref 

8 

LAST 

282 

11*7371 

3 

1770 

0 


X H 

0837 

REF 

6 

LAST 

278 

11*7372 

1 

1762 

1 

S0PTI0N3 

CCS 

0838 

REF 

3 

LAST 

279 

11*7373 

0 

7113 

0 


T C 

08s9 

REF 

7 

LAST 

278 

11 *737** 

0 

3000 

1 


T C 


ASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 282 


USER'S OWN PAGE NO. 18 


DVCONl 

377 76 

DVCONl 

CIA) = 37777 C(0) s -37776 

-onechk -1 

LP 

SKEEP5 

DVCONl 

SKEEP4 

DVCONl 

CILP) = +1 

SKEEP4 

A 

CIA) = 40000 C(0) = -37776 

0 

-ONtCHK -1 

LP 

CiLP) = AOOOO 

SKEtP5 

SKEEPS 

DVCONl 

-37776 

DVCONl 

C(A) = 40000 C(0) = -37776 

Q 

-ONECHK -1 

LP 

SKEEP6 

C(LP) = AOOOl 

SKEEP5 

DVCONl 

SKEEP4 

-0 

SKEEP4 

CIA) = 37777 C(Q) s -37776 

Q 

-ONLCHK -1 

LP 

SKEEP5 

-ONECHK 

NtWJOB 

DUMEXIT 

SKEEP7 
+ 2 

S0PTI0N3 -3 

CtLPl = +1 

SKEEP7 

DV 1 + + 

Back TO DEVIDE LOOP 

SCOJNT +2 

SCONl 

5C0UNT +2 

AuD +1 TO SCOUNT +2 REGISTER AT THIS 
PUINT OF SELF-CHECK 

SMODE 

MPNMBRS 

SMODECHK 

SI AY IN MPNMBKS LOOP 


^U^b7aA YUL system FOR AGCA; REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 283 



agc 

self-check 


OHAO 

REF 

8 LAST 282 

11*7375 

OOAl 

REF 

9 LAST 283 

1 1 * 7 37 b 

08A3 





0 3000 1 

TC 

SMODECHK 

0 3000 1 

TC 

SNiOOECHK 

3000 

BANK 

1 


USER*S OWN page NO, 19 

ShOULO NOT come HERE 

END OF SELF-CHECK* START AGAIN 



yul System for agca; revision o of ^^rogram solrumss By 


L AGC SELF-CHECK 


P08AA COMPUTER ACTIVITY LIGHT (oREEN LIGHT) MAINTENANCE. 


0B46 

REF 

25 

LAST 

282 

3000 

1 

0215 

0 

SMODECHK 

CCS 

0847 

REF 

10 

LAST 

282 

3001 

0 

7377 

0 


TC 

0848 

ref 

7 

LAST 

282 

3002 

1 

1762 

1 

ADVAN 

CCS 

0849 

REF 

1 



3003 

0 

6045 

0 


TC 

0850 

REF 

10 

LAST 

283 

3D04 

0 

3U00 

1 


TC 

0851 

REF 

2 

LAST 

284 

3005 

0 

6045 

0 


TC 

0852 

REF 

3 

LAST 

284 

3006 

0 

6045 

0 


TC 

0858 







11*7377 


bank 

0859 

REF 

182 

LAST 

282 

11 t7377 

3 

0001 

0 

DUMEXIT 

XCH 

0860 

REF 

6 

LAST 

277 

11*7400 

5 

0115 

1 


TS 

0861 

REF 

41 

LAST 

241 

11*7401 

4 

5503 

0 


C5 

0862 





1 1*7402 

2 

0017 

0 


INHlNT 

0863 

REF 

20 

LAST 

168 

11*7403 

7 

0011 

0 


MASK 

0064 

REF 

42 

LAST 

284 

11*740** 

6 

5503 

1 


AD 

0865 

REF 

21 

LAST 

284 

11 *74Ub 

5 

0011 

1 


1 5 

0866 

REF 

2 

LAST 

93 

11*7406 

0 

2101 

0 


TC 

0367 

REF 

43 

LAST 

284 

11*7407 

4 

5503 

0 

DUMVJOe 

CS 

0868 





1 1*7410 

2 

0017 

0 


INHINT 

0869 

REF 

22 

LAST 

284 

11*7411 

7 

0011 

0 


mask 

0870 

REF 

23 

LAST 

284 

1 1*7412 

5 

0011 

1 


TS 

0871 





11*7413 

2 

0016 

1 


relint 

0872 

ref 

7 

LAST 

284 

11.7414 

0 

0115 

1 


TC 

0873 

REF 

1 



11*7415 

3 

7420 

0 

DUMMYJOB 

CAF 

0874 

REF 

8 

LAST 

284 

11.7416 

5 

0115 

1 


TS 

0875 

REF 

1 



1 1*7417 

0 

7407 

0 


TC 

0876 

REF 

11 

LAST 

284 

1 1*7420 


03000 

1 

SMOOECON 

ADRES 


102 1106-021 


DEC A, 1966 


(MAIN) PAGE 264 



USER’S OWN PAGE NO. 20 

NE^JOB 

DUMEXIT 

SEE IF ITS time FOR A CHANGE. 

SMODE 

CCSCHK 

SMODECHK 

SEE IF SELF-CHECK l3 WANTED 

YES PULSES only 

CCSCHK 

CCSCHK 

YES PULSES * SC + ERASABLE 

YES ALL OF SELF-CHECK 

11 

Q 

QADRS 

ThO 

SIORE RETURN ADDRESS 

TURN ON green LIGHT (COMP ACT) AND 

OUTl 

Two 

OUTl 

ChANGl 

GU TO CHANGU 

TWO 

lULlNG AGAIN- TURN uFF ACTIVITY UGHl 

OUTl 

OUTl 

L 1 GHT . 

OAORS 

BACK TO CHECKING COMPUTER 

SMODECON 

qadRS 

DUMYJOB 

SMODECHK 

enter AT SMODECHK IF THERE IS A 

FKESh start OR A GOjAM 


Atl^i>7eA YUL SYSTEM FOR AGC<t; REViSluN 0 OF PROGRAM SOLRUM55 BY 
L AGC StLF-CHECK 


POB77 C-RELAY TESTER 


0878 

REF 

14 

LAST 

239 

11 17421 

3 

4500 

0 

CCHK 

CAF 

0879 

REF 

57 

LAST 

239 

11 *7422 

5 

0723 

1 


TS 

0880 

REF 

58 

LAST 

285 

11*7423 

5 

0/24 

0 


TS 

0881 

REF 

59 

LAST 

265 

1 1*7424 

5 

0725 

1 


TS 

0882 

REF 

5 

LAST 

265 

1 1 *7425 

3 

4510 

1 


CAF 

0883 





11*7426 

2 

0017 

D 


I NIHINT 

088A 

REF 

39 

LAST 

270 

11*742? 

0 

2173 

0 


TC 

0885 

REF 

1 



1 1 * 7 4 30 

2 34 33 

1 


CADR 

0886 

REF 

1 



11 *7431 

3 

7530 

0 


CAF 

0887 

REF 

6 

LAST 

228 

11*7432 

0 

212 / 

1 


TC 

0888 

REF 

2 

LAST 

285 

11*7433 

3 

7530 

0 

CCHKA 

CAF 

0889 

REF 

5 

LAST 

234 

11*7434 

0 

2060 

0 


TC 

0890 

REF 

30 

LAST 

271 

11*7435 

0 

2256 

1 


TC 

0891 

REF 

44 

LAST 

284 

11 *743£i 

3 

5503 

1 

CCHKB 

CAF 

0892 

REF 

270 

LAST 

278 

11*743/ 

5 

0115 

1 


TS 

0893 

REF 

2 

LAST 

146 

11*7440 

3 

3232 

1 


CAP 

0894 

REF 

271 

LAST 

285 

11*7441 

5 

0116 

1 

CCHKO 

TS 

0895 

REF 

287 

LAST 

282 

11.7442 

2 

0000 

0 


INDEX 

0896 

REF 

9 

LAST 

221 

1 1.7443 

3 

4504 

1 


CAF 

0897 

REF 

15 

LAST 

285 

11.7444 

6 

4500 

0 


AD 

0898 

REF 

272 

LAST 

285 

11 *7 445 

2 

0115 

0 


I NDEX 

0899 

REF 

60 

LAST 

285 

11*7 446 

5 

0723 

1 


TS 

0900 

REF 

10 

LAST 

259 

11*744/ 

3 

4507 

1 


CAF 

0901 





11.7450 

2 

0017 

0 


INHINT 

0902 

REF 

40 

LAST 

285 

11*7451 

0 

21/3 

0 


TC 

0903 

REF 

1 



11*7452 

23455 

1 


CADR 

0904 

REF 

1 



11*7453 

3 

7531 

1 


CAP 

0905 

REF 

7 

LAST 

285 

11*7454 

0 

2127 

1 


TC 

0906 

REF 

2 

LAST 

285 

1 1*7455 

3 

7531 

1 

CCHKl 

CAF 

0907 

REF 

6 

LAST 

285 

11*7456 

0 

2060 

0 


TC 

0908 

REF 

31 

LAST 

285 

11*7457 

0 

2256 

1 


TC 

0909 

REF 

12 

LAST 

234 

11*7 460 

3 

000/ 

0 

CCHK2 

XCH 

0910 

REF 

13 

LAST 

285 

11.7461 

1 

0007 

1 


CCS 

0911 

REF 

1 



11*7462 

0 

7525 

1 


TC 

0912 

REF 

2 

LAST 

285 

11.7463 

0 

7525 

1 


TC 

0913 





11.7464 

0 

7466 

L 


TC 

0914 

REF 

3 

LAST 

285 

11.7465 

0 

7525 

1 


TC 

0915 

REF 

273 

LAST 

285 

11*7 466 

1 

011b 

0 


CCS 


1021108-021 


1966 


(MAIN) page 285 


DEC A, 


USER'S OwN PAGE NO. 21 


BIT15 

DSPTAb +UD 
DSPTAB +12D 
DSPTAE +13D 

B1T7 

waitlist 

CCHKA 

LCCHKb 

JOBSLEEP 

LCCHKB 

JOBwAkE 

TASKOVER 

TWO 

MPAC 

TEN 

MPAC +l 
A 

bITll 

blTlS 

MPAC 

LSPTAB +110 
BITS 

waitlist 

CCHKl 

LCCHK2 

JOBSLEEP 

LCCHK2 

JOBrtAKE 

taskover 

1N3 
I M3 

CCHKALM 
CCHKALM 
+ 2 

cchkalm 


MPAC +1 


YUL system FOR AGC^: REVISION 0 OT R=?0<jRAM SqLRUMSS &Y 


L acjC self -check 


0916 

REF 

1 



1 1 .7A67 

0 

7AA1 

1 


TC 

0917 

REF 

16 

LAST 

285 

1 1 1 7A70 

3 

A500 

0 


CAF 

09lfi 

REF 

27A 

LAST 

285 

11 ♦7A7i 

2 

0115 

0 


INDEX 

0919 

REF 

61 

LAST 

285 

1 1 ♦ 7 A 7 2 

5 

0723 

1 


T5 

0920 

REF 

275 

LAST 

286 

11 ♦7A73 

1 

0115 

0 


CCS 

0921 

REF 

2 

LAST 

286 

11 ♦ 7 A 7 A 

0 

7^3 7 

0 


TC 

0922 

REF 

6 

LAST 

285 

11 *7A75 

3 

A51U 

1 


CAF 

0923 





11 .7A7b 

2 

001 7 

0 


INHINT 

092A 

REF 

A1 

LAST 

285 

li f 7A77 

0 

2173 

0 


TC 

092S 

REF 

1 



11.7500 

23503 

0 


CADR 

0926 

REF 

1 



11.7501 

3 

7533 

0 


CAF 

0927 

REF 

8 

LAST 

285 

11.7502 

0 

212 7 

i 


TC 

0928 

REF 

2 

LAST 

286 

11.7503 

3 

7533 

0 

CCHKC 

CAF 

0929 

REF 

7 

LAST 

285 

11.750a 

0 

2060 

0 


TC 

0930 

REF 

32 

LAST 

285 

11.7505 

0 

2256 

1 


TC 

0931 

REF 

lA 

LAST 

285 

1 1.7506 

3 

0007 

0 

CCHKD 

xch 

0932 

REF 

15 

LAST 

286 

11.7507 

1 

0007 

1 


CCS 

0933 





11.7510 

0 

751A 

0 


TC 

093A 





11.7511 

0 

75lA 

0 


TC 

0935 

REF 

A 

LAST 

285 

11.7512 

0 

7525 

1 


TC 

0936 

REF 

5 

LAST 

286 

11.7513 

0 

7525 

1 


TC 

0937 

ref 

9 

LAST 

257 

11 .751A 

3 

5362 

0 


CAF 

0938 

REF 

276 

LAST 

286 

11.7515 

5 

Oil? 

0 


TS 

0939 

REF 

1 



11.7516 

3 

7532 

1 


CAP 

09A0 

REF 

2A 

LAST 

278 

11.7517 

0 

3100 

0 


TC 

09A1 

REF 

21 

LAST 

262 

1 1 .7520 

0 

3315 

0 


TC 

09A2 

REF 

lA 

LAST 

278 

11 .7521 

0 

3362 

0 

TSTOUT 

TC 

09A3 

REF 

7 

LAST 

26A 

11.7522 

0 

2362 

1 


TC 

09AA 





11.7523 


00000 

1 


OCT 

09A5 

REF 

35 

LAST 

278 

1 1. 7 52A 

0 

212a 

1 


TC 

09A6 

REF 

15 

LAST 

265 

11.7525 

0 

3007 

0 

CCHKALM 

TC 

09A7 





11.7526 


01 lOA 

0 


OCT 

09Ae 

REF 

36 

LAST 

286 

1 1.7527 

0 

212a 

1 


TC 

09A9 

REF 

1 



1 1.7530 


23A36 

1 

LCCHKB 

CADR 

0950 

REF 

1 



11.7531 


23A60 

1 

LCCHK2 

CAOR 

0951 





11.7532 


OOlOl 

1 

CCHKNV 

OCT 

0952 

REF 

1 



11.7533 


23506 

0 

LCCHKD 

CAOS 





KASA 10211 OB-02 I 


DeC I 1966 


(MAIN) Page 286 


user *5 OWN page no, 22 

CCHKO 

BiTis turn off last Relay, 

MPAC 

OSPTAB +11D 
MPAC 

CCHKO -2 
bIT7 

WAITLIST 

CCHKC 

LCCHKD 

JOBSLEEP 

LCCHKD 

jobwake 

TASKOVER 

1)43 

IN3 

♦ A 

♦ 3 

cchkalm 

CCHKALM 

Seven 

MPAC +2 

CCHKNV 

NVSUB 

PRENVESY 

FREEUSP 

NEwMODE REVERT TO MODE 00. 

0 

endofjob 


ALARM 
1 lOA 

ENPOFjOB 

CCHKB 

CCHK2 

OOlOl 

CCHKD 




_ r Ml' m . ' m 2 


il '. 




^B4^)7bA YUL system for AGCa: REVIbluiM 0 OF PROGRAM SoLRUMSS BY 


L AGC self-check 


PU953 

D5KY 

TESTER 



0954 

REF 

3 

last 

285 

1 

0955 

REF 

277 

LAST 

206 

1 

0956 

REF 

278 

LAST 

287 

1 

0957 

REF 

1 



1 

095 B 

REF 

279 

LAST 

287 

1 

0959 





1 

0960 





1 

0961 

REF 

62 

LAST 

266 

1 

0962 

REF 

1 



1 

0963 

REF 

280 

LAST 

287 

1 

0964 





1 

0965 

REF 

63 

LAST 

287 

1 

0966 

REF 

10 

LAST 

285 

i 

0967 

REF 

281 

LAST 

287 

1 

0968 





1 

0969 

REF 

64 

LAST 

287 

1 

0970 

REF 

65 

LAST 

287 

1 

0971 

REF 

66 

LAST 

287 

1 

0972 

REF 

67 

LAST 

287 

1 

0973 

REF 

68 

LAST 

287 

1 

0974 

REF 

69 

LAST 

287 

1 

0975 

REF 

70 

LAST 

287 

1 

0976 

REF 

71 

LAST 

287 

1 

0977 

REF 

72 

LAST 

287 

1 

0978 

REF 

1 



1 

0979 

REF 

5 

LAST 

172 

I 

0980 

REF 

11 

LAST 

287 

1 

0981 

REF 

42 

LAST 

266 

1 

0982 

REF 

1 



1 

0983 

REF 

1 



1 

0984 

REF 

9 

LAST 

286 

1 

0985 

REF 

2 

LAST 

287 

1 

0986 

REF 

8 

last 

286 

1 

0987 

REF 

33 

LAST 

286 

1 

098 8 

REF 

282 

LAST 

287 

1 

0989 

REF 

1 



1 

0990 





1 

0991 

REF 

1 



1 

0992 





1 

0993 

REF 

6 

LAST 

22b 

1 

0994 

REF 

73 

LAST 

287 

1 

0995 

REF 

74 

LAST 

287 

1 

0996 

REF 

75 

LAST 

287 

1 

0997 

REF 

283 

LAST 

287 

1 


t753^ 

3 

3232 

1 

DCHLCK 

CAF 

*7535 

5 

0115 

1 

DC9 

TS 

*7536 

2 

0115 

0 


INDEX 

*7537 

3 

7643 

1 


CAF 

*7540 

5 

0116 

1 


T5 

*75AI 

2 

0017 

0 


INHINT 

*7542 

4 

0000 

0 


COM 

♦ 7543 

5 

0721 

0 


T5 

*7544 

4 

3221 

1 


CS 

*7545 

7 

0116 

0 


MASK 

♦ 7546 

4 

0000 

0 


COM 

*754 / 

5 

0717 

0 


TS 

*7550 

4 

450** 

0 


CS 

*7551 

7 

0116 

0 


MASK 

*7552 

4 

0000 

0 


COM 

*7553 

5 

0 710 

1 


TS 

*7554 

5 

0711 

0 


TS 

♦ 7555 

5 

0712 

0 


TS 

♦ 7556 

5 

0713 

I 


TS 

*755 7 

5 

0 714 

0 


TS 

*7 560 

5 

0715 

1 


TS 

*7561 

5 

0716 

1 


TS 

♦ 7562 

5 

0720 

1 


TS 

* 7563 

5 

0 722 

0 


T5 

*7564 

3 

7656 

0 


CAP 

*7565 

5 

0 707 

1 


TS 

*7 566 

3 

45 O 4 

1 

DCWAIT 

CftF 

*7567 

0 

2173 

0 


TC 

*7570 

. 

23573 

1 


CAOR 

.7571 

3 ' 

765 7 

1 


CAF 

♦ 7572 

0 

2127 

1 


TC 

*7573 

3 

7657 

1 

DCIO 

CAF 

*7574 

0 

2060 

0 


TC 

*7575 

0 

2256 

1 


TC 

*75 70 

1 

0115 

0 

DCll 

CCS 

♦ 757 7 

0 

7535 

0 


TC 

*7600 

0 

7602 

1 


TC 

*7601 

0 

7613 

1 


TC 

*7602 

2 

0017 

0 


I NHINT 

* 7 6 0 3 

H 

4373 

0 


CS 

*7604 

5 

0710 

1 


TS 

*7605 

5 

0 713 

1 


TS 

*7606 

5 

0715 

1 


TS 

*7607 

5 

0115 

1 


TS 


1 

1 

1 

I 

I 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

I 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

I 

1 

I 

1 

1 

1 

1 

1 

1 

1 


1021108-021 


LEC At 1966 


(Main) page ?87 


USER'S OWN page no* 


TEN 

MPAC 

MPAC 

DSKYCOOE 
MPAC +1 


DSPTAB 4-90 
Ml 05 
MPAC +1 

DSPTAP +7 
BlTll 
MPAC +1 

DSPTAB 
DSPrAB 
DSPTAB +2 
DSPTAB +3 
DSPTAB +4 
DSPTAB +5 
DSPTAS +6 
DSPTAB +SD 
DSPTAB +10D 
DCNOUT 
NQUT 

BITll 10,24 SEC WAIT 

WAITLIST 

PCIO 

LDCll 

JOBSLEEP 

LDCU 

JOBwAkE 

TASKOVER 

MPAC 

DC9 


+ 2 
DC + 


6K ” S I GNS • 

DSPTAB 

DSPTAB *3 

DSPTAB +5 

MPAC 


23 


^b^b7BA VUL SYSTEM FOR AGC4; I’EVlSUN 0 Oh PROGRAM S0LRUMS5 bY 


L AGC SELF-CHLCK 


U998 

REF 

6 

LAST 

224 

1 1*7610 

3 

4473 

D 


CAF 

0999 

REF 

6 

LAST 

2 87 

11*7611 

5 

0707 

1 


rs 

1000 

REF 

1 



11*7612 

0 

7566 

0 


TC 

10(J1 





11*7513 

2 

0017 

0 

DC + 

nniNT 

1002 

REF 

7 

LAST 

287 

11*7614 

4 

4373 

0 


C5 

1003 

REF 

76 

LAST 

287 

11.7615 

5 

0711 

0 


IS 

iOOA 

REF 

77 

LAST 

280 

1 1 * 7 6 1 6 

5 

0714 

0 


T5 

1005 

REF 

78 

LAST 

288 

11.7517 

5 

0716 

1 


TS 

1006 

REF 

15 

LAST 

211 

11*7520 

4 

4503 

1 


C5 

1007 

REF 

79 

LAST 

288 

11*7621 

5 

0710 

1 


T5 

1008 

REF 

80 

LAST 

288 

11*7622 

5 

0713 

1 


TS 

1009 

REF 

81 

LAST 

288 

11.7623 

5 

0715 

1 


TS 

1010 

REF 

9 

LAST 

231 

11.7624 

3 

4475 

0 


CAF 

1011 

REF 

7 

LAST 

288 

11*7525 

5 

0707 

1 


TS 

1012 

REF 

3 

LAST 

273 

11*7626 

3 

3220 

1 


CAF 

1013 

REF 

24 

LAST 

284 

11*762 7 

5 

0011 

1 


TS 

lOlA 





11*7630 

2 

0016 

1 


RElINT 

1015 

REF 

6 

LAST 

222 

11*7631 

3 

4506 

0 


CAF 

1016 

ref 

284 

LAST 

28 1 

1 1 * 7532 

5 

0115 

1 

DC+ + 

TS 

lOlT 

REF 

12 

LAST 

287 

1 1 * 7 6 3 3 

3 

45 O 4 

1 


CAF 

1018 

REF 

288 

LAST 

265 

11*7534 

1 

0000 

0 



1019 





11*7635 

0 

7634 

1 


TC 

1020 

REF 

26 

LAST 

284 

11 * 7 636 

1 

0215 

0 


CCS 

1021 

REF 

3 

LAST 

284 

11*7637 

0 

2101 

0 


TC 

1022 

REF 

285 

LAST 

288 

11*7540 

1 

0115 

0 


CCS 

1023 

REF 

1 



1 1.7641 

0 

7632 

1 


TC 

102A 

REF 

1 



11 *7 642 

0 

7521 

0 


TC 

1025 





11*7543 


04000 

0 

DSKYCODE 

OCT 

1026 





11*7544 


07265 

1 


OCT 

1027 





11*7645 


06143 

1 


OCT 

1028 





11*7646 


07-471 

1 


0C1 

1029 





11*7547 


075 73 

1 


OCT 

1030 





11*7650 


06757 

1 


OCT 

1031 





11*7651 


07736 

1 


OCT 

1032 





11*7552 


07634 

1 


OCl 

1033 





11*7653 


07163 

1 


OCT 

1034 





11*7554 


07675 

1 


OCT 

1035 





11*7655 


0777 7 

1 


OCT 

1036 





11*7 656 


00013 

0 

DCNOUT 

OEC 

1037 

REF 

1 



11*7557 


23576 

1 

LDCll 

CAOR 


lO-il 108-021 


DEC A, 1966 (MAIN) PAGE 2Bfi 


THREE 

NOUT 

DCWAIT 

uSER*S OWN PAGE NO* 24 

6K 

DSPTAb *1 
DSPTAE +4 
DSPTAB +6 
BIT12 

DSPTAB 

DSPTAB +3 
DSPTAB +5 

SIX 

NOUT 

LOWS 

OUTl 

TURNS ON DSKY LAMPS. 

B1T9 

MPAC 

BlTil 

A 

-1 

NEWJOb 

CHANGl 

MPAC 

DC + + 

TSTOUT 

KEEP GLIT ON FOR A WHILE 
LUOPS FOR ABOUT 40 MS. 

04000 

07265 

06143 

07471 

07573 

06757 

07736 

07634 

0/163 

07675 

07777 

11 

DC 11 

Blanks 

00 

11 

22 

33 

44 

55 

66 

7 7 

8U 

99 


^d^‘578A VUL SYSTEr'i FOR AQC4: 


REVISION 0 OF PROGRAM SOLRUMS5 BY 


AGC self-check 


PlOiB 

engine-on program 

FOLLOWING A +XXX 

X 

X 

• 

second 1 

^elav 

iOAO 

REF 

12 

LAST 

278 

11*7 660 

0 

3302 

0 

BROKYPRG 

TC 

lOAl 

REF 

12 

LAST 

278 

11 *7661 

0 

3310 

0 


TC 

10A2 

REF 

107 

LAST 

261 

11 * 7 662 

3 

A5l6 

i 


caf 

10h3 

REF 

1 



11 *7663 

5 

1564 

1 


T5 

i 0 h4 

REF 

1 



1 1 « 7 66 A 

3 

7 723 

0 


CAF 

i Oa5 

REF 

25 

LAST 

286 

11 *7 665 

0 

3100 

0 


TC 

1 0 A S 

REF 

22 

LAST 

286 

11*7666 

0 

3315 

Q 


TC 

10A7 

REF 

17 

LAST 

278 

1 1*766 1 

0 

3136 

0 


TC 

10A8 

REF 

37 

LAST 

286 

11*7670 

0 

2124 

1 


TC 

iOA9 





11*7671 

0 

7664 

1 


TC 

1050 

REF 

12 

LAST 

262 

11*7672 

3 

0616 

0 


xch 

1051 

REF 

23 

LAST 

1 39 

11*7673 

3 

1 A6U 

1 


XCH 

1052 

REF 

13 

LAST 

289 

11*767A 

3 

06 17 

1 


XCH 

1053 

REF 

2A 

LAST 

289 

11*7675 

3 

1 46 1 

0 


XCR 

105A 

ref 

1 



11*7676 

5 

1563 

0 


T5 

1055 

REF 

2 

LAST 

289 

11*7677 

1 

1564 

0 


CCS 

1056 

ref 

1 



11*7700 

0 

7663 

0 


TC 

1057 

ref 

2 

LAST 

289 

11*7701 

3 

1563 

0 


XCR 

1058 

REF 

A3 

LAST 

287 

1 1*7702 

0 

2173 

0 


TC 

1059 

REF 

1 



11*7703 

23706 

1 


CAOR 

1060 

REF 

15 

LAST 

286 

ll*770A 

0 

3362 

0 


TC 

1061 

REF 

38 

LAST 

289 

11*7705 

0 

2124 

1 


TC 

1062 

REF 

5 

LAST 

265 

11*7706 

A 

4502 

D 

ENGNON 

C5 

1063 

REF 

25 

LAST 

288 

1 1*7707 

7 

0011 

0 


MASK 

lObA 

REF 

6 

LAST 

289 

11*7710 

6 

4502 

1 


AO 

1065 

REF 

26 

LAST 

289 

11*7711 

5 

00 n 

1 


T5 

1066 

REF 

1 



11*7712 

3 

7 724 

1 


CAF 

1067 

ref 

2 

LAST 

117 

11*7713 

5 

1467 

0 


T5 

1066 

REF 

3 

LAST 

136 

11 .771A 

0 

5742 

0 


TC 

1069 

REF 

2 

LAST 

136 

11*7715 


10552 

1 


CAOR 

1070 

REF 

3A 

LAST 

287 

11*7716 

0 

2256 

1 


TC 

1071 

REF- 

7 

LAST 

289 

11*7717 

A 

4502 

0 

engnoff 

C5 

10?2 

REF 

27 

LAST 

289 

11*7720 

7 

0011 

0 


MASK 

1073 

REF 

28 

LAST 

289 

11*7721 

5 

00 ll 

1 


T5 

107A 

REF 

35 

LAST 

289 

11*7722 

0 

2256 

1 


TC 

1075 





11 *7723 


02124 

1 

V21N24G 

OCT 

1076 

REF 

1 



11*7724 


23717 

1 

ENGOFLOC 

CAOR 


NASA 1021108-021 


DEC Ai 19b6 


(MAIN) Page 289 


USER *5 OWN PAGE NO. 25 

uF lebs than 2 minuieb, engine will Remain on for +xxx,xx 


GRABDSP 

PREGBSY 

ONE 

CUSSANG 

V21N2AG 

NVSOB 

PRENVB5Y 

ENDIDLE 

ENDOFJOB 

—5 

DSPTEMl 
LONGTIME 
L'SPTEMI +1 
LONGTIME +1 
PLOW 
CUSSANG 
BROKYPRG +3 
PLOW 

WAITLIST 

ENGNON 

FREED5P 

ENDOFJOB 

bITiS 

OUTl 

BiT13 

OUTl 

ENGOFLOC 

CALLCADR 

IBNKCALL 

LONGCALL 

TASKOVER 

blTia 

OUTl 

OUTl 

TASKOVER 

0212A 

ENGNOFF 


yul System for agca; revisujn o Oh program sqlRumss by ^asa 1021108-021 


DEC A. 1966 


(MAIN) PAgE 290 


L Oul INTER-BANK COMMUNICATION USER'S OWN PAGE NO. 1 

Rooul the Following sjbrjutines are intended tq facilitate inter-bank communication, routines are provided 

Ro003 For jumping to a location in another bank, calling a subroutine in another bank, and obtaining data from another 


Rooos 

BANK 

. IN 

i addition. 

A routine 

IS 

0007 







0008 

REF 

85 

LAST 

228 

5654 

5 

0009 

REF 

183 

last 

284 

5655 

3 

0010 

ref 

108 

LAST 

289 

5656 

6 

OOil 

REF 

184 

last 

290 

5657 

5 

0012 

REF 

289 

LAST 

288 

5660 

2 

0013 





5661 

2 

0014 

REF 

7 

last 

228 

5662 

5 

0015 

REF 

37 

last 

159 

5 663 

3 

0016 

ref 

5 

last 

228 

5664 

5 

0017 

REF 

185 

last 

290 

5 6b5 

3 

0018 

REF 

8 

last 

290 

5666 

3 

0019 

REF 

7 

last 

84 

5667 

5 

0020 

REF 

2 

last 

119 

56 70 

7 

0021 

REF 

290 

last 

290 

56 71 

1 

0022 





5672 

0 

0023 





56 73 

0 

0024 

ref 

38 

LAST 

290 

5674 

4 

0025 

REF 

8 

last 

28B 

5675 

6 

0026 

REF 

8 

LAST 

290 

56 76 

6 

0027 

REF 

86 

LAST 

290 

5677 

3 

0028 

REF 

87 

LAST 

290 

5700 

2 

0029 





5701 

0 

0030 

REF 

6 

LAST 

290 

5702 

3 

0031 

REF 

39 

LAST 

290 

5703 

5 

0032 

REF 

7 

LAST 

290 

5704 

3 

0033 

REF 

9 

LAST 

290 

5705 

0 


provided For making up a return-address 


5654 


3Asj< 

2 

0062 

0 

BANKCALL 

T5 

ADDRWD 

0001 

0 


XCH 

Q 

4616 

1 


AD 

ONE 

0001 

0 


T5 

U 

0000 

0 


INDEX 

A 

7777 

0 


CAF 

0 -1 

0071 

1 

SWCALL 

T5 

tlmqs 

0015 

0 


XCH 

BANKREG 

0072 

1 


T5 

banktem 

0001 

0 


XCH 

U 

0071 

1 


XCH 

TEMQS 

0114 

0 


T5 

ESCAPE 

2667 

0 


viA3< 

70K 

0000 

0 


CCS 

A 

5674 

I 


TC 

+ 2 

5676 

0 


TC 

• 3 

0015 

1 


cs 

bankreg 

4373 

1 


AD 

6K 

0114 

0 

+ 3 

AD 

escape 

0062 

0 


xch 

ADDRWD 

0062 

1 


INDEX 

addrwd 

0000 

1 


TC 

0 

0072 

1 

Swreturn 

XCH 

BANKTEM 

0015 

0 


T5 

bankreg 

0072 

1 


XCH 

banktem 

0071 

1 


TC 

TLM'DS 


CrtDR For use by jHe called subroutine. 


subroutine call with transmission both 
Ways in a, the CADR of the called 
Routine should immediately follow the 

TC BANKCALL. 

PICK UP CADR and fall INTO SWCALL. 

SrtCALL IS ALOS USED TO CALL SUBROUTINES 
IIN other banks, BUT THe CADR ARRIVES IN 
A, data may be transmitted BACK TO THE 

CALLING PROGRAM IN A, HOWEVER. 

Return information now complete. 

PROVISION FOR calling A ROUTINE IN 
fixed-fixed (OF QUESTIONABLE VALUE). 

SPECIAL TREATMENT REQUIRED IF NON-ZERO. 

Input cadr ok as is. 

Form proper 12 bit address, 
proper cadrs come Here with c(a) = 0. 

So A CAN transmit WITH BANKCALL. 

sltting q to swreturn. 

Return to caller* transmitting through a 

restore a AS UPON ARRIVAL TO SWRETURN, 
RETURN. 


^b^5»78A YUL system FOR AGC^I REVISION 0 0(- PROGRAM SOLRUM55 BY 


L 001 iNTfcK-BANK COMMUNICATION 


0034 

REF 

97 

LAST 

265 

5706 

3 

5501 

0 

MAKECADR 

CAF 

0035 

REF 

10 

LAST 

290 

5707 

6 

0071 

1 


AD 

0036 

REF 

88 

LAST 

290 

5710 

5 

0062 

0 


TS 

0037 

REF 

1 



5 711 

6 

2165 

1 


AD 

0038 

REF 

51 

LAST 

270 

5712 

5 

0034 

0 


TS 

0039 

REF 

186 

LAST 

290 

5713 

0 

0001 

0 


TC 

0040 

ref 

52 

LAST 

291 

5714 

3 

0034 

□ 


XCH 

0041 

REF 

3 

LAST 

290 

5715 

6 

0072 

1 


AD 

0042 

ref 

89 

LAST 

291 

5716 

5 

0062 

0 


TS 

0043 

ref 

187 

LAST 

291 

5717 

0 

0001 

0 


TC 

0044 

REF 

4 

LAST 

209 



2165 

32K 

edjal 

00h5 

REF 

1B8 

LAST 

291 

5720 

3 

0001 

0 

POSTJUMP 

XCH 

0046 

REF 

291 

LAST 

290 

5721 

2 

0000 

0 


I NDEX 

0047 





5722 

3 

0000 

1 


caf 

0048 

ref 

40 

Last 

290 

5723 

5 

0015 

0 

BANKJUMP 

TS 

0049 

REF 

12 

LAST 

228 

5724 

7 

4606 

1 


MASK 

0050 

REP 

189 

last 

291 

5725 

3 

0001 

0 


XCH 

0051 

REF 

190 

LAST 

291 

5726 

2 

0001 

1 


INDEX 

005 2 





572 7 

0 

6000 

1 


TC 


0053 

REF 

9 

LAST 

290 

5 730 

5 

0114 

0 

DATACALL TS 

0054 

ref 

41 

LAST 

291 

5731 

3 

0015 

0 

XCH 

0055 

ref 

10 

LAST 

291 

5732 

3 

0114 

0 

XCH 

0056 

ref 

13 

LAST 

291 

5733 

7 

4606 

1 

MASK 

0057 

ref 

292 

LAST 

291 

5734 

2 

0000 

0 

1 NDEX 

0058 





5735 

3 

6000 

1 

CAP 

0059 

REF 

11 

LAST 

291 

5 736 

3 

0114 

0 

XCH 

0060 

REF 

42 

LAST 

291 

5737 

5 

0015 

0 

T S 

0061 

REF 

12 

LAST 

291 

5740 

3 

0114 

0 

XCH 

0062 

REF 

191 

LAST 

291 

5741 

0 

0001 

0 

TC 


NASA 1021108-021 


DEC 4, 1966 


(MAIN) PA&E 29 I 


ZERO 

TEMQS 

ADORWD 

32K 

OVCTR 

Q 

OVCTR 

BANicTEM 

AODRWD 

0 

PRI032 

0 

A 

0 

ban<reg 

LOW 10 

Q 

Q 

6000 


escape 

B ANiCRe G 
ESCAPE 
LOWIO 
A 

6000 

ESCAPE 

ban<reg 

ESCAPE 

Q 


USER'S OWN PAGE NO. 2 

Leaves return-address cadr (AS set by 

SwCALL OR BANKCALL) IN ADDRWD. 

SEE IE bank information NEEDED (USUAL). 

audrwd Set ok if no overflow (in ff). 

contains low 10 BITS ONLY. 

Return cadr now complete. 


OuE-WAY BANK TO BANK JUMP, WITH NO 

return address, this version transmits 
through a if desired. 

Same as above only address arrives in a, 

BANKJUMP and postjump MAY BE USED IN 

Interrupt or under exec, but bankcall 

And SwCALL MAY BE USED ONLY UNDER EXEC. 


subroutine to Retrieve data in another 

BANK. THE CADR OF THE LOCATION OF INTER- 
EST ARRIVES IN A AND ITS CONTENTS ARE IN 
A ON EXIT. THIS MAY BE USED ONLY UNDER 
EXECUTIVE, 

requested data NOW ACQUIRED. 


YUL SYSTEM FOR AGC<^: REVISION 0 0^ PROGRAM SOLRUMS5 BY NASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 292 


L 001 INTER-BANK CDMMUNICATlON USeR»5 OWN PAGE NO. 3 

P0063 the following ROJTINeB are interrupt analogs of BANKCALL and SWCmLL, BANK-TO-BaNK only. 


0065 

REF 

17 

LAST 

234 

5742 

5 

0637 

0 

IBNKCALL 

T5 

RUPTREGl 

0066 

REF 

192 

LAST 

291 

5743 

3 

0001 

0 


XCH 

Q 

0067 

REF 

109 

LAST 

290 

5 744 

6 

4516 

1 


A3 

ONE 

0068 

REF 

193 

LAST 

292 

5 7h5 

5 

0001 

0 


TS 

G 

0069 

REF 

293 

LAST 

291 

5746 

2 

0000 

0 


1 mdek 

A 

0070 





5/47 

2 

7777 

0 


CAF 

0 -1 

0071 

REF 

9 

LAST 

234 

5 750 

5 

0641 

1 

ISWCALL 

TS 

kUPTREG3 

0072 

REF 

43 

LAST 

291 

5751 

3 

0015 

0 


xch 

BANKREG 

0073 

REF 

22 

last 

234 

5752 

5 

0640 

0 


TS 

RUPTREG2 

0074 

REF 

194 

LAST 

292 

5753 

3 

0001 

0 


XCH 

0 

0075 

REF 

10 

LAST 

292 

5754 

3 

0641 

L 


XCH 

RUPTREGB 

0076 

REF 

14 

LAST 

291 

5755 

7 

4606 

1 


MASK 

LOW 10 

0077 

REF 

18 

LAST 

292 

5756 

3 

063 f 

0 


XCR 

RUPTREGl 

0078 

REF 

19 

LAST 

292 

575 7 

2 

0637 

1 


INDEX 

RUPTREGl 

0079 





5 760 

0 

6000 

1 


TC 

6000 

0080 

REF 

23 

LAST 

292 

5761 

3 

0640 

0 

I5WRETRN 

XCH 

RUPTREG2 

0081 

REF 

44 

LAST 

292 

5762 

5 

0015 

0 


TS 

BANKREG 

0082 

REF 

24 

LAST 

292 

5763 

3 

0640 

0 


XCH 

RUPTREGZ 

0083 

REF 

11 

LAST 

292 

5764 

0 

0641 

1 


TC 

RUP TREG3 


^B4b78A YUL SYSTEM FOr AGC<f; RtVlslON 0 Of- PROGRAM SOLRUM55 BY NAsA 1021108-021 


DEC A, 1966 


(MAIN) page 293 


L ALARM AND DISPLAY PROCEDJRLb uSER»5 OWN PAGE NO. l 


ROOUl 



THE 

FOLLOWING 

subroutine May 

be called 

To DISPLAY A NON- 

abortive ALARM CoNDITIoN. IT MAY BE CALLED 

RQ003 

either I 

N interrupt or 

under 

EXECUTIVE control. 




ROOOA 



calling sequence is 

AS 

Follows : 




RQ005 



TC 

alarm 








R0006 



OCT 

AAANN 



alarm 

NO. NN IN 

general 

area AAA. 


R0007 







(KETJ^NS HERE) 




0008 







3007 

BAN< 

1 


0009 





300 1 

2 

0017 

0 ALARM 

1N4INT 



0010 

REF 

195 

LAST 

292 

3010 

3 

0001 

0 

XCH 

Q 


0011 

REF 

25 

LAST 

209 

3011 

5 

0577 

1 

T5 

1 TEMPI 


0012 

REF 

2 

LAST 

lAO 

3012 

1 

1763 

0 

^ r- 

^ b 

failreg 

See if one failure has occurred since 

A0013 











IHE LAST error RESET. 

OOIA 

REF 

1 



3013 

0 

3021 

1 

TC 

MULTFAIL 

YES - INDICATE MULTIPLE FAILURES. 

0015 

REF 

1 



3014 

0 

3024 

1 

TC 

NEWALARM 

FIRST SINCE RESET. 

0016 

REF 

26 

LAST 

293 

3015 

3 

0577 

1 MULTEXIT 

xCh 

ITEMPl 

FREE ITEMPl BEFORE RELINT, 

0017 





3016 

2 

0016 

1 ENDALARM 

RElINT 



0018 

REF 

29A 

LAST 

292 

301 / 

2 

0000 

0 

I NDEX 

A 


0019 





3020 

0 

0001 

0 

TC 

1 

Return to caller. 

oozo 

REF 

5 

LAST 

265 

3021 

6 

4664 

L MULTFAIL 

AD 

CSQ 

BiT15 = 1 indicates MULTIPLE FAILURES. 

0021 

REF 

3 

LAST 

293 

3022 

5 

1763 

1 

T5 

FAILREG 

CSQ = BIT15 + BITl. 

0022 

REF 

1 



3023 

0 

3015 

0 

TC 

MULTEXIT 


0023 

REF 

27 

LAST 

293 

3024 

3 

0577 

1 NEWALARM 

XCH 

ITEMPl 

SAVE return address FOR CALL TO NOVAC, 

002A 

ref 

A 

LAST 

293 

3025 

5 

1763 

1 

T5 

FAILREG 


0025 

ref 

1 



3026 

0 

3036 

1 

TC 

proglarm 

TURN ON THE PROGRAM ALARM LIGHT. 

0026 

REF 

2 

LAST 

14*^ 

302/ 

3 

2172 

i 

CAF 

PRI037 


0027 

REF 

11 

LAST 

277 

3030 

0 

2052 

1 

TC 

NOVAC 


0028 

REF 

2 

LAST 

144 

3031 

23725 

0 

CADR 

DUALARM 

CALL (SEPARATE) JOB FOR DISPLAY. 

0029 

REF 

5 

LAST 

293 

3032 

2 

1763 

0 

INDEX 

failreg 

(KETURN address AT THIS POINT). 

0030 





3033 

3 

OUOO 

1 

CAF 

0 


0031 

REF 

6 

LAST 

293 

3034 

3 

1763 

1 

XCH 

failreg 

Set failreg and GET BACK RETURN ADDRESS. 

0032 

REF 

1 



3035 

0 

3016 

0 NEWALM2 

TC 

ENDALARM 
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371 

22 *622 7 

04256 

1 



0172 

REF 

7 

LAST 

370 

22*6230 

33521 

1 


STORE 

0173 





22*6231 

47576 

0 


NOLOO 

017A 

REF 

A 

LAST 

371 

22*6232 

33323 

0 


STORE 

01 75 





22*6233 

66775 

1 


D5J 

0176 





22*6234 

43772 

1 


B?L 

0177 

REF 

8 

LAST 

371 

22*6235 

01521 

0 



0178 

ref 

A 

LAST 

371 

22*5236 

05200 

0 



0179 

REF 

1 



22*6237 

04244 

1 



OlbO 

REF 

5 

LAST 

371 

22 *62A0 

04262 

0 



0181 





22*62A1 

76776 

0 


ITC 

0182 

REF 

1 



22*62A2 

04225 

0 



0183 





22*62A3 

47176 

1 

RESETO 

CONP 

OlSA 

REF 

5 

LAST 

371 

2 2 * 62AA 

05200 

0 



0185 

REF 

5 

LAST 

371 

22*62A5 

33323 

0 


STORE 

0186 





22*62A6 

76776 

0 


ITC 

0187 

REF 

1 



22t62A7 

04210 

0 



0188 





22,6250 

47176 

1 

RESETM 

COMP 

0189 

REF 

6 

LAST 

371 

22*6251 

05200 

0 



0190 

REF 

8 

LAST 

371 

22*6252 

33321 

1 


STORE 

0191 





22,6253 

76776 

0 


ITC 

0192 

REF 

1 



22 *625A 

04173 

0 



0193 





22 *625:? 

06314 

1 

INCRMT 

20EC 

C0193 





22 *6256 

31463 

1 



019A 





22*625 7 

77576 

0 

OUT 

EXIT 

0195 

REF 

A8 

LAST 

366 

22 « 6260 

0 2124 

1 

LAST WORD 

TC 


NASA 1021108-021 


1966 (MAIN) PAGE 371 


OEC A, 


INCRMT 

MGC 

0 

GYROCSW 

1 

ITC 

MGC 

HALFDP 

RESETM 

DOTEST 

USER'S OWN PAGE NO. 6 

1 

prelxga 

INCRMT 

OGC 

0 

prelxga 

1 

ITC 

OGC 

HALFDP 

RESETO 

DOTEST 

0 

CHGOGC 

Reset ogc and test 

0 

HALFDP 

prelxga 

0 

chgmgc 

RESET OGC TO-HALF 

LOOP TO CHGMGC 

0 

HALFDP 

GYROCSW 

0 

CHGIGC 

.20 

0 

LNDOFJOB 

Reset mgc to -half 

LOOP TO CHGIGC 

END OF MAIN 


END OF MAIN 


<»a<»&7aA YUL SYSTEM FOR AGC<tl REVISION 0 Of- PROGRAM SoLRUMSS BY NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 



inflight 

alignment 

program 






USER'S OWN 

PAGE NO. 7 

0196 





22,5261 

A5575 

1 

DOTEST 

ITA 

1 



0197 





22 ,6262 

75172 

1 


VMOVE 

ITC 



0198 

REF 

6 

LAST 

35a 

22,6263 

01315 

1 



LATITUDE 



0199 

REF 

1 



22 , 6 26A 

15573 

1 



UN I T X 



0200 

REF 

1 



22 ,6265 

0A313 

1 



MYROT 



0201 





22,6266 

A7576 

0 


NDLOO 

0 



0202 

REF 

3 

LAST 

359 

22,6267 

33A03 

0 


STORE 

ST ARAD 



0203 





22,6270 

75175 

0 


VMOVE 

1 



020A 





22,6271 

76776 

0 


I TC 




02US 

REF 

1 



22,6272 

15601 

1 



UNITY 



0206 

REF 

2 

LAST 

3 n 

22,6273 

0A313 

1 



MYROT 



0207 





2 2 , 6 2 ? A 

A7576 

0 


NOLOD 

0 



0208 

REF 

A 

LAST 

372 

22,6275 

33A11 

0 


STORE 

STARAD *60 



0209 





22,5276 

75176 

0 


VMOVE 

0 



0210 

REF 

2 

LAST 

372 

22,6277 

15573 

1 



UNITX 



0211 





22,6300 

32007 

1 


STORE 

6D 



0212 





22,6301 

75176 

0 


VMOVE 

0 



0213 

REF 

2 

LAST 

372 

22,6302 

15601 

1 



unity 



02U 





22,6303 

32015 

1 


STORE 

120 



0215 





22 , 630 a 

76776 

0 


ITC 

0 



0216 

REF 

2 

LAST 

360 

22 ,6305 

0A761 

0 



AXISGEN 



0217 





22,6306 

76776 

0 


ITC 

0 

SLND new VECTORS TO CALCGTA 

0218 

REF 

2 

LAST 

360 

22,6307 

04353 

0 



CALCGTA 



0219 





22,6310 

AA576 

0 


ITCl 

0 



0220 

REF 

7 

LAST 

372 

22,6311 

01315 

1 



LATITUDE 



0221 





22,6312 

A5575 

1 

MYROT 

ITA 

1 

INITIALIZE 


0222 





22,6313 

A 3A 1 1 

1 


TEST 

SW I T Ch 



0223 

REF 

5 

LAST 

3A7 

22,631a 

00052 

0 



S2 



02 2 A 

REF 

3 

LAST 

355 

22,6315 

00006 

1 



NbSMbIT 



0225 

REF 

1 



22,6316 

0A321 

0 



MYROTI 



0226 

REF 

A 

LAST 

372 

22,6317 

00006 

1 



NBSMBIT 



0227 





22,6320 

75575 

1 

myroti 

AXl , 1 

1 

ROTATE X,2 

ABOUT Y 

0228 





22,6321 

7AA23 

1 


AXT ,2 

DMOVE 



0229 





22,6322 

00005 

1 



A 



0230 





22,6323 

0000 i 

D 



0 



0231 

REF 

5 

LAST 

370 

22,632A 

01523 

1 



IGC 



0232 





22,6325 

32037 

1 


STORE 

30D 



0233 





22,6326 

76776 

0 


1 TC 

0 



023A 

REF 

2 

LAST 

35A 

22,6327 

0A566 

0 



accjrot 




'♦u4t)78A YUL SYSTEM FOR AGC<^ 
L INFLIGHT ALIGNMENT 


0235 

0236 


0237 

0238 

0239 

0240 

REF 

0241 

0242 

ref 

0243 

02A4 


0245 

0246 

0247 

0248 

REF 

0249 

0250 

REF 

0251 

0252 

REF 


5 LAST 371 

3 LAST 372 

9 LAST 371 

A LAST 373 

6 LAST 372 


; REVISION 

PROGRA^( 

22 

.6330 

22 

*6331 

22 

*6332 

22 

*6333 

22 

♦ 6334 

22 

*6335 

22 

♦ 6336 

22 

*633 7 

22 

*6340 

22 

*6341 

22 

*6342 

22 

* 6343 

22 

* 6 344 

22 

*6 345 

22 

*6346 

22 

*6347 

22 

*6350 

22 

♦ 6351 


0 Oh PROGRAM 


75S7S I 
7^423 1 
00003 I 
OOOOS 1 
01525 1 
32037 1 

76776 0 
04566 0 

75575 1 
74423 1 
00001 0 
00003 1 
01521 0 
32037 1 

76776 0 
04566 0 


44576 0 
00052 0 


SOLRUM55 BY 

AXTtl 

AXT*2 

store 

I TC 

AXTf 1 
AXTi2 

STORE 

ITC 

ITCI 


NASA 1021108-021 DEC 4, 1966 (MAIN) PAGE 373 


USER»S O^N PAGE NO. 8 

1 rotate x»y about Z 

OMOVE 

2 

4 

MGC 

300 

0 

ACCJROT 

1 ROTATE Z,Y ABOUT X 
DM0 VE 

0 

2 

OGC 

30D 

0 

ACCJROT 


0 

S2 


4 a 4 b 7 

L 

0001 

R0002 

0003 

000 ^» 

0005 

0006 

0007 

0006 

0009 

0010 

0011 

0012 


YUL system for AGC't: REVISION 0 OF PROGRAM SOLRUM55 BY nASA 1021108-021 


DEC A * 1 966 


(MAIN) PAGE 37A 


rtb op codes USER'S om page no. 1 


30t6252 0AN< 30 

ROUTINE TO LOAD TIME OF DAY INTO MPAC 


REF 

A 

LAST 

335 

30t6252 

0 

2676 

1 

LOADTIME TC 

readtime 

REF 

2A 

LAST 

367 

30 i62b3 

A 

0572 

0 

CS 

kUPTSTOR 

REF 

312 

LAST 

358 

30 « 625h 

5 

0115 

I 

T5 

MPAC 

REF 

25 

LAST 

37A 

30 »6255 

A 

0573 

1 

CS 

RUPTSTOR +1 

REF 

313 

LAST 

37 A 

30 1 6256 

5 

0116 

I 

T5 

MPAC +1 





30*6257 

2 

0016 

1 

RElINT 


REF 

llA 

LAST 

366 

30*6260 

3 

5501 

0 

caf 

ZERO 

REF 

lA 

LAST 

105 

30*6261 

5 

0066 

1 

T5 

NEwEQ I NO 

REF 

31A 

LAST 

37A 

30*6262 

5 

0117 

0 

T5 

MPAC +2 

REF 

A 

LAST 

97 

30*6263 

0 

5237 

1 

TC 

DPEXIT 


s* 



YUL SYSTEM FOR AGC4; REVISION U Oh P^^OGRAM &OLRUMS5 BY 


L 

rtb 

OP 

CODES 






P0013 

ROUTINE 

TO RESET the 

PUSHDOWN 

POUNTER 



oou 

REF 

16 

LAST 312 

30 » 6 26A 

4 

0067 

1 

FRESHPD C5 

0015 




30t6265 

A 

0000 

0 

CD^I 

0016 

REF 

21 

LAST 312 

30,6266 

5 

0123 

1 

T5 

0017 

REF 

15 

LAST 78 

30,6267 

0 

4703 

1 

TC 


C/1 


NASA 102U08-021 


DEC 4, 1966 (MAIN) PAGE 37b 


USER'S OWN PAGE NO- 2 


F IXLOC 

PUSHLOC 

RE-ENTER 


^fa4t)78A YUL SYSTEM FDR AGC^J REVISION Q OF PROGRAM SOLRUM55 BY NASA lo2110b-021 


OEC a, 1966 <MA1N) PAGE 376 


L RTb OP CODES USER'S OWN PAGE NO, 3 


Puoie 

routine 

TO ZERO OUT 

THE FIRST 

38 LOCS 

OF 

A VAC 

area 


0019 

REF 

1 



30*6270 

3 

6302 

0 

ZERDVAC 

CAF 

37DLC 

0020 

REF 

55 

LAST 

203 

30,6271 

5 

0102 

1 

ZVLOOp 

T5 

TEm2 

0021 

REF 

17 

LAST 

375 

30*6272 

6 

0067 

0 


AD 

FlXLOC 

0022 

REF 

205 

LAST 

365 

30*6273 

5 

0001 

0 


T5 

0 

0023 

REF 

115 

LAST 

374 

30*6274 

3 

5501 

0 


CAP 

ZERO 

002A 

REF 

206 

LAST 

376 

30*6275 

2 

0001 

1 


INDEX 

u 

0025 





30*6276 

5 

0000 

1 


T5 

0 

0026 

REF 

56 

LAST 

376 

30*6277 

1 

0102 

0 


CCS 

TEM2 

0027 

REF 

1 



30*6300 

0 

6271 

0 


TC 

ZVLOOP 

0028 

REF 

16 

LAST 

375 

30*6301 

0 

4703 

1 


TC 

RE-ENTER 

0029 





30*6302 


00045 

0 

37DEC 

DEC 

37 



40i*ij78A YUL SYSTEM FOR AGC*^: REVISION 0 Of PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 1966 


(MAIN) page 3)7 


L RTB op COOES USER'S OWN PAGE NO, A 

P0030 ROUTINE TO CONVERT IS COMP. NOS, TO IS COMP. 


0031 

ref 

315 

LAST 

37A 

30,6303 

1 

0115 

0 

CDULOGIC 

CCS 

0032 

REF 

1 



30,630A 

0 

6311 

1 


TC 

0033 

REF 

2 

LAST 

377 

30,6305 

0 

6311 

1 


TC 

003A 





30,6306 

0 

6307 

0 


TC 

0035 

REF 

7 

LAST 

362 

30,6307 

A 

A522 

1 


C5 

0036 





30,6310 

0 

6312 

1 


TC 

0037 

REF 

116 

LAST 

376 

30,6311 

A 

5501 

1 

CDULOGl 

cs 

0038 

REF 

53 

LAST 

291 

30,6312 

3 

003A 

0 


XCH 

0039 

REF 

316 

LAST 

377 

30,6313 

3 

0115 

1 


XCH 

OOAO 





30,631h 

2 

5 777 

1 


EXTEND 

OOAl 

REF 

8 

LAST 

377 

30,6315 

A 

A522 

1 


VJP 

00^2 

REF 

5A 

LAST 

377 

30,6316 

3 

003A 

0 


XCH 

00A3 

REF 

5 A 

LAST 

366 

30,6317 

6 

0003 

1 


AD 

ooaa 

REF 

317 

LAST 

377 

30,6320 

3 

0116 

1 


XCH 

OO'+S 

REF 

55 

LAST 

377 

30,6321 

3 

003a 

0 


XCH 

00A6 

REF 

318 

LAST 

377 

30,6322 

3 

0115 

1 


XCH 

0047 

REF 

5 

LAST 

37A 

30,6323 

0 

5237 

1 


TC 


MPAC This BASIC ROUTINE TESTS CDU ANGLES FqR 

COULOGl ♦UR-SIGN INCLUDING ZERO AND FORMS A DP 

CDUL061 NUMBER CORRESPONDING TO ANGLE 


♦ 1 



HALF 

USE 

SMOVE 1 

+ 2 


RTB 

ZERO 


CDUXYZ 

OVCTR 


CDULOGIC 

MPAC 




HALF 

OVCTR 

LP 

MPAC +1 
OVCTR 
MPAC 
DPEXIT 


48A578A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUMS5 BY NASA 1021108-021 


DEC A, 


1966 (MAIN) PAGE 378 


PU0A8 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 

0058 

0059 

0060 
0061 

0062 

0063 

0064 

0065 


RTB OP CODES 


USER’S Own page no. 5 


ROUTINE TO CONVERT IS COMP. NOS. TO 2S COMP. 


REF 

117 

LAST 

377 

30^6324 

3 

5501 

0 

1ST02S 

CAP 

REF 

319 

LAST 

377 

30f 6325 

3 

0116 

1 


XCH 





30»6326 

6 

0000 

1 


DOUBLE 

REF 

56 

LAST 

377 

30*632 7 

5 

0034 

0 


TS 

REF 

118 

LAST 

378 

30,6330 

3 

5501 

0 


caf 

REF 

320 

LAST 

378 

30,6331 

6 

0115 

1 


AO 

REF 

321 

LAST 

378 

30,6332 

6 

0115 

1 


AO 

REF 

303 

LAST 

367 

30*6333 

1 

0000 

0 


CCS 

REF 

123 

LAST 

366 

30,6334 

6 

4516 

1 


AO 





30*6335 

0 

6337 

0 


TC 





30*6336 

4 

0000 

0 


COM 

REF 

322 

LAST 

378 

30*6337 

5 

0115 

1 

ZYXR 

TS 

REF 

6 

LAST 

377 

30*6340 

0 

523? 

1 


TC 

ref 

304 

LAST 

378 

30*6341 

2 

0000 

0 


INDEX 

REF 

4 

LAST 

203 

30*6342 

3 

4477 

1 


caf 

ref 

323 

LAST 

378 

30,6343 

6 

0115 

1 


AD 

REF 

1 



30 , 6344 

0 

633 7 

0 


TC 


ZERO 
MPAC +I 

OVCTR 

ZERO 

MPAC 

MPAC 

A 

ONE 

+ 2 

MPAC AnD MAYBE OVERFLOW, 

OPEXIT 

A HANOLE overflow in standard ANGULAR WAY 

LIMITS 

MPAC GUARANTELD NO OVERFLOW, 

ZYXR 




I 





*• 











V I 

JT 



t.r. 


ti 




0 


' » ■ w 

*• * I ■ 


« ^ t M 





YUL SYSTEM FOR AGc^; REVISUM 0 OF PROGRAM SOLRUMSS BY 


L rtb op codes 


0066 





30»63A5 

2 

0017 

0 

READPIPS 

1 MHlNT 

0067 

REF 

2 

LAST 

335 

3O ^ 63A 6 

4 

0044 

0 


CS 

006B 

REF 

305 

LAST 

37B 

30^6347 

4 

0000 

0 


C5 

0069 

REF 

18 

LAST 

376 

30,6350 

2 

006 7 

1 


I ^OEX 

00 /O 

REF 

7 

LAST 

35A 

30,6351 

5 

0040 

0 


T5 

0071 

REF 

6 

LAST 

367 

30,6352 

4 

0045 

1 


CS 

0072 

REF 

306 

LAST 

379 

30,6353 

4 

0000 

0 


C5 

007 3 

REF 

19 

LAST 

379 

30,635A 

2 

006 7 

1 


I 'JOEX 

007A 

REF 

8 

LAST 

379 

30,6355 

5 

0042 

1 


1 5 

0075 

REF 

2 

LAST 

335 

30 , 6356 

4 

0046 

1 


CS 

0076 

REF 

307 

LAST 

379 

30,6357 

4 

0000 

0 


C5 

0077 

REF 

20 

LAST 

379 

30,6360 

2 

0067 

1 


INDEX 

0078 

REF 

9 

LAST 

379 

30,6361 

5 

0044 

1 


TS 

0079 





30,6362 

2 

0016 

1 


RELINT 

0080 

REF 

119 

LAST 

378 

30,6363 

3 

5501 

0 


caf 

0081 

REF 

21 

LAST 

379 

30,6364 

2 

0067 

1 


INDEX 

0082 

REF 

10 

LAST 

379 

30,6365 

5 

0041 

1 


1 5 

0083 

REF 

22 

LAST 

379 

30 f 6 366 

2 

006 7 

1 


INDEX 

008A 

REF 

11 

LAST 

379 

30,6367 

5 

0043 

0 


TS 

0085 

ref 

23 

LAST 

379 

30,6370 

2 

0067 

1 


INDEX 

0086 

REF 

12 

LAST 

379 

30,6371 

5 

0045 

0 


TS 

0087 

ref 

15 

LAST 

37A 

30,6372 

5 

0066 

1 


TS 

0088 

REF 

120 

LAST 

379 

30,6373 

4 

5501 

1 

VMODE 

CS 

0089 

REF 

7 

LAST 

378 

30,6374 

0 

5240 

1 


TC 


0090 

REF 

24 

Last 

379 

30*6375 

2 

006 ? 

1 

PULSElMU index 

0091 

REF 

7 

LAST 

360 

30,6376 

4 

0046 

1 

CS 

0092 





30,6377 

4 

0000 

0 

CDM 

0093 

REF 

49 

LAST 

365 

30,6400 

0 

56 54 

0 

TC 

0094 

ref 

4 

LAST 

342 

30,6401 


31433 

1 

CADR 

0095 

REF 

17 

LAST 

376 

30,6402 

0 

4703 

1 

1 C 


ASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 379 


USER’S Own page no. 6 


PIPAX 

A 

P IXLOC 

VAC 

PlPAY 

A 

F iXLOC 

VAC +2 

PIPAZ 

A 

FIXLOC 

VAC *4 

ZERO 

FIXLOC 

VAC +1 

FIXLOC 

VAC +3 

FIXLOC 

VAC +5 

NEWEQIND 

ZERO 

DPEXIT +1 

LOAD INDICATOR OFF. 

F iXLOC 

XI 

BANKCALL 

gyrodpnt 

ADDRESS OF GYRO COMMANDS SHOULD BE IN XI 


RE-ENTER 


43-!fS»78A YUL SYSTEM FOR A&CA: REVISION 0 OF PROGRAM SoLRUMSS 3Y NASA 1021108-021 


dec 1966 


(MAIN) PAGE 380 


L 

RTB 

OP CODES 







USER*S OWN page no. 

7 

0096 

REF 

50 LAST 

379 

30»6tt0i 

0 5654 

0 

SgNAgREE tc 

BANICCALL 



0097 

REF 

8 LAST 

262 

30»6it0<+ 

07154 

0 

CAOR 

TPAGREE 



0096 

REF 

8 LAST 

379 

30»6i!»05 

0 523 1 

1 

TC 

DPEXIT 




R0099 

Rou 

T I NE 

TO complete 

OPTICS trunnion 

angle conversion from counter 



ROlOO 

reading 

TO DP 

Revolutions, calls to 

trunlog should be 

immediately 



ROlOl 

preceded 

' BY A 

call 

to CDJlOG 

I C . ( NU 

NEED TO CHEC< SXT 

power-on bit.) 



0106 

REF 

1 



30 » 6406 

3 64 1 4 

0 

trunlog 

caf 

1 ODEGS 

CORRECT 

For 20 DEG offset (CDULOGIC 

0107 

REF 

324 

LAST 

378 

30*640/ 

6 0115 

I 


AO 

MPAC 

already 

shifted it right ONE) AND SHIFT 

oiue 

REF 

325 

LAST 

380 

30*6410 

5 0115 

1 


T5 

MPAC 

RIGHT TWO additional PLACES. 

0109 

REF 

4 

LAST 

194 

30*6411 

3 4502 

1 


CAF 

quarter 



0110 

REF 

3 

LAST 

223 

30,6412 

0 5*+l6 

1 


TC 

SHORTMP 



01105 

REF 

37 

LAST 

305 

30,6413 

0 4024 

0 


TC 

DANZIG 

WITH PD 

If at end W/ no ADDRESSES. 

0111 





30»6414 

07020 

1 

lODEGS 

DEC 

3600 

half of 

SXT trunion offset 



(MAIN) PAGE 381 


0112 

REF 

1 



30»6A15 

3 

6A35 

0 

INCRCDUS 

CAF 

LOCTHETA 

0113 

REF 

110 

LAST 

362 

30*6Al6 

5 

007 7 

1 


T5 

bUF 

OUA 

REF 

Aa 

LAST 

359 

3 0 * 6 A 1 I 

3 

5603 

1 


CAP 

Two 

0115 

REF 

111 

LAST 

381 

30,6A20 

5 

0100 

0 

INCRCDU2 

15 

BUF +1 

0116 





30 »6A2 1 

6 

0000 

i 


OOJBLE 


0117 

REF 

27 

LAST 

lOA 

30,6A22 

6 

0070 

0 


AD 

VACLOC 

0118 

REF 

308 

LAST 

379 

30,6A23 

2 

0000 

0 


INDEX 

A 

0119 





30 1 6 A2A 

A 

00 00 

□ 


C5 

0 

0120 





30t6A25 

A 

0000 

0 


CDM 


0121 

REF 

51 

LAST 

380 

30*6A26 

0 

565 A 

0 


TC 

BANXCALL 

0122 

REF 

2 

LAST 

2A1 

30»6A2 r 


30361 

0 


CADR 

CDUINC 

0123 

REF 

1 12 

LAST 

381 

30»6A30 

1 

0077 

0 


CCS 

BUF 

01 2 A 

REF 

113 

LAST 

381 

30,6A31 

5 

0077 

1 


T5 

bUF 

0125 

REF 

lU 

LAST 

381 

3 0 ♦ 6 A 3 2 

1 

0100 

1 


CCS 

BUF +1 

0126 

REF 

1 



30,6A33 

0 

6A20 

1 


TC 

INCRCDU2 

0127 

REF 

1 



30 » 6 A3 A 

0 

6373 

0 


I c 

VMODE 

0128 

REF 

15 

LAST 

33A 

30t6A35 


00702 

1 

LOCTHETA 

ADRES 

THETAD +2 


Ad^bTaA YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM 50LRUM55 BY NASA 1021108-0^1 


DEC A, 1966 


rtb op codes 


USER*S Own page NO, 


<*a4578A YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM SOLRUMSS BY 


L RTB OP CODES 

P0129 LOG FUNCTION SUBROUTINE 


RUliO INPUT... X (IN IMPACy 

R0131 OUTPUT... -LN{X)/32 { IN MPAC. SCALED BY 32T0 FIT 


0132 

REF 

1 



30,6436 

0 6563 

1 

log 

TC 

0133 

REF 

18 

LAST 

3 70 

30,6437 

0 4000 

0 


TC 

0134 





30«6440 

47574 

1 


NDLOO 

0135 





30,6441 

57726 

0 


TSLC 

0136 





30,6442 

77576 

0 


EXIT 

A0137 










0138 





30,6443 

00040 

0 



0139 

REF 

1 



30 ,6 444 

21043 

0 



0140 

ref 

5 

LAST 

305 

30 ,6 445 

0 5554 

0 


TC 

0141 





30 , 6446 

00006 

1 


DEC 

0142 





30,6447 

00000 

1 


20EC 

C0142 





30,6450 

00000 

1 



0143 





30,6451 

OlOOl 

1 


20EC 

C0143 





30,6452 

14636 

1 



0144 





30,6453 

00325 

0 


2DEC 

C0144 





30f6454 

07310 

1 



0145 





30,6455 

00541 

1 


2DEC 

C0145 





30,6456 

16735 

1 



0146 

REF 

121 

LAST 

379 

30,6457 

3 5501 

0 


CAP 

0147 

REF 

326 

LAST 

380 

30,6460 

5 0117 

0 


TS 

0148 

REF 

1 



30 , 646 1 

3 6502 

0 


CAF 

0149 

REF 

327 

LAST 

382 

30,6 462 

3 0116 

1 


XCH 

0150 

REF 

1 



30,6463 

5 0100 

0 


TS 

0151 

REF 

2 

LAST 

382 

30 , 6464 

3 6501 

0 


CAF 

0152 

REF 

328 

LAST 

382 

30,6465 

3 0115 

1 


XCH 

0153 

REF 

2 

LAST 

382 

30,6466 

3 0077 

1 


XC4 

0154 

REF 

25 

LAST 

379 

30 ,6467 

2 0067 

1 


INDEX 

0155 





30»6470 

4 0037 

1 


C5 

0156 

REF 

1 



30,6471 

0 5422 

0 


1 c 

0157 

REF 

329 

LAST 

382 

30,6472 

3 0117 

0 


XCH 

0158 

REF 

330 

LAST 

382 

30,6473 

3 0116 

1 


XCH 

0159 

REF 

331 

LAST 

382 

30,6474 

3 0115 

1 


XCH 

0160 

REF 

1 



30,6475 

0 5171 

0 


TC 

0161 

ref 

3 

LAST 

382 

30»6476 

0007 1 

1 


ADRES 

0162 

REF 

2 

LAST 

382 

30,6477 

0 6563 

1 


IC 

0163 

ref 

9 

LAST 

380 

30,6500 

0 5237 

1 


TC 

0164 





30t650i 

00542 

1 

CLOGl/2 

2DEC 

C0164 





30,6502 

34414 

1 




NASA 1021108-021 

DEC 4, 1966 (MAINJ PAGE 3«2 


USER'S OWN PAGE NO. 9 


LOG OF 2EXP-28. 


SwApLOC 

INTPRET 

CALLED BY RTB LOG 

2 

0DSU 

31D 

NEARONE 

Generates log by shifting arg until 

IT LIES BETWEEN ,5 ANOl. THE LOG OF 

THIS PART IS FOUND AND THE LOG OF tHe 

Shifted part is computed and added in. 
Shift count stored in loc 31 of vac area 

POLY 

6 

0 

.031335467 

.0130145859 

.0215738898 

gets log of principle part. 

ZERO 

MPAC + 2 

CLOGl/2 +1 

MPAC +1 

LOGTEM +1 
CL0&1/2 

MPAC 

logtem 

FIXLOC 

31D 

SH0RTMP2 

LUAD positive SHIFT COUNT IN A. 

MULTIPLY BY SHIFT COUNT. 

MPAC +2 

MPAC +1 

MPAC 

DAD 

LOGTEM 

SWAPLOC 

DPEXIT 

RESULT WAS IN MPAC +1 AND MPAC +2. 

ADD IN PREVIOUS RESULT, LEFT IN LOGTEM. 


0216608A9A 


4«4b7HA YUL SYSTEM FDR AGCA; RtVlbljN 0 OF PRdGKAM 50LRUM55 BY 


L RTB OP CODES 

Poi65 sub'^outine to compute the arctan of- the RAlIO 


R 0 1 66 


called as though a basic SU3R... rtb 


0167 

ref 

3 

LAST 

382 

30i6503 

0 6563 

1 

ARCTAN 

TC 

0168 

REF 

19 

LAST 

382 

30t650A 

0 4000 

0 


TC 

0169 





30f 6505 

51176 

0 

I NATAN 

DSD 

0170 

REF 

1 



3 0 1 6 50 6 

00045 

0 



0171 





30t6507 

51172 

1 


DSD 

0172 





30 1 65 10 

70746 

0 


dad 

0173 





30*6511 

47653 

1 


3Z£ 

017A 





30*6512 

61746 

0 


0DDV 

0175 





30*6513 

56 rl3 

1 


T5RT 

0176 

REF 

1 



30*651h 

00041 

1 



0177 





30*6515 

77777 

0 



0178 

REF 

1 



30*6516 

20547 

0 



0179 

REF 

1 



30*6517 

20553 

0 



0180 

REF 

2 

LAST 

383 

30*6520 

00045 

0 



0181 

REF 

1 



30*6521 

20557 

1 



0182 





30*6522 

00002 

0 



0183 





30*6523 

73774 

1 


BMN 

0184 





30*6524 

41423 

1 


LDDON 

0185 





30*6525 

77576 

0 


EXIT 

0186 

REF 

2 

LAST 

383 

30 * 6 5 2 6 

00041 

1 



0187 

REF 

1 



30*6527 

20534 

1 



0188 





30*6530 

77777 

0 



0189 

REF 

4 

LAST 

383 

30*6531 

0 6563 

1 

ATANDUN 

TC 

0190 

REF 

10 

LAST 

382 

30,6532 

0 5237 

1 


TC 


0191 





30*6533 

47174 

0 

NeGVX 

CDMP 

0192 





30*6534 

43742 

1 


0PL 

0193 





30*6535 

76576 

1 


RTB 

0194 





30*6536 

7777 / 

0 



0195 

REF 

1 



30*6537 

20543 

1 



0196 

REF 

1 



30 * 6 540 

21 17h 

0 



0197 

REF 

1 



30*6541 

20532 

1 



0198 





30,6542 

47575 

0 

NEGOUT 

NDLOO 

0199 





30,6543 

66771 

0 


D5J 

0200 

REF 

2 

LAST 

383 

30*6544 

21174 

0 



0201 

REF 

2 

LAST 

383 

30,6545 

20532 

1 



0202 





30*6546 

47575 

0 

2BIG 

NDLDD 

0203 





30*6547 

45772 

1 


YSRT 

0204 





30*6550 

00002 

0 



0205 

REF 

1 



30*6551 

20506 

0 




NASA 1021108-021 


DEC A, I9b6 


(MAIN) PAGE 383 


UK TWO FUNCTIONS, 

ARCTAN 

USER'S OWN PAGE NO. 10 

1 

SWAPLOC 

INTPRET 

ARCTAN COMPUTES ARCTAN tVACZ/VACX ) 

0 

VACZ 

4 

BOV 

sqrt 

BOV 

ASIN 

VACX 

RESULTHAS value between + AND - 1/2 

(180 DEG. SCALED) IS LEFT IN MPAC. 

2BIG 

ATANO/0 

VACZ 

ATAN=90 

1 

2 

DM0 VE 

AND PUSH IT DOWN 

VACX 

NEGVX 

SWAPLOC 

dpexit 

(INACTIVE needed FOR PUSH-UP). 

2 

DAD 

NEGOUT 

HALVE 

ATANDUN 

1 

RTB 

halve 

ATANDUN 

1 

itc 

1 

INATAN 

u VACX Negative* chnage result. 


<»b4t)78A YUL SYSTEM FOR AGc^f; REVISION 0 OP PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A f 1966 


(MAIN) PAGE 38A 



rtb 

OP 

CODES 








USER'S OWN 

page no. 11 

0206 





30*6552 

45175 

0 

ATANO/0 

DMOVE 

1 



0207 





30*6553 

76576 

1 


RTS 




0208 

REF 

1 



30*6554 

21057 

0 



3ZER05 

WhAT should 

ARClANtO/0) = 

0209 

REF 

3 

LAST 

383 

30*6555 

20532 

1 



ATANDUN 



0210 





30*6556 

53 775 

1 

ATANsgO 

5 1 ON 

1 



0211 





30*6557 

76576 

1 


RTS 




0212 

REF 

1 



30 ♦ 6560 

21055 

1 



FOURTH 



0213 

REF 

3 

LAST 

383 

30*6561 

00045 

0 



VACZ 



0214 

REF 

4 

LAST 

384 

30*6562 

20532 

1 



ATANDUN 




4b^f>78A YUL SYSTEM FOR AGC^fJ REVISION 0 Ol- PROGRAM SOLRUMSS BY 


L RTB OP CODES 

P0215 BASIC subroutine 


0216 

REF 

27 

last 

201 

0217 

REF 

26 

LAST 

382 

02ie 

0219 

REF 

28 

LAST 

385 

0220 

REF 

2A 

LAST 

lOA 

0221 

REF 

27 

LAST 

385 

0222 

0223 

REF 

25 

LAST 

385 

022A 

ref 

16 

LAST 

109 

0225 

REF 

16 

LAST 

105 

0226 

REF 

28 

LAST 

385 

0227 
022 8 

REF 

17 

LAST 

385 

0229 

REF 

13 

LAST 

23a 

0230 

REF 

18 

LAST 

385 

0231 

REF 

6 

LAST 

227 

0232 

0233 

REF 

17 

LAST 

385 

02 3 A 

REF 

207 

LAST 

376 


Save 

interpreter 

registers (5 

* 6 5 0 3 

3 

0120 

1 

SWAPLOC xch 

65bA 

2 

0067 

1 

I NIDEX 

6565 

3 

003A 

0 

XCH 

6566 

5 

0120 

1 

TS 

6 567 

3 

0121 

0 

XCH 

6570 

2 

0067 

1 

INDEX 

6571 

3 

0035 

i 

XCH 

6572 

5 

0121 

0 

TS 

6573 

A 

0061 

1 

C5 

6 57 A 

6 

0063 

1 

AD 

6575 

2 

0067 

1 

1 ndex 

6576 

3 

0036 

1 

XCH 

6 57 7 

5 

0063 

1 

TS 

6600 

7 

A72U 

1 

MASK 

6601 

3 

0063 

1 

XCH 

6602 

7 

2261 

1 

MASK 

6603 

A 

0000 

0 

COM 

6 60 A 

5 

0061 

0 

TS 

6605 

0 

0001 

0 

TC 


TO 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 

30 


NASA 1021108-021 


DEC A, 1966 


( MA 1 N ) PAGE 38S 


USER'S OInN page NO. 12 


BANK AS RTBS) , 


LOC 

E IXLOC 
28D 

Luc 

ADRLOC 

FIXLOC 

29D 

AURLOC 

bankset 

order 

EIXLOC 

BOD 

ORDER 

L0W7 

ORDER 

BANXMASK 


subroutine to swap LoC, ADRLOC, AND 
ORDER REGISTERS WITH LOCATIONS 28, 
29* AND 30 IN temp AREA, 


USEFUL For using interpreter IN SUBROUT 
AND THEN ABLE TO CONTINUE IN MIDDLE OF 
CURRENT EQUATIONS. 

USE... TC SWAPLOC 

PACK INTERPRETIVE BANK AND ORDER IN 30D. 


TC SWAPLOC 
TC DANZIG 


bANKSET 

C 


YUU SYSTEM FOR AgC^: REVlSljN Q 0^ PROGRAM SOLRUM^jS BY NASA 102U0B-021 


DtC 4f 1966 <MAIN) PAGE 386 


L RTB OP CODES USER’S OwN PAGE NO, 13 

P0235 subroutine TO SET MPaCS To PQS oR NEC MAX DEPENDING qN SIGN MPAC 


0236 

REF 

332 

LAST 

382 

30 1 6 606 

1 

Oils 

0 

SIGNMPAC 

NpN-D 

MPAC 

0237 

REF 

1 



30*6607 

0 

6621 

1 


TC 

SETPOS 

0238 

REF 

2 

LAST 

386 

30,6610 

0 

6621 

1 


TC 

SETPOS 

0239 





30,6611 

0 

6612 

1 


TC 

+ 1 

02A0 

REF 

5 

LAST 

50 

30,6612 

3 

4500 

0 


CAP 

NEG51GN 

02aI 

REF 

333 

LAST 

386 

30,6613 

5 

0U5 

1 


TS 

MPAC 

02A2 

REF 

334 

LAST 

386 

30,6614 

5 

0116 

1 


TS 

MPAC ♦ 1 

0243 

REF 

335 

LAST 

386 

30,6615 

5 

0117 

0 


TS 

MPAC + 2 

02AA 

REF 

122 

LAST 

382 

30,6616 

3 

5501 

0 


caf 

ZERO 

02AS 

REF 

16 

LAST 

379 

30,6617 

5 

0066 

1 


TS 

NEWEOIND 

02A6 

REF 

11 

LAST 

383 

30,6620 

0 

5237 

1 


TC 

DPEXIT 

02A7 

ref 

19 

LAST 

265 

30,6621 

3 

44 7 6 

0 

SETPOS 

CAF 

POSMAX 

0248 





30,6622 

0 

66 1 3 

0 


TC 

-7 


f' o' 



V t 


i ’ 


iTriPi 


^Ki‘f578A YUL SYSTEM FOR AGCA ; 


PtVlSlJN 0 OF PROGRAM SOLRUM55 by 


L RTB OP CODES 


02A9 

ref 

49 

LAST 

301 

30 » 6 62 3 

3 

5503 

1 

V1ST02S 

CAP 

U2SC 

REF 

23 

LAST 

ei 

30 *6624 

5 

0071 

1 


TS 

02S1 





30*6625 

6 

OoOO 

1 


dojble 

02S2 

REF 

28 

LAST 

381 

30 * 6 6 2 6 

6 

0070 

0 


AD 

0253 

REF 

24 

LAST 

387 

30,6627 

5 

0072 

1 


T5 

025A 

REF 

25 

LA S T 

387 

30*6630 

2 

0072 

0 


imdex 

0255 

REF 

208 

LAST 

385 

30,6631 

4 

0001 

1 


C5 

0256 





30 * 6632 

4 

0000 

0 


COM 

0257 





30*6633 

6 

0000 

1 


OOJBLE 

0258 

REF 

57 

LAST 

378 

30,663*t 

5 

0034 

0 


TS 

0259 

REF 

123 

LAST 

386 

30*6635 

3 

5501 

0 



0260 

REF 

2 6 

LAST 

387 

30 ,6636 

2 

0072 

0 


IMDEX 

0261 

REF 

309 

LAST 

381 

30,6637 

6 

0000 

1 


AD 

0262 

REF 

27 

LAST 

38 7 

30 * 6 6**0 

2 

0072 

0 


HDEX 

0263 

REF 

310 

LAST 

387 

30 * 6 6<* 1 

6 

0000 

1 


AD 

026A 

REF 

311 

LAST 

387 

30 * 6 642 

1 

0000 

0 


CCS 

0265 

REF 

124 

LAST 

378 

30 , 6643 

6 

4516 

1 


AD 

0266 





30 * 6644 

0 

664 6 

0 


TC 

0267 





30*6645 

4 

0000 

0 


co^ 

0268 

REF 

28 

LAST 

387 

30 * 6646 

2 

0071 

0 

ZYXW 

INDEX 

0269 

REF 

336 

LAST 

386 

30 * 6 64 7 

5 

0115 

1 


TS 

0270 

REF 

1 



30*6650 

0 

6656 

1 


TC 

0271 

REF 

312 

LAST 

387 

30,6651 

2 

0000 

D 


index 

02 72 

ref 

5 

LAST 

370 

30*6652 

3 

447 7 

1 


caf 

02 rz 

REF 

29 

LAST 

307 

30 * 6 6b 3 

2 

0071 

0 


I NDEX 

027A 

REF 

337 

LAST 

387 

30*6654 

6 

0115 

1 


AD 

0275 

REF 

1 



30 * 6655 

0 

6646 

0 


TC 

0276 

REF 

30 

LAST 

387 

30*6656 

1 

0071 

0 

ZYXWV 

CCS 

0277 

REF 

1 



30*6557 

0 

6624 

1 


TC 

0278 

REF 

17 

LAST 

386 

30*6660 

5 

0066 

1 


TS 

0279 

ref 

50 

LAST 

387 

30 * 666 1 

4 

5503 

0 


C5 

0280 

REF 

12 

LAST 

386 

30*6662 

0 

5240 

1 


TC 

0281 

REF 

51 

LAST 

387 

30 * 6663 

3 

5503 

1 

V2STOD15 

CAF 

0282 

ref 

31 

LAST 

38/ 

30 * 6664 

5 

0071 

1 


i S 

0283 





30,6665 

6 

0000 

1 


DDJBLE 

028A 

REF 

29 

LAST 

387 

30*6666 

6 

0070 

0 


AD 

0285 

REF 

32 

LAST 

38 7 

30*666 7 

5 

0072 

1 


T5 


0286 

REF 

33 

LAST 

387 

30 * 6 6 7o 

2 

007l 

0 

INDEX 

0287 

REF 

338 

LAST 

387 

30*6671 

4 

0115 

0 

CS 

0288 





30*6672 

2 

577? 

1 

EXTEND 

0289 

REF 

6 

LAST 

232 

30,6673 

4 

4520 

0 

MP 

0290 

REF 

34 

LAST 

387 

30*6674 

5 

0073 

0 

T S 

0291 

ref 

55 

LAST 

377 

30*6675 

1 

0003 

0 

CCS 

0292 

REF 

124 

LAST 

307 

30*66 7b 

3 

5501 

0 

CAF 

0293 





30,6677 

0 

6702 

i 

TC 

0294 





30*6700 

0 

6701 

1 

TC 


1021108-021 


DEC A* 1966 


{MAIN) PAGE 387 



USER'S Own page no, 14 

Two 

VbUF 

VACLOC 

VBUF +1 

VBUF *-1 

0 

This routine TA^ES gIMbAL angles scaled 
2PI IN the vac and leaves 25 COMPLIMENT 

Answers in mpac mpac +2 

BASE ADDRESS OF VECTOR ACCUMULATOR 

OVCTR 

ZERO 

VBUF +l 

A 

VBUF +1 

A 

SMPS ON OVERFLOW 

A 

ONE 

+ 2 

TtZT FOR NEGATIVE MAJOR PART 

VbUF 

KPAC 

ZYXwV 

A 

LIMITS 

VBUF 

MPAC 

ZVXw 

NORMAL PROCEDURE FOR ANGLE OVERFLOW 

VBUF 

V1ST02S ♦! 
NEWEQIND 

TWO 

DPEXIT +l 

TWO 

VBUF 

VACLOC 

VbUF +1 

THIS ROUTINE takes CDU ANGLES IN MPAC.. 
MPAC +2 and converts TO ANGLES SCALED 
2PI IN THE VAC LOCATIONS 

VBUF 

MPAC 

NEGl/2 

VBUF *2 

LP 

uncorrected upper parts 

TEST SIGN OF LOWER WORD 

ZERO 

*3 

+ 1 

POSITIVE CASE Ok 


<«a^‘j7BA YUL SYSTEM KQR AGCA: REVISIUN 0 Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


Dec At 1966 


(MAIN) PAGE 380 


0295 

0296 

0297 

0298 

0299 

0300 

0301 

0302 

0303 
030A 

0305 

0306 

0307 


RTB 

OP CODES 








USER’S OWN page NO* 15 

REF 

9 

LAST 

377 

30t6701 

A 

A522 

1 

C5 

HALF 

negative case 

REF 

56 

LAST 

387 

30*6702 

6 

0003 

1 

AD 

LP 

CORRECT lower WORD 

REF 

35 

LAST 

387 

30*6703 

2 

0072 

0 

index 

VBUF +1 


REF 

209 

LAST 

387 

30*67QA 

5 

0001 

0 

TS 

Q 

STORE LOWER WORD 

REF 

125 

LAST 

387 

30*6705 

3 

5501 

0 

CAF 

ZERO 

Deal with overflow standard way 

REF 

36 

LAST 

388 

30*6706 

6 

0073 

0 

AD 

VBUF *2 


REF 

37 

LAST 

388 

30*6707 

2 

0072 

0 

index 

VBUF +1 


REF 

313 

LAST 

387 

30*6 no 

5 

0000 

1 

T5 

A 

STORE UPPER WORu 

REF 

38 

LAST 

388 

30*6/11 

1 

0071 

0 

CCS 

VBUF 


REF 

1 



30*6712 

0 

666 a 

0 

TC 

V2ST0D15 +1 


REF 

126 

LAST 

388 

30*6713 

A 

5501 

1 

C5 

ZERO 


REF 

21 

LAST 

10a 

30*671*+ 

5 

0065 

1 

TS 

MODE 


REF 

38 

LAST 

380 

30*6715 

0 

A02A 

0 

TC 

DANZIG 



^e^57eA YUL SYSTEM FOR AGC*^; REVISION 0 OF PROGRAM SOLRUMS5 


L 

P03oe 

U309 

0310 


rtb op codes 

ROUTINE TO FREE DS<Y 

PEF 20 LAST 361 30t67ib 0 3362 0 

REF 18 LAST 379 30»6717 0 A703 1 


DSPFREE T 

T 




BY NASA 1021108-021 


DEC ^ » 1966 


(MAIN) page 389 


USER’S OWN page no# 


FkEEDSP 

RE-ENTER 


16 


YUt SYSTEM FOR AGC<^: REVISION o OF PROGRAM SOLRUM55 SY NASA 1021108-021 
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R0072 

INREL = 

VBJF ♦S 

INPUT BUFFER SELECTOR ( XtYtZ* REG 

) 

R0073 

MIXBR = 

TEMIO 

Indicator for mixed or normal noun 


R007A 

DSPMMTEM = 

TeMIO 

DSPCOJNT SAVE FOR OSPMM 


HQ0I5 

MONTEM = 

NEWEQIND 

TEMP RETURN FOR MONITOR 


R0076 

DSRtL = 

TEM2 

REL ADDRESS FOR D5PIN(TEM2 USED BY 

dadi 

R0077 

dsmag = 

tema 

MAGNITUDE STORE FOR DSPlN 


R0078 

idaddtem = 

tema 

MIXNOjN INDIRECT ADDRESS STORAGE 


R0079 

COUNT = 

TEMS 

FOR DSPIN (TEM5 15 USED BY DAD) 


R0060 

lstptr = 

ARETURN 

LIST pointer for grabjsy 


ROObl 

RELRET = 

areturn 

return for reldsp 


R00b2 

FREERET = 

ARETURN 

Return for freedsp 


R00b3 

CADRTEM - 

ESCAPE 

temp storage for grab Routines 


ROOBA 

R0085 

R0086 

nnadtem erase 

NNTYPTEM ERASE 
IDADlTEM erase 


temp for noun address table entry 
temp for noun type table entry 

temp for INDIR ADRES table ENTRYtMlXNN) 

ROOb? 

R00b8 

IDAD2TEM ERASE 


must = IDAD2TEM-lf = 1DAD3TEM-2. 

Temp for indir adres table entry (mixnn) 

R00B9 

R0090 

IDAD3TEM ERASE 


must = IDADlTEH+lf = IDAD3TEM-U 

TEMP FOR INDIR ADRES TABLE ENTRY(MlXNN) 

R0091 

RQ092 

MUST = IDAOlTEM+2* = 1DAD2TEM+1. 

temporary ERASABLeS for INIERRUPT ACTION 


R0093 

KEYTEMPi = 

wtexit 

TEMP FOR KEYRUPTf JPRUPT 


R009A 

DSRUPTEM = 

wtexit 

TEMP FOR D5P0UT 


R0095 

KEYTEMP2 = 

RUPTAGN 

TEMP FOR KEYRUPT* JPRJPT 



(MAIN} 

3 


^B'tbTaA YUL SYSTEM FOR AGc^: REYIblJN 0 OF PROGRAM SoLRUMSS BY NASA 1021108-021 


OEC A, 1966 (MAIN) PAGE A8A 


L PINBALL game BUTTONS AND LIGHTS 


USER'S OWN page no, a 


R0096 

THE INPUT CODES ASSUMED FOR THE KEYBOARD ARE 

ROOVT 

0 

tl lOOOO 

R0098 

1 

OOOOl 

R0099 

9 

01001 

ROlOO 

VERB 

lOOOl 

ROlOl 

ERROR 

RESlOOlO 

R0102 

KEY RLSE 11001 

R0103 

+ 

llOlO 

ROIQA 

• 

lloll 

R0105 

ENTER 

11100 

R0106 

CLEAR 

11110 

R0107 

NOUN 

mil 


I 


RoloB OUTPUT Format for display panel, set outo to aaaabcccccddddd. 

R0109 A-S select a RELAyWORD, THIS DETERMINES WHIcH pAIR OF CHARACTERS ARE 
ROUO ENERGIZED, 

ROlU B For special relays such as signs etc. 

R0112 C-S S BIT relay CODE FOR LEFT CHAR OF PAIR SELECTED BY RELAYWORD 

R0113 D-S 5 bit relay CODE FOR RIGHTCHAR OF PAIR SELECTED 3Y ReLAYWORD, 

ROllA THE PANEL APPEARS AS FOLLOrtS* 


R0U5 

R0U6 

MDl 

VDl 

MD2 

VD2 (VERB) 

NDl 

ND2 

(MAJOR MODE) 
(NOUN) 

R0117 

RlDl 

R1D2 

R1D3 

RIDA 

R1D5 

(Rl) 

ROUS 

R2D1 

R2D2 

R 2 D 3 

R2DA 

R2D5 

(R2) 

R0U9 

R3D1 

R3D2 

R3D3 

R3DA 

R305 

tR3) 


R0120 each OF these IS GIVEN A OSPCoUNT NUMBER FOR USE WITHIN COMPUTATION ONLY 


R0121 

MDl 

Zb 

R2D1 

11 

ALL ARE OCTAL 

R0122 

MD2 

2A 

R2D2 

10 


R0123 

VDl 

23 

R2D3 

7 


R012A 

VD2 

22 

R2DA 

6 


R0125 

NDl 

21 

R2D5 

5 


R0126 

ND2 

20 

R3DI 

A 


R0127 

RIDL 

16 

R3D2 

3 


R0128 

R1D2 

IS 

R3D3 

2 


R0129 

R1D3 

lA 

R30A 

1 


R0130 

RIDa 

13 

R3D5 

0 


R0131 

RIDS 

12 





R0132 

there 

IS an 11 

register TABLE 

(DSPTAB) FOR 

THE DISPLAY PANEL. 

R0133 

D5PTAB 

RELAYED 

BITU 

BITS 

10-6 

BITS 

5-1 

R013A 

ROUS 

R0136 

RELADD 

10 

9 

lOll 

1010 

FLASH 

MDl 

VDl 

(25) 

(23) 

MD2 

VD2 

(2A) 

(22) 


i. 

> • 



-T • • 

* 1 • 




^b^b70A YUL SYSTEM FOR AGC4: REVISION Q OF PROGRAM SOLRUM55 BY 


L 

pinball 

Game 

Buttons and 

LIGHTS 




R0137 

8 

1001 


NDl 

(21) 

ND2 

120) 

RU138 

7 

1000 

upact 



RlDl 

(16) 

R0139 

6 

0111 

♦ R1 

R1U2 

(15) 

R1D3 

(14) 

ROlAO 

5 

Olio 

-R1 

R104 

(13) 

R1D5 

(12) 

R0141 

4 

0101 

+ R2 

R2DI 

(11) 

R2D2 

( 10) 

R0142 

3 

0100 

-R2 

R2D3 

(7) 

R2D4 

(6) 

R0143 

2 

0011 


R2D5 

(5) 

R3D1 

(4) 

R0144 

1 

0010 

+ R3 

R3D2 

(3) 

R3D3 

(2) 

R0145 

0 

0001 

-R3 

R3U4 

(1) 

R3D5 

(0) 

R0146 


0000 

NO RELAYWORD 






R01A7 THE S BIT RELAY CODES ARE» 

R0148 BLANK 00000 

R01A9 0 10101 

R0150 I OOOIl 

R0151 2 11001 

R0152 3 11011 

R01S3 4 01111 

R01S4 5 11110 

R01S5 6 11100 

R01S6 7 lOOll 

R0157 8 lllOl 

R0158 9 mil 


NASA 1021108-021 


DEC 4, 1966 (MAIN) PAGE 405 


USER'S OWN PAGE NO, S 


^tlAb78A 


U159 

U 1 oO 
0161 
0162 

0163 

016A 

0165 
AO 1 66 


0167 

0168 

0169 

0170 

0171 
01 12 
0173 

017 ^ 
0175 
01 lb 

0177 

0178 

0179 

0180 
0181 
0182 
0183 
0l8A 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

0192 

0193 
Ol9'^^ 

0195 

0196 

0197 

0198 

0199 

0200 
0201 
0202 
0203 


YUL SYSTEM FOR AGC9: REVISION 0 OF PROGRAM 50LRUMb5 BY 


PINBALL game BUTTONS Ai^l) LIGHTS 

06»6000 SETLOC 


REF 

227 

LAST 

479 

06.6000 

3 

0001 

0 

FLASHON 

XCH 

REF 

1 



06.6001 

5 

0112 

0 


T5 

REF 

1 



06.6002 

0 

7453 

1 


TC 

REF 

228 

LAST 

486 

06 . 6003 

3 

0001 

0 

FLASHOFF 

XCH 

REF 

2 

LAST 

486 

06.6004 

5 

0112 

0 


TS 

REF 

I 



06.6005 

0 

7462 

0 


TC 


ReF 

1 



06.6006 

0 

3265 

0 char IN 

T ^ 

T 

REF 

20 

last 

403 

06.6007 

7 

4513 

0 

MASX 

REF 

1 



06.6010 

5 

0106 

0 

T5 

REF 

356 

LAST 

477 

06.6011 

3 

0115 

1 

XCH 

REF 

1 



06.6012 

5 

0063 

1 

T5 

REF 

362 

LAST 

479 

06.6013 

2 

0000 

0 

INDEX 





06 » 60 1h 

0 

6015 

0 

TC 

REF 

1 



06.6015 

0 

7440 

0 

TC 

REF 

1 



06.6016 

0 

6072 

1 

TC 

REF 

2 

LAST 

486 

06.6017 

0 

6072 

1 

TC 

REF 

3 

LAST 

486 

06*6020 

0 

6072 

1 

TC 

REF 

4 

LAST 

406 

06.6021 

0 

6072 

1 

TC 

REF 

5 

LAST 

466 

06.6022 

0 

6072 

1 

TC 

REF 

6 

LAST 

486 

06.6023 

0 

6072 

1 

TC 

REF 

7 

LAST 

486 

06.6024 

0 

6072 

1 

TC 

REF 

1 



06.6025 

0 

6063 

1 

TC 

REF 

2 

LAST 

486 

06.6026 

0 

6063 

1 

TC 

REF 

2 

LAST 

486 

06.6027 

0 

7440 

0 

TC 

REF 

3 

LAST 

486 

06.6030 

0 

7440 

0 

TC 

REF 

4 

LAST 

486 

06.6031 

0 

7440 

0 

TC 

REF 

5 

LAST 

486 

06.6032 

0 

7440 

0 

TC 

REF 

6 

LAST 

486 

06.6033 

0 

7440 

0 

TC 

REF 

7 

LAST 

486 

06 .6034 

0 

7440 

0 

TC 

REF 

6 

LAST 

486 

06.6035 

0 

6070 

0 

TC 

REF 

1 



06.6036 

0 

6252 

1 

TC 

REF 

1 



06.6037 

0 

6402 

1 

TC 

REF 

1 



06 . 6040 

0 

6057 

0 

TC 

REF 

B 

LAST 

486 

06.6041 

0 

7440 

0 

TC 

REF 

9 

LAST 

486 

06.6042 

0 

7440 

0 

TC 

REF 

10 

LAST 

486 

06 * 6043 

0 

7440 

0 

TC 

REF 

11 

LAST 

486 

06 . 6044 

0 

7440 

0 

TC 

REF 

12 

LAST 

486 

06.6045 

0 

7440 

0 

T w 

REF 

1 



06.6046 

0 

7475 

0 

TC 

REF 

1 



06.6047 

0 

6316 

0 

TC 

REF 

1 



06*6050 

0 

6302 

0 

TC 

REF 

1 



06.6051 

0 

6055 

1 

TC 

REF 

13 

LAST 

486 

06*6052 

0 

7440 

0 

T C 


1021108-021 


DEC A, 1966 


(MAIN) PAGE 486 


USER'S OWN page NO. 6 


14000 

U 

DSEXIT 

FLA5H0N1 

0 

DSEXIT 

FLASHOFl 

End of standard LEAD INS. 


DSPLOCKl 

BIT4 

21/22REG 

MPAC 

CHAR 

A 

+ 1 

CHARALRM 

NUM 

NUM 

NUM 

NUM 

NUM 

NUM 

NUM 

e9TEST 

b9TEST 

CHARALRM 

CHARALRM 

CHARALRM 

CHARALRM 

CHARALRM 

CHARALRM 

NUM -2 

VERB 

ERROR 

AbORTCAL 

CHARALRM 

CHARALRM 

CHARALRM 

CHARALRM 

CHARALRM 

V6RELDSP 

POSGN 

NEGSGN 

LNTERJMP 

CHARALRM 


BLqCK display SYST but save OLD 
CIDSPLOCK) for ERROR LIGHT RESET. 


Input code 
0 
1 
2 

3 

4 

5 

6 
7 

10 

11 

12 

13 

14 

15 

16 
17 
20 
21 
22 

23 

24 

25 

26 
27 

30 

31 

32 

33 

34 

35 


FUNCTION 


B 

9 


0 

VERB 

ERROR LIGHT RESET 
ABORT 


KEY RELEASE 

+ 

ENTER 


YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM SOLRUM55 BY fiASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE A87 


L 

PINBALL GAME 

buttons and lights 




U5ER‘5 

OWN PAGE NO, 7 

020A 

REF 1 

06*6053 0 6501 

0 

1 c 

clear 

36 

CLEAR 

0205 

RFF 1 

06*605A 0 6<'7A 

0 

TC 

NOUN 

3/ 

NOUN 


0206 

REF 

lA 

last 

295 

06 » 6Db S 

0 5720 

1 

ENTERJMP 

TC 

POSTJUMP 

0207 

REF 

1 



06f 6056 

16007 

1 


cadr 

enter 

0208 

REF 

1 



0 6 ♦ 6 0 5 / 

3 6062 

0 

abortcal 

caf 

OCT32 

0209 

REF 

15 

last 

Ab7 

06^6360 

0 5720 

1 


TC 

POST JUMP 

0210 

REF 

1 



06^6061 

16136 

1 


cadr 

JAMEXTVB 

02101 





0616062 

00032 

0 

OCT32 

DCT 

32 


0211 

REF 

lA 

LAST 

A38 

06 t 6 0 6 3 

3 

AA7 3 

0 89TE5T 

caf 

THREE 

0212 

REF 

1 



06^606^ 

7 

0615 

1 

MASK 

DECBRNCH 

0213 

REF 

363 

last 

A86 

06f 6065 

1 

0000 

0 

CCS 

A 

021A 

REF 

9 

LAST 

A86 

06 f 6 066 

0 

6072 

1 

TC 

NUM 

0215 

REF 

lA 

LAST 

A86 

06f 6067 

0 

7AA0 

0 

TC 

charalrm 


Force decoding of verb 72 and do reldsp. 


IF DECBHNCH IS + , 8 OR 9 OK 
IF DECBRNCH IS +0t REJECT 8 OR 9 


R0216 

NUM 

ASSEMBLES OCTAL 

3 BITS AT 

A 

Time. 

FOR DECIMAL 

IT converts INCOMING 

R0217 

WORD 

AS 

A FRACTION, 

KEEPING RESUL15 TD DP. 



R0218 

OCTAL RESULTS ARE LeFT IN XREG 

♦ 

yreg, 

OR ZREG, HI 

PART 

OF DEC IN XR£G, 

R0219 

YREG 

* ZREG, 

THE Low 

PARTS IN XREGLP, 

YREGLP* OR ZREGLP) 


R0220 

DECBRNCH 

IS 

LEFT AT 

+0 FOR DCT 

1 

+1 FOR + DEC* +2 

FDR - 

DEC. 

R0221 

IF DSPCOUNT 

WAS LEFT 

NO MORE 

DATA 

IS ACCEPTED* 



0222 

REF 

165 

LAST 

A78 

06,6070 

3 

5501 

0 

CAF 

ZERO 

0223 

REF 

2 

LAST 

A86 

06*6071 

5 

0063 

1 

T5 

CHAR 

022A 

REF 

2 

LAST 

1A9 

06*6072 

I 

0614 

0 NUM 

r* Ji^ r 
w w □ 

DSPCOUNT 

0225 





06,6073 

0 

6077 

I 

TC 

+ 4 

0226 





06,6074 

0 

6077 

1 

TC 

+ 3 

0227 





06,6075 

0 

6076 

0 

TC 

+ 1 

0228 

REF 

53 

LAST 

A75 

0 6 , 6 0 ? 6 

0 

2124 

1 

TC 

ENDOFJOB 

0229 

REF 

1 



06,607/ 

0 

6222 

0 

TC 

GETINREL 

0230 

REF 

2 

LAST 

IA8 

06,6100 

1 

0633 

0 

CCS 

CLPASS 

0231 

REF 

166 

LAST 

A87 

06,6101 

3 

5501 

0 

CAP 

ZERO 

0232 

REF 

3 

LAST 

A87 

06,6102 

5 

0633 

I 

TS 

CLPASS 

0233 





06,6103 

0 

6104 

1 

TC 

♦ 1 

023A 

REF 

3 

LAST 

A87 

06,6104 

2 

0063 

0 

I NDEX 

char 

0235 

REF 

2 

LAST 

173 

06,6105 

3 

2652 

1 

caf 

reltab 

0236 

REF 

8 

LAST 

478 

06,6106 

7 

3220 

0 

mask 

LOWS 

0237 

REF 

1 



06,610 / 

5 

0111 

0 

7S 

CODE 

0238 

REF 

3 

LAST 

A87 

06,6110 

3 

06 1 4 

1 

XCH 

DSPCOUNT 

0239 

REF 

1 



06,6111 

5 

0104 

1 

TS 

COUNT 

02A0 

REF 

A 

LAST 

437 

06*6112 

5 

Obl^ 

1 

TS 

DSPCOUNT 


+ 

+ 0 

-BLOCK data in IF DSPCOUNT IS - 

-0 

IF CLPASS IS + OR *01 MAKE IT +0. 


^0^57aA YUL SYSTEM FOR AGC'r: REVISION 0 OF PROGRAM SOLRUMS5 BY 


L PINBALL GAME BUTTONS AND LIGHTS 


U2h1 

REF 

1 



06,6113 

0 

7341 

0 


TC 

02^2 

REF 

15 

LAST 

48 7 

06,611*, 

3 

4*^ /3 

0 


CAF 

0243 

REF 

2 

LAST 

487 

06,6115 

7 

0615 

1 


MASK 

0244 

REF 

364 

LAST 

487 

06,6116 

1 

0000 

0 


CCS 

0245 

REF 

1 



06,611 / 

0 

6130 

0 


TC 

0 2h6 

REF 

1 



06,6120 

2 

0076 

1 


INDEX 

0247 

REF 

3 

LAST 

211 

06,6121 

3 

0602 

0 


XCH 

0248 

REF 

13 

LAST 

274 

06,6122 

5 

0022 

1 


T5 

0249 

REF 

14 

LAST 

488 

06,6123 

4 

0022 

0 


C5 

0250 

REF 

15 

LAST 

488 

06,6124 

4 

0022 

0 


C5 

0251 

REF 

16 

LAST 

488 

06,6125 

3 

0022 

1 


XCH 

0252 

REF 

4 

LAST 

487 

06,6126 

6 

0063 

1 


AD 

0253 

REF 

1 



06,6127 

0 

6146 

1 


TC 

025A 

REF 

2 

LAST 

488 

06,6130 

2 

00 76 

1 

DECTOBIN 

INDEX 

0255 

REF 

4 

LAST 

*♦88 

06,6131 

3 

0602 

0 


XCH 

0256 

REF 

357 

LAST 

486 

06,6132 

5 

0115 

1 


T5 

0257 

REF 

167 

LAST 

487 

06,6133 

3 

5501 

0 


CAF 

0258 

REF 

358 

LAST 

488 

06,6134 

5 

0116 

1 


T5 

0259 

REF 

8 

LAST 

456 

06,6135 

3 

3232 

1 


CAF 

0260 

REF 

4 

LAST 

380 

06,6136 

0 

5416 

1 


TC 

0261 

REF 

359 

LAST 

488 

06,6137 

3 

0116 

1 


X CH 

0262 

REF 

5 

LAST 

488 

06 ,6140 

6 

0063 

1 


AD 

0263 

REF 

360 

Last 

488 

06 ,6141 

5 

0116 

1 


TS 

0264 

REF 

2 

LAST 

488 

06,6142 

0 

6146 

1 


TC 

0265 

REF 

361 

LAST 

488 

06 ,6143 

6 

0115 

1 


AD 

0266 

REF 

362 

LAST 

488 

06,5144 

5 

0115 

1 


T3 

0267 

REF 

1 



06,6145 

0 

6165 

0 


1 C 

0268 

REF 

3 

LAST 

488 

06,61 46 

2 

0076 

1 

ENDNMTST 

INDEX 

0269 

REF 

5 

LAST 

488 

06,6147 

5 

0602 

0 


TS 

0270 

REF 

5 

LAST 

48 7 

06,6150 

4 

0614 

0 


CS 

0271 

REF 

4 

LAST 

488 

06,6151 

2 

0076 

1 


index 

0272 

REF 

1 



06,6152 

6 

6211 

0 


AD 

0273 

REF 

365 

LAST 

486 

06,6153 

1 

0000 

0 


r- /“ c 
w ^ 3 

027A 

ref 

15 

LAST 

487 

06 ,615^t 

0 

7440 

0 


TC 

02 75 

REF 

16 

LAST 

483 

06,6155 

0 

7440 

0 


TC 

0276 

REF 

1 



06,6156 

0 

6206 

0 


TC 

0277 

REF 

16 

LAST 

488 

06,6157 

3 

4473 

0 

ENDNUM 

CAF 

02/8 

REF 

3 

LAST 

488 

06,6160 

7 

0615 

1 


MASK 

0279 

REF 

366 

LAST 

488 

0 6 , 6 1 6 1 

1 

0000 

0 


CCS 

0280 

REF 

2 

LAST 

488 

06,6162 

0 

6165 

0 


TC 

0281 

REF 

6 

LAST 

488 

06 ,6163 

4 

06 1 4 

0 

ENDALL 

C5 

028 2 

REF 

2 

LAST 

488 

06,5164 

0 

6207 

1 


T C 

0283 

REF 

17 

LAST 

488 

06,6165 

3 

4473 

0 

DECEND 

CAP 

028A 

REF 

4 

LAST 

488 

0 6 , 6 1 6 6 

7 

0615 

1 


MASK 

0285 

REF 

367 

LAST 

488 

06,6167 

2 

0000 

0 


index 

0286 





06,6170 

0 

6170 

1 


TC 

0287 

REF 

1 



06,6171 

0 

6175 

1 


TC 

0288 

REF 

3 

LAST 

84 

06,6172 

0 

515 7 

1 


T C 

0289 

REF 

I 



06,6173 


56217 

0 


XCADR 

0290 

REF 

1 



06,6174 

0 

6177 

0 


T C 


NASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 


USER'S Ot^N page NO. 8 


DSP I N 
THREE 

DECbRNCH 

A 

DECTOBIN 

INREL 

VERBREG 

CYL 

CYL 

CYL 

CYL 

CHAR 

ENDNMTST 

INREL 

VERBREG 

MPAC 

ZERO 

MPAC +1 

TEN 

SHORTMP 
MPAC +1 

Char 

MPAC +1 

ENDNMTST 

MPAC 

MPAC 

OECEND 

INREL 

VERBREG 

DSPCOUNT 

INREL 

CRITCON 

A 

CHARALRM 

CHARALRM 

MORNUM 

THREE 

DECBRNCH 

A 

DECEND 

DSPCOUNT 

MORNUM +1 

THREE 

DECBRNCH 

A 

♦ 0 

♦UECSGN 

DMP 

NEGDECON 

ENDECOM 


♦U* OCTAL. +l» ♦ DEC, +2. - DEC 
♦ 

♦0 OCTAL 


Sum X 2EXP-1A IN MPAC 


lU X 2EXP-1A 

1U5UM X 2EXP-28 IN MPAC, MPAC+1 


NO OF 

OF MUST BE 5TH CHAR 


♦ PATHOLOGICAL CASE 
+0 IMPOSSIBLE 


BLOCK NUMIN BY PLACING DSPCOUNT 
NEGATIVELY 


+ DEC 
- DEC 

mult SUM X 2EXP-28 IN MPAC, MPAC+1 BY 


b *♦ 3 f 

L 

0291 

0292 

0293 

029 ^ 

0295 
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LAST 

498 

07*6076 

0 

6110 

1 


TC 

0672 

ref 

1 



07*6077 

0 

6304 

0 


TC 

0673 

REF 

13 

LAST 

497 

07*6100 

1 

0615 

1 


W V 3 

067A 

ref 

A 

LAST 

498 

07*6101 

0 

6356 

1 


TC 

0675 

REF 

1 



07*6102 

3 

0606 

1 


XCH 

0676 

REF 

3 

LAST 

498 

07*6103 

5 

0624 

1 


TS 

067 7 

REF 

2 

LAST 

498 

07*6104 

3 

610 7 

1 


CAP 

06 78 

REF 

5 

LAST 

498 

07*6105 

0 

5662 

0 


TC 

0679 

REF 

A 

LAST 

498 

07*6106 

0 

6130 

0 


TC 

0680 

REF 

1 



07*6107 


13153 

1 

LODNNLOC 

CADR 

0681 

REF 

22 

LAST 

492 

07*6110 

4 

4513 

0 

intmatbs 

CS 

0682 

REF 

12 

LAS T 

497 

07*6111 

7 

0602 

1 


MAS< 

0683 

REF 

1 



07*6112 

6 

6115 

1 


AD 

068A 

ref 

380 

LAST 

498 

07*6113 

1 

0000 

0 


CCS 

0685 

REF 

1 



07*6114 

0 

6120 

1 


TC 

0686 





07*6115 


77772 

0 

NEG5 

OCT 

0687 

REF 

2 

LAST 

498 

07*61 16 

0 

6120 

1 


TC 

0688 

REF 

5 

LAST 

498 

07*6117 

0 

6130 

0 


TC 

0689 

REF 

3 

LAST 

498 

07*6120 

3 

3173 

1 

dspadd 

CAP 

0690 

REF 

21 

LAST 

498 

07*6121 

5 

0614 

1 


TS 

0691 

REF 

A 

LAST 

498 

07*6122 

4 

0624 

0 


CS 

0692 

REF 

361 

LAST 

498 

07 * 6 1 2 3 

4 

0000 

0 


cs 

0693 

REF 

2 

LAST 

498 

07*6124 

0 

7225 

0 


TC 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE A98 



U5ER*S OWN PAGE NO. 18 

verbfan 

LODNNLOC 

SWCALL 

MIXBR 

+ 0 

VtRB=32 

SrtITCH BANKS TO NOUN TABLE READING 
ROUTINE. 

+ 2 

MIXNOUN 
NNADTEM 
VERSFAN -2 
GODSPALM 
REQADD 

R3D1 

DSPCOUNT 

NOUNADD 

ONE 

NOUNADD 

NORMAL 

MIXED 

Normal 

NORMAL IF + 

NUT IN USE IF +0 

specify machine address if - 
augment machine address if -0 

DSPOCTWD 

VERBFAN 

BIT15 

CLPASS 

END INST 

SET CLPASS FOR PASSo ONLY 

entextt 

A 

intmatbs 

CC5H0LE 

TEST IF Reached here from internal or 

FROM external 

intmatbs 

reqoatz 

external MACH ADDR TO BE SPECIFIED 

DECBRNCH 

GOOSPALM 

2REG 

ALARM IF DECIMAL USED FOR MATBS 

OCTAL USED OK 

NOUNADD 

LODNNLOC 

SWCALL 

VERBFAN 

LODNNTAB 

Switch banks to noun table reading 

ROUTINE. 

BIT4 

VERBREG 

MAKES VB 15 LOOK LIKE VB 05. 

NEG5 

A 

DSPADD 

VB NOT = 05 OR 15* DISPLAY ADDRESS. 

77772 

DSPADD 

VERBFAN 

R3D1 

DSPCOUNT 

NOUNADD 

A 

DSPOCTWD 

VB NOT = 05 OR 15* DISPLAY ADDRESS. 

Vb = 05 OR 15* DO NOT DISPLAY ADDRESS 


4B^i378A YUL SYSTEM FOR AGCA; REVISION 0 Of- PROGRAM SOLRUM55 BY 



pinball 

Game 

Buttons 

AND lights 




069A 

REF 

6 

LAST 

498 

07,6125 

0 6130 

0 


TC 

0695 

REF 

156 

LAST 

498 

07 ,6126 

6 4516 

1 


AD 

0696 

REF 

5 

LAST 

498 

07,6127 

5 0624 

1 


TS 

0697 

REF 

1 



07,6130 

4 6143 

0 

VERBFAN 

C5 

0698 

REF 

13 

LAST 

498 

07,6131 

6 0602 

0 


AD 

0699 

REF 

382 

LAST 

498 

07,6132 

1 0000 

0 


CCS 

0700 

REF 

157 

LAST 

499 

07,6133 

6 4516 

1 


AD 

0701 





07 ,6134 

0 6136 

0 


TC 

0702 

REF 

1 



07,6135 

0 6145 

1 


TC 

0703 

REF 

365 

LAST 

489 

07,6136 

5 0115 

1 

jamextvb 

TS 

070A 

REF 

1 



07,6137 

0 3323 

0 


TC 

0705 

REF 

366 

LAST 

499 

07,6140 

3 0115 

1 


xch 

0706 

REF 

1 



07 ,6141 

6 6144 

0 


AD 

0707 

REF 

13 

LAST 

455 

07,61^,2 

0 5723 

1 


TC 

0706 





07,6143 

00040 

0 

L5T2C0N 

OCT 

0709 

REF 

1 



07,6144 

12000 

1 

LST2CADR 

CADR 

0710 

ref 

14 

Last 

499 

07,6145 

2 0602 

1 

VBFANDIR 

INDEX 

0711 

REF 

1 



07 ,6146 

3 6150 

0 


CAF 

0712 

REF 

14 

LAST 

499 

07,6U7 

0 5723 

1 


TC 

0713 

ref 

5 

LAST 

498 

07,6150 

16356 

0 

VERBTAB 

CADR 

0714 

REF 

1 



07,6151 

16372 

0 


cadr 

0715 

REF 

1 



07,6152 

16377 

0 


CADR 

0716 

REF 

1 



07,6153 

16*t04 

0 


CADR 

0717 

REF 

1 



07 ,6154 

16365 

0 


CADR 

0718 

REF 

1 



07,6155 

16360 

0 


CADR 

0719 

REF 

1 



07,6156 

16476 

0 


CADR 

0720 

REF 

1 



07,6157 

15030 

0 


CADR 

0721 

ref 

1 



07 , 6 1 bU 

17342 

1 


cadr 

0722 

REF 

1 



07,6161 

17102 

1 


cadr 

0723 

REF 

2 

LAST 

499 

07,6162 

17102 

1 


cadr 

0724 

REF 

3 

LAST 

499 

07 ,6163 

17102 

1 


cadr 

0725 

REF 

4 

LAST 

499 

07,6 164 

17102 

1 


cadr 

0726 

REF 

5 

LAST 

499 

07,6165 

17102 

1 


cadr 

0727 

REF 

6 

LAST 

499 

07 , 6 1 66 

17102 

I 


cadr 

0728 

REF 

7 

LAST 

499 

07,616 T 

17102 

1 


cadr 

0729 

REF 

1 



07,6170 

17321 

1 

REQEXLOC 

cadr 

0730 

REF 

1 



07,6171 

16645 

1 


cadr 

0731 

REF 

1 



07,6172 

16655 

0 


cadr 

0732 

REF 

1 



07,6173 

16671 

0 


cadr 

0733 

REF 

1 



07,6174 

16620 

1 


cadr 

0734 

REF 

1 



07,6175 

16564 

1 


cadr 

0735 

REF 

6 

LAST 

499 

07,6176 

16356 

0 


cadr 

0736 

REF 

7 

LAST 

499 

07,6177 

16356 

0 


CADR 

0737 

REF 

8 

LAST 

499 

07,6200 

16356 

0 


CADR 

0738 

REF 

1 



07,6201 

17216 

1 


CADR 

0739 

REF 

1 



07,6202 

15503 

0 


cadr 

0740 

REF 

1 



07,6203 

1546 5 

1 


CADR 


NASA 1021108-021 


DEC A* 1966 


(MAIN) PAGE ^99 


VERBFAN 

ONE 

NDUNADD 

L5T2C0N 

VERBREG 

A 

ONE 
+ 2 

VBFANDIR 

MPAC 

KELOSP 

MPAC 

LST2CADR 

BAN<JUMP 

AO 

LST2FAN 

VERBREG 

VERBTAB 

BAN<JUMP 

GODSPALM 

DSPA 

DSPB 

DSPC 

D5PAB 

DSPABC 

DECDSP 

DSPDPDEC 

VBROWAIT 

MONITOR 

MONITOR 

MONITOR 

MONITOR 

MONITOR 

MONITOR 

MONITOR 

VBRQEXEC 

aloao 

BLOAO 

CLOAD 

ABLOAO 

ABCLOAD 

GODSPALM 

G0D5PALM 

GODSPALM 

DSPBANK 

BUMP 

VBPROC 


USER’S OWN PAGE NO, 19 


VtRB-LST2C0N 


VERB G/ LST2C0N 


VtRB L/ LST2C0N 

special entry For forcing extended verb. 

RELEASE DISPLAY SYST 

also turn off Release display syst light 


first lstz verb 

THE LIST2 FAN IS LOCATED IN BANK 05 


VbOO 

VbOl 

Vb02 

Vb03 

VbOA 

Vb05 

Vb06 

Vb07 

VblO 

Vbll 

VblZ 

Vbl3 

VdlA 

Vd15 

Vbl6 

Vdl7 

Vl>20 

Vb21 

Vb22 

Vb23 

Vd24 

Vb25 

Vb26 

Vb27 

Vb30 

VB31 

Vb32 

Vb33 


ILLEGAL 


DISPLAY 

OCT 

COMP 

1 

(Rl) 

DISPLAY 

OCT 

COMP 

2 

(Rl) 

DISPLAY 

OCT 

COMP 

3 

(Rl) 

DISPLAY 

OCT 

COMP 

1 , 

2 (R1,R2) 

display 

OCT 

COMP 

1, 

2,3 (Rl,R2,R3> 

DECIMAL 

DISPLAY 



DP DECIMAL i 

DISPLAY 

(Rl ,R2) 

request 

WAITLIST 



MONITOR 

OCT 

COMP 

1 

(Rl) 

monitor 

OCT 

COMP 

2 

(Rl) 

MONITOR 

OCT 

COMP 

3 

(Rl) 

MONITOR 

OCT 

COMP 

1, 

2 (R1,R2) 

MONITOR 

OCT 

COMP 

1, 

2,3 {R1,R2,R3) 

MONITOR 

decimal 



MONITOR 

DP 

DEC 

(Rl 

,R2) 


REQUEST EXECUTIVE 
LOAD COMP 1 (Rl) 

LOAD COMP 2 (R2) 

load comp 3 (R3) 

LOAD COMP 1,2 (R1,R2) 

LOAD COMP 1,2,3 IR1,R2,R3) 
SPARE 

spare 

SPARE 

bank display 

C(R2) INTO R3, C(RU INTO R2 

proceed without data 


*»84578A YUL SYSTEM FOR AGC<*; REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 1966 


(MAIN) PAGE SOO 


L pinball Game buttons and lights user's own page no. 20 


0741 

REF 

1 

07*6204 

15472 

1 

CADR 

VBTERM 

Vb34 

terminate current TEST OR LOAD ReO 

0742 

REF 

2 LAST 486 

07*6205 

15475 

0 

CADR 

VfaRELDSP 

Vb35 

release display syst 

0743 

REF 

1 

07*6206 

10000 

0 

cadr 

5LAPB 

Vb36 

FRESH start 

074A 

REF 

1 

07*6207 

17273 

1 

ENDVBFAN CADR 

MMCHANG 

Vb37 

CHANGE MAJOR MODE 


R0745 the LIST2 VERBFAN IS LOCATED IN BANK 05. 


t> 7 1 

L 

K0746 

R07i*7 

RO KB 

H0749 

0 750 

0751 

0752 

0753 

075^ 

0755 

0756 

0757 

0756 

0759 

0760 

0761 

0762 

0763 

0764 

0765 

0766 

0767 

0768 

A0769 

A0770 

0771 

0772 

0773 

0774 

0775 

0776 

0777 

0778 

0779 

0780 

0781 

0782 

0783 

0784 

0785 

0766 

0787 

0788 

0789 


YUL SYSTEM FOR A6C4; REVISION 0 OF PROGRAM SOLRUM 55 BY NASA 1021108-021 


dec 4* 1966 


(MAIN) 


page 601 


PINBALL Game buttons and lights USER'S OWN page no. 21 

NNAOTAB Contains a relative auuress, idaddreLcin lo^^ to bitS). referring 
TO where 3 consecutive ADDRESSES ARE STORED (IN lOADDTAB), 

MIXNOUN CETS data and stores in MlXlEMPt+lf+2. IT SETS NDUNADD FOR 

mixtemp. 


REF 

2 

LAST 

498 

07*6210 

1 

0054 

1 

MIXNOUN 

CCS 

nnadtem 







07,6211 

0 

6215 

I 


TC 

+ 4 

♦ IN USE 


REF 

9 

LAST 

499 

07,6212 

0 

63 56 

1 


TC 

GODSPALM 

+0 NOT In use 






07,6213 

0 

6215 

1 


TC 

+ 2 

- IN USE 






07,6214 

0 

6215 

1 


TC 

+ l 

-0 IN USE 


REF 

17 

LAST 

428 

07,6215 

4 

4475 

1 


cs 

SIX 



REF 

15 

LAST 

499 

07,6216 

6 

0602 

0 


AD 

VLRBREG 



REF 

3B3 

LAST 

499 

07,6217 

1 

0000 

0 


CCS 

A 

Avoid mixnoun swap for other 

THAN 

REF 

7 

LAST 

499 

07,6220 

0 

6130 

a 


TC 

VLR6FAN 

DISPLAY VERBS 


REF 

29 

LAST 

498 

07,6221 

0 

3062 

0 


TC 

CCSHOLE 







07,6222 

0 

6223 

1 


TC 

+ 1 



REF 

68 

LAST 

495 

07,6223 

3 

5503 

1 


caf 

Two 



REF 

1 



07,6224 

5 

0064 

0 

MIXNNI 

TS 

NOUNTEM 



REF 

1 



07,6225 

6 

6254 

1 


AD 

MIXAD 



REF 

6 

LAST 

499 

07,6226 

5 

0624 

1 


T5 

nounadd 

SET NOUNADD TO MIXTEMP + K 


REF 

2 

LAST 

501 

07,6227 

2 

0064 

1 


1 SDEX 

NOUNTEM 



REF 

1 



07,6230 

4 

0U56 

0 


CS 

IDADlTEM 

GET IDADDTAB ENTRY FOR COMPONENT K 

REF 

384 

LAST 

501 

07,6231 

4 

0000 

0 


CS 

A 

OF NOUN. 


REF 

1 



07,6232 

5 

0063 

1 


TS 

DECOUNT 

TEST FOR DP (FOR OCT DISPLAY). 

IF SO, GET 












MINOR FART ONLY. 


REF 

6 

LAST 

249 

07,6233 

7 

2261 

i 


v1A5< 

HI 5 



REF 

3 

LAST 

278 

07,6234 

U 

3203 

0 


TC 

LEFTS 

SF ROUT number IN A 


REF 

1 



07,6235 

0 

6255 

0 


TC 

DRIEST 



REF 

1 



07,6236 

0 

6242 

0 


TC 

MIXNN2 

No DP 


REF 

158 

LAST 

499 

07,623 / 

3 

4516 

1 


caf 

ONE 

DP GET MINOR PART 


REF 

2 

LAST 

501 

07,6240 

6 

0063 

1 


AD 

DLCOUNT 



REF 

3 

LAST 

501 

07*6241 

5 

0063 

1 


TS 

DECOUNT 



REF 

4 

LAST 

501 

07,6242 

3 

0063 

1 

MIXNN2 

xc^ 

DECOUNT 


FOR DP 

REF 

15 

LAST 

292 

07,6243 

7 

4606 

i 


MAbiC 

LOWIO 

EbUBK (NO DP) OR (E5UBK)+1 

REF 

385 

LAST 

501 

07,6244 

2 

0000 

0 


INDEX 

A 

PICK UP c(E5uaK) Not dp 


07,6245 

4 

0000 

0 


CS 

0 

OK C((ESUBK)+1) for DP MINOR 

PART 

REF 

386 

LAST 

501 

07,6246 

4 

0000 

0 


C5 

A 



REF 

7 

LAST 

501 

07,624/ 

2 

0624 

0 


INDEX 

NOUNADD 

STOKE IN MIXTEM + K 





07,6250 

3 

0000 

1 


XCH 

0 


REF 

3 

LAST 

501 

07,6251 

1 

0064 

1 


CCS 

NOUNTEM 



REF 

1 



07,6252 

0 

6224 

0 


TC 

MIXNNI 



REF 

8 

LAST 

501 

07,6253 

0 

6130 

0 


TC 

VERBFAN 



ref 

3 

LAST 

494 

07,62 54 

0 

0073 

0 

MIXAD 

TC 

MIXTEMP 




REF 

1 

07,6255 

5 

Olio 1 DRIEST 

TS 

SF TEMPI 

enter with 

SF RoUT number in A. 

REF 

242 LAST 497 

07,6256 

3 

0001 0 

XCH 

Q 

RETURNS TO 

L+1 IF No DP 


f 

L 

0791 

07 92 

0793 

079<t 

0795 

0796 

0797 

0796 

0799 

0800 

0801 

0802 

0803 

080^f 

0805 

0806 

0807 

0808 

0809 

0810 

0811 

0812 

0813 

0819 

0815 

0816 

0817 

0818 

0819 

0820 

0821 

0822 

0823 

0824 

0825 

0826 

0827 

0828 

0829 

R0fl30 

R0831 

0832 

0833 


YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM 50LRUM55 BY NASA 1021108-021 


dec 4, 1966 


(MAINJ PAGE 502 


pinball Game buttons and lights 


USER»S OWN PAGE NO. 22 


REF 

2 

LAST 

501 

07*6257 

3 

Olio 

1 


XCH 

SFTLMPl 

RETURNS TO L+2 IF DP 

REF 

387 

LAST 

501 

07*6260 

2 

0000 

0 


INDEX 

A 






07*6261 

0 

6262 

1 


TC 

+ 1 


REF 

3 

LAST 

502 

07*6262 

0 

0110 

1 


TC 

SF TEMPI 

OCTAL ONLY NO DP 

REF 

4 

LAST 

502 

07*6263 

0 

0110 

1 


TC 

SF TEMPI 

FrACT NO OP 

REF 

5 

LAST 

502 

07.6264 

0 

Olio 

1 


TC 

SFTEMPl 

DEG NO DP 

REF 

6 

LAST 

502 

07*6265 

0 

0110 

1 


TC 

SFTEMPl 

AKITH NO DP 

REF- 

1 



07 * 6266 

0 

6272 

0 


TC 

DPTESTl 

DPI OUT 

REF 

2 

LAST 

502 

07*6267 

0 

6272 

0 


TC 

DPTESTl 

0^*2001 

REF 

7 

LAST 

502 

07*6270 

0 

01 10 

1 


TC 

SFTEMPl 

OPDEG NO DP 

REF 

3 

LAST 

502 

07*6271 

0 

62 72 

0 


TC 

DPTESTl 

DP30UT 

REF 

a 

LAST 

502 

07*6272 

2 

Olio 

0 

DPTESTl 

INDEX 

SFTEMPl 






07*6273 

0 

0001 

0 


TC 

1 

RETURN TO L+2 

REF 

243 

LAST 

501 

07*6274 

4 

0001 

1 

REQDATX 

cs 

0 


REF 

9 

LAST 

497 

07*6275 

5 

0613 

0 


TS 

REGRET 


REF 

3 

LAST 

495 

07*6276 

3 

3171 

0 


CAF 

RlDl 


REF 

1 



07*6277 

0 

6307 

0 


TC 

REOCOM 


REF 

244 

LAST 

502 

07*6300 

4 

0001 

1 

REQOATY 

CS 

Q 


REF 

10 

LAST 

502 

07.6301 

5 

0613 

0 


T5 

REORET 


REF 

2 

LAST 

491 

07*6302 

3 

3172 

0 


CAP 

R2D1 


REF 

2 

LAST 

502 

07*6303 

0 

6307 

0 


TC 

REOCOM 


REF 

245 

LAST 

502 

07 * 6309 

4 

0001 

1 

REQDAT2 

CS 

0 


REF 

11 

LAST 

502 

07.6305 

5 

0613 

0 


T5 

REQRET 


REF 

4 

LAST 

498 

07.6306 

3 

3173 

1 


CAF 

R3DI 


REF 

22 

LAST 

498 

07*6307 

5 

0614 

1 

REOCOM 

T5 

DSPCOUNT 


REF 

134 

LAST 

497 

07*6310 

0 

5654 

0 


TC 

BANKCALL 


REF 

2 

last 

494 

07*6311 


14554 

0 


CADR 

5BLANK 


REF 

135 

LAST 

502 

07.6312 

0 

5654 

0 


TC 

BANKCALL 


REF 

10 

LAST 

42b 

07*6313 


14000 

I 


CAOR 

flashon 


REF 

4 

LAST 

498 

07*6314 

4 

3147 

1 


CS 

ENDINST 


REF 

2 

LAST 

498 

07*6315 

6 

0065 

1 


AD 

ENTEXIT 


REF 

388 

LAST 

502 

07*6316 

1 

0000 

0 


CCS 

A 






07*6317 

0 

6323 

0 


TC 

+ 4 

ENTEXIT NOT ENDOFJOB, NVSUB INITIATED 

REF 

30 

LAST 

501 

07. 6320 

0 

3062 

0 


TC 

CCSHOLE 






07*6321 

0 

6323 

0 


TC 

♦ 2 

ENTEXIT NOT ENDOFJOb. NVSUB INITIATED 

ref 

3 

LAST 

502 

07*6322 

0 

0065 

1 


TC 

ENTEXIT 

ENTEXIT = ENDOFJOB. EXTERNALLY INITIATED 

ref 

178 

LAST 

497 

07*6323 

4 

5501 

1 


CS 

ZERO 

NvSUB INITIATED LOAD, SET CADRSTOR TO -0 

REF 

2 

LAST 

148 

07*6324 

5 

0627 

1 


TS 

cadrstor 


REF 

4 

LAST 

502 

07*6325 

0 

0065 

1 


TC 

ENTEXIT 



[F NVSUB initiated L0AD» SlT CAORSTO^ to -0 TO TELL ReCALTST TO RELEASE 
)ISPLAY if ENdIdLE was NOT USED* (NECESSARY FOR DATAwAIT) 


REF 

REF 


5 

246 


LAST 

LAST 


490 

502 


07*6326 
07*632 ? 


5 0603 I 
3 OoOi 0 


UPDATNN 


TS 

XCH 


NOUNREG 

Q 










I 


r\ 


m 


4 ^ 


»'ai 




r'. 



YUU SYSTEM EOR AGC<t ! REVISION 0 Of PROGRAM SOLRUMSS BY 


L 


PINBALL GAME BUTTONS ANO LIGHTS 


083A 

REF 

2 

LAST 

A97 

07 

0835 

REF 

3 

LAST 

A98 

07 

0836 

REF 

6 

LAST 

A98 

or 

0837 

REF 

3 

LAST 

501 

07 

0838 

REF 

159 

LAST 

501 

07 

0839 

REF 

1 



07 

08A0 

REF 

2 

LAST 

503 

07 

08Al 

REF 

3 

LAST 

503 

07 

08A2 

REF 

8 

LAST 
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1226 

REF 

183 

LAST 

512 

07 » 663h 

3 

5501 

0 


CAF 

1227 

REF 

4 

LAST 

512 

07»5635 

0 

7000 

0 


TC 

1226 

REF 

23 

LAST 

512 

07i6fa36 

2 

0624 

0 


1 vdex 

1229 





07^ 663 f 

5 

0000 

1 


TS 

1230 

REF 

167 

LAST 

512 

07 t 6 6 4 0 

3 

451b 

1 


C4F 

1231 

REF 

5 

LAST 

513 

07 » 6 641 

0 

7000 

0 


t: 

1232 

REF 

24 

LAST 

513 

07 » 6642 

2 

0624 

0 


INDEX 

12 33 





07t6643 

5 

0001 

0 


TS 

123A 

REF 

3 

LAST 

512 

07 % 6644 

0 

6705 

0 


TC 

123S 

REF 

3 

LAST 

512 

07 *6645 

0 

6274 

0 

ALOAD 

TC 

1236 

REF 

6 

LAST 

512 

07t6646 

3 

6107 

1 


CAF 

1237 

REF 

9 

LAST 

512 

07»6647 

0 

5662 

0 


TC 

1238 

REF 

164 

LAST 

513 

07«6650 

3 

5501 

0 


CAF 

1239 

REF 

6 

LAST 

513 

07^6651 

0 

7000 

0 


TC 

12A0 

REF 

25 

LAST 

513 

07 ♦6652 

2 

0624 

0 


INDEX 

12a1 





07»6653 

5 

0000 

1 


TS 

12A2 

REF 

4 

LAST 

513 

07^6654 

0 

6705 

0 


TC 

1243 

REF 

168 

LAST 

513 

07*6655 

4 

4516 

0 

BLOAD 

cs 

1244 

REF 

7 

LAST 

512 

07 * 6 656 

0 

6430 

0 


TC 

1245 

REF 

21 

LAST 

509 

07*6657 

3 

4500 

0 


CAF 

1246 

REF 

11 

LAST 

498 

07*6660 

5 

0633 

1 


T5 

1247 

REF 

3 

LAST 

512 

07 * 666 1 

0 

6300 

1 


TC 

1248 

REF 

7 

LAST 

513 

07*6662 

3 

610 7 

1 


CAF 

1249 

REF 

10 

LAST 

513 

07 * 6 663 

0 

5662 

0 


TC 

1250 

REF 

169 

LAST 

513 

07*6664 

3 

4516 

1 


CAF 

1251 

REF 

7 

LAST 

513 

07 *6665 

0 

7000 

0 


TC 

1252 

REF 

26 

LAST 

513 

07 ♦ 6666 

2 

0624 

0 


INDEX 

1253 





07*6667 

5 

0001 

0 


TS 

1254 

REF 

5 

LAST 

513 

07*6670 

0 

6705 

0 


TC 

1255 

REF 

75 

LAST 

512 

07*6671 

4 

5503 

0 

CLOAD 

CS 

1256 

REF 

8 

LAST 

513 

07*6672 

0 

6430 

0 


TC 

1257 

REF 

22 

LAST 

513 

07*6673 

3 

4500 

0 


CAF 

1258 

REF 

12 

LAST 

513 

07*6674 

5 

0633 

1 


TS 

1259 

ref 

3 

LAST 

512 

07*6675 

0 

6304 

0 


TC 

1260 

ref 

8 

LAST 

513 

07 * 6676 

3 

6107 

1 


CAP 

1261 

REF 

11 

LAST 

513 

07*6677 

0 

5662 

0 


TC 

1262 

REF 

76 

LAST 

513 

07*6700 

3 

5503 

1 


CAF 

1263 

REF 

8 

LAST 

513 

07*6701 

0 

7000 

0 


TC 

1264 

REF 

27 

LAST 

513 

07*6702 

2 

0624 

0 


INDEX 

1265 





07*6703 

5 

0002 

0 


TS 

1266 

REF 

6 

LAST 

513 

07*6704 

0 

6705 

0 


TC 

1267 

ref 

185 

LAST 

513 

07*6705 

3 

5501 

0 

LOADLV 

CAF 

1268 

REF 

14 

LAST 

498 

07*6706 

5 

0615 

0 


TS 

1269 

REF 

186 

LAST 

513 

07*6707 

4 

5501 

1 


CS 

1270 

REF 

1 



07*6710 

5 

0632 

0 


TS 

12 n 

REF 

4 

LAST 

503 

07*6711 

4 

322 7 

1 


CS 
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USER'S OWN PAGE NO. 33 

ZERO 

PUTCOM 

X COMP 

NOUNADD 

* 

0 

ONE 

PUTCOM 

NOUNADD 

1 

LOADLV 

Y COMP 

REQDATX 

LODNNLOC 

SWCALL 

ZERO 

PUTCOM 

NOUNADD 

0 

LOADLV 

Switch banks to noun table heading 

ROUTINE. 

X COMP 

ONE 

COMPTEST 

blT15 

SET CLPASS FOR PASSo ONLY 

CLPASS 

REQOATY 

LODNNLOC 

SwCALL 

ONE 

PUTCOM 

NOUNADD 

1 

LOADLV 

Switch banks to noun table reading 

ROUTINE. 

Two 

COMPTEST 

BIT15 

Set CLPASS FOR PASSo ONLY 

CLPASS 

REQDATZ 

LODNNLOC 

SWCALL 

TWO 

PUTCOM 

NOUNADD 

2 

LOADLV 

Switch banks to noun table reading 
Routine. 

ZERO 

UECBRNCH 

ZERO 

LOADSTAT 

VDl 

To block numerical CHARACTERS AND 
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12 72 

REF 

28 

LAST 

511 

1273 

REF 

18 

LAST 

510 

1274 

ref 

1 



12 75 

12 76 
1277 






1278 

REF 

15 

LAST 

510 

12 79 

REF 

253 

LAST 

510 

1280 

REF 

1 



1281 

REF 

15 

LAST 

513 

1282 

REF 

21 

LAST 

495 

1283 

REF 

22 

LAST 

514 

12B4 

ref 

23 

LAST 

514 

1285 

REF 

403 

LAST 

511 

1206 





1287 

REF 

2 

LAST 

514 

1206 

REF 

16 

LAST 

514 

1209 

REP 

404 

LAST 

514 

1290 

REF 

11 

LAST 

506 

1291 

REF 

34 

LAST 

508 

1292 

REF 

12 

LAST 

514 

1293 

ref 

3 

LAST 

514 


1294 

REF 

254 

last 

514 

1295 

REF 

1 



1296 

REF 

2 

LAST 

207 

1297 

REF 

2 

LAST 

506 

1298 

REF 

1 



1299 

REF 

2 

LAST 

514 


07*6712 

5 0614 

1 


TS 

07*6713 

0 5720 

1 


TC 

07*6714 

15600 

0 


CA3R 

07*6715 

00021 

1 

VBSPILD 

DCT 

07 * 6 7 1 8 

00022 

1 

VB5P2LD 

DCT 

07*671 7 

00023 

0 

VB5P3LD 

3CT 


07*6720 

5 

0063 

1 

ALLDC/OC TS 

07*6721 

3 

0001 

0 

XCH 

07*6722 

5 

0106 

0 

rs 

07*6723 

4 

Obis 

1 

cs 

07*6724 

5 

0021 

1 

TS 

07*6725 

/ 

H 

0021 

0 

CS 

07*6726 

4 

0021 

0 

CS 

07*6727 

1 

0000 

0 

CCS 

07*6730 

0 

6732 

1 

TC 

07*6731 

0 

0106 

0 

TC 

07*6732 

6 

0063 

1 

A3 

07*6733 

I 

0000 

0 

CCS 

07*6734 

0 

6356 

1 

TC 

07*6735 

0 

3062 

0 

TC 

07*6736 

0 

63 56 

1 

TC 

07*6737 

0 

0106 

0 

TC 


07 

*6740 

3 

0001 

0 

SFRUTnOR XCH 

07 

*6741 

5 

0112 

0 

TS 

07 

*6742 

3 

3221 

0 

CAP 

07 

*6 743 

7 

0055 

0 

MASK 

07 

*6744 

0 

3174 

0 

TC 

07 

*6745 

0 

0112 

0 

1C 


1300 

REF 

255 

1301 

REF 

3 

1302 

REF 

17 

1303 

ref 

3 

1304 

REF 

405 

1305 

REF 

9 

1306 

ref 

6 

1307 

REF 

4 

1308 

REF 

256 

1309 

REF 

5 

1310 

REF 

8 

1311 



1312 

REF 

1 


LAST 

514 

07 

LAST 

514 

07 

LAST 

514 

07 

LAST 

510 

07 

LAST 

514 

07 

LAST 

506 

07 

LAST 

506 

07 

LAST 

514 

07 

LAST 

514 

07 

LAST 

514 

07 

LAST 

511 

07 



07 



07 


67A6 3 0001 0 

67A7 5 0112 0 

6750 2 0063 0 

6751 A 0056 0 

6752 A 0000 0 

6753 7 2261 i 

675^ 0 3203 0 

6755 0 0112 3 

6756 3 0001 0 

675? 5 0112 0 

6760 2 0107 0 

6761 0 6761 I 

6762 0 6775 1 


SFRUTMIX XCH 

T5 

1M3EX 

C5 

C5 

MASK 

TC 

TC 

SFCONUM XCH 

TS 

INOEX 

TC 

TC 
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(MAIN) PAGE 51A 


DSPCOUNT 

P05TJUMP 

RECALTST 

21 

22 

23 


DECOUNT 

0 

DECRET 
UECBRNCH 
SR 
SR 
5R 
A 
+ 2 

DECRET 

DECQUNT 

A 

GUDSPALM 

CCSHOLE 

G0D5PALM 

DECRET 


Q 

exitem 

M1D5 

NNTYPTEM 
RIGHTS 
EX ITEM 

0 

EXITEM 

DECOUNT 

IPAOITEM 

A 

HI5 

LEFT5 

EXITEM 

(J 

ExiTEM 
MIXBR 
+ 0 

CONJMNOR 


USER*S OWN PAGE NO. 3A 

clears after a completed Load 

after completed load, go to RECALTST 

TU see IE there is recall from ENDIDLe, 

VP21 = ALOAD 
VB22 = BLOAD 
Vb23 = CLOAD 


TESTS that data WORDS LOADED Are EITHER 
all dec ok all OCT. ALARMS IF NOT. 


SHIFTED RIGHT 2 

DEC COMP BITS IN LOw 3 

SOME ONES IN LOW 3 

ALL ZEROS, ALL OCTAL. OK 

DEC COMP = 7 For iCOMP, =6 FOR 2C0MP 

(BUT IT HAS BEEN DECREMENTED BY CCS) 

MUST MATCH 6 FOR 3CuMP, 5 FOR 2C0MP. 


all required are dec. ok 


GETS SF ROUTINE NUMBER FOR NORMAL CASE 


SF routine number In a 

Gets sf routine number for mixed case 

GET IDADDTAB ENTRY FOR COMPONENT K 
OF NOUN. 

Sf routine number In a 

GETS SF constant NUMBER 

NURMAL NOUN 


I 
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L 
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BUTTONS 
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1313 

REF 

18 

LAST 

5lA 

07,6763 

2 

0063 

0 


IMOEX 

131A 

REF 

9 

LAST 

A87 

0 7 1 6 7 6 A 

3 

3220 

1 


caf 

1315 

REF 

3 

LAST 

51A 

07,676s 

7 

0055 

0 


MAS< 

1316 

REF 

19 

LAST 

515 

07t6766 

2 

0063 

0 


INDEX 

1317 

REF 

1 



07,6767 

2 

6772 

1 


I NOEX 

1318 





07 1 6 770 

0 

0000 

1 


TC 

R1319 

DO 

TC SFRET 

(DEC0UNT= 

0) ,00 TC 

RIGHTS (OECOUNTsl) , 

00 TC 

1320 

REF 

6 

LAST 

51A 

07,6771 

0 

0112 

0 

SFRET 

ic 

1321 

REF 

1 



07,6772 

0 

6771 

0 

DISPLACE 

TC 

1322 

REF 

2 

LAST 

5lA 

07t6773 

0 

317h 

0 


TC 

1323 

REF 

7 

LAST 

5lA 

07 ,677A 

0 

3203 

D 


TC 

132A 

REF 

10 

LAST 

515 

07,6775 

3 

3220 

1 

CONUMNOR 

CAF 

1325 

REF 

A 

LAST 

515 

07,6776 

7 

0055 

0 


MA5< 

1326 

REF 

7 

LAST 

515 

07,6777 

0 

0112 

0 


TC 


1327 

REF 

20 

LAST 515 

07,7000 

5 

0063 1 

putcom 

T5 

1328 

REF 

257 

LAST 51A 

07,7001 

3 

0001 0 


XCH 

1329 

REF 

A 

LAST 51A 

07,7002 

5 

0106 0 


T5 

1330 

REF 

187 

LAST 513 

07,7003 

3 

5501 0 


CAF 

1331 

ref 

17 

LAST 511 

07,700A 

5 

0122 0 


15 

1332 

REF 

21 

LAST 515 

07,7005 

2 

0063 0 


INDEX 

1333 

REF 

3 

LAST A95 

07*7006 

3 

0607 0 


XCH 

133A 

REF 

A02 

LAST 511 

07,700/ 

5 

0116 1 


T5 

1335 

REF 

22 

LAST 515 

07,7010 

2 

0063 0 


I NOEX 

1336 

REF 

3 

LAST 507 

07,7011 

3 

060A 0 


XCH 

1337 

REF 

A03 

LAST 515 

07,7012 

5 

0115 1 


TS 

1338 

REF 

9 

LAST 51A 

07,7013 

2 

0107 0 


I NOEX 

1339 




07, 701a 

0 

701a D 


TC 

13A0 

REF 

1 


07,7015 

0 

70A3 1 


TC 

R13A1 

IF MIXNOUN, PLACE 

ADDRESS FDR 

component 

K INTO NOJNADD 

13A2 

REF 

23 

LAST 515 

07,7016 

2 

0063 0 


INDEX 

13A3 

REF 

A 

LAST 5lA 

07,7017 

A 

0056 0 


C5 

13AA 

REF 

A06 

LAST 51A 

07,7020 

A 

0000 0 


C5 

13A5 

REF 

17 

LAST 510 

07*7021 

7 

Ab06 1 


NASA 

13A6 




07,7022 

2 

5777 1 


EXTEN 

13A7 

REP 

2A 

LAST 515 

07,7023 

6 

0063 1 


SJ 

13A8 

REF 

28 

LAST 513 

07*7D2A 

5 

062A 1 


TS 

13A9 

REF 

16 

LAST 514 

07,7025 

1 

0615 1 


CCS 

1350 

REF 

1 


07,7326 

0 

7055 0 


TC 

1351 

REF 

2 

LAST 507 

07*732 7 

0 

67A6 1 


TC 

1352 

REF 

3 

LAST 506 

07*7030 

0 

6255 0 


TC 

1353 

ref 

1 


07,7031 

0 

7053 0 


TC 

A135A 









A1355 









Ai356 









1357 

REF 

170 

LAST 513 

07* 7032 

3 

A5 1 6 1 

PUTDPCOM 

CAF 
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USER*S OWN page NO. 35 

DECOUNT 

L0W5 

NNTYPTEM 

DECOUNT 

DISPLACE 

0 

MIXED NOUN 

LEFTS IDECOUNTs 
EX ITEM 

SFRET 

RIGHTS 

LEFTS 

'2) 

5F CON number In A 

L0W5 

NNTYPTEM 

EX IT EM 

NORMAL NOUN ALWAYS GETS LOW 5 OF 

DECOUNT 

Q 

DECRET 

ZERO 

OVFIND 

DECOUNT 

XREoLP 

MPAC *1 
DECOUNT 

XREG 

MPAC 

MIXBR 
+ 0 

PUTNORM 

Normal noun 

DECOUNT 

IDADITEM 

A 

LQ^ 10 

GET IDADDTAB ENTRY FOR COMPONENT K 

OF NOUN, 

EK FOR CURRENT NoUN 

DECOUNT 

NOUNADD 

DECBRNCH 

PLACE (E SUB K) - K INTO NOUNADU 

PUTDECSF 

SFRJTMIX 

DPTEST 

+ DEC 
+u OCTAL 

PUT COM2 

ONE 

Nu DP 

TL5T FOR DP SCALE FuR OCT LOAD. IF 50, 
+0 INTO major PART. SET NOUNADD FoR 

Loading octal word into minor part. 

Dp 


DEC 4* 1966 
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1358 

REF 

29 

LAST 5l5 

07t7033 

6 0624 

1 

AD 

NOUNADD 


1359 

REF 

30 

LAST 516 

07*7034 

5 0624 

1 

TS 

NOUNADD 

(LSUBO-K + l OR E+l 

1360 

REF 

25 

last 515 

07*7035 

6 0063 

1 

AD 

DECQUNT 

NuuNADD Now SET FOR MINOR PART 

1361 

REF 

26 

LAST 516 

07*7036 

5 006 3 

1 

TS 

Decount 

(ESUnK)+l OR E+l INTO DECOUNT 

1362 

ref 

lea 

LAST 515 

OT*703 1 

3 5501 

0 

CAP 

ZERO 

NuUNADD SET FOR MINOR PART 

1363 

REF 

27 

LAST 516 

07*7040 

2 0063 

0 

I NDEX 

DECOUNT 


136A 




07*7041 

4 7777 

0 

TS 

0 -1 

ZERO MAJOR PART(ESUbK OR E) 

1365 

REF 

2 

LAST 515 

07*70‘+2 

0 7053 

0 

TC 

PUTC0M2 


1366 

REF 

17 

LAST 515 

07*7043 

1 0615 

1 

PUTNORM CCS 

DEC8RNCH 


1367 

REF 

2 

LAST 515 

07*7044 

0 7055 

0 

TC 

PUTDECSF 

+ DEC 

1368 

REF 

3 

LAST 507 

07*7045 

0 6740 

1 

TC 

SFRUTNOR 

+0 OCTAL 

1369 

REF 

4 

LAST 515 

07*7046 

0 6255 

0 

TC 

DPTEST 


1370 

ref 

3 

LAST 516 

07*7047 

0 7053 

0 

TC 

PUTC0M2 

No DP 

1371 

REF 

189 

LAST 516 

07*7050 

3 5501 

0 

caf 

ZERO 


1372 

REF 

28 

LAST 516 

07*7051 

5 0063 

1 

TS 

DECOUNT 


13 n 

REF 

1 


07*7052 

0 7032 

1 

IC 

PUTDPCOM 


137A 

REF 

404 

LAST 515 

07*7053 

3 0115 

1 

PUTC0M2 XCH 

MPAC 


1375 

REF 

5 

LAST 515 

07*7054 

0 0106 

0 

TC 

DECRET 


1376 

putuecsf finds mixsr 

AND DECOUNT STILL 

SET from pjtcdm 



1377 

REF 

2 

Last 507 

07*7055 

0 6756 

0 

PUTDeCSF TC 

SFCQNUM 

SF CON NUMB IN A 

1378 

REF 

B 

LAST 509 

07*7056 

5 0111 

0 

TS 

SFTEMP2 


1379 

REF 

140 

LAST 511 

07*705 J 

0 5654 

0 

TC 

BANKCALL 

Switch banks to sf constant reading 

1380 

REF 

1 


07*7060 

13222 

1 

CADR 

GT5FIN 

ROUTINE, loads SFTEMPI, SFTEMP2. 

1381 

REF 

10 

LAST 515 

07*7061 

2 0107 

0 

INDEX 

^^lxaR 


1382 




07*7062 

0 7062 

1 

TC 

+0 


1383 

REF 

1 


07*7063 

0 7066 

0 

TC 

PUTSFNOR 


1384 

REF 

3 

LAST 515 

07*7064 

0 6746 

1 

TC 

SFRUTMIX 


1385 

REF 

1 


07*7065 

0 7067 

1 

TC 

PUTDC5F2 


1386 

REF 

4 

LAST 516 

07*7066 

0 6740 

1 

PUTSFNOR TC 

SFRUTNOR 


1387 

REF 

407 

LAST 515 

07*7067 

2 0000 

0 

PUTDC5F2 INDEX 

A 


1388 

REF 

1 


07*7070 

3 7072 

0 

caf 

SFINTABR 


1389 

REF 

16 

LAST 507 

07*7071 

0 5723 

1 

TC 

BAN<JUMP 

Switch banks for expanshion room 

1390 

REf- 

4 

last 511 

07*7072 

15**42 

1 

sfintabr cadr 

DSPALARM 

ALARM IF DEC LOAD WlyH OCTAL ONLY NOUN 

1391 

REF 

1 


07*7073 

15140 

0 

CADR 

blNROUNO 


1392 

REF 

1 


07*7074 

1 5054 

I 

cadr 

DEGINSF 


1393 

REF 

1 


07*7075 

15127 

1 

CADR 

ARTHINSF 


1394 

REF 

1 


07*7076 

15161 

0 

CADR 

DPINSF 


1395 

REF 

1 


07*7077 

15207 

0 

cadr 

DPINSF2 


1 396 

REF 

1 


07*7100 

15143 

0 

cadr 

OPTDEGIN 


1397 

REF 

2 

LAST 516 

07*7101 

15161 

0 

cadr 

DPINSF 

Same as ARITHDPi 

1398 





07,7102 

ENDRUTIN EDJALS 




R1399 SCALE FACTORS FOR THOSE ROUTINES NEEDING THEM ARE AVAILABLE IN 5FTEMP1. 
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RIAOO 

ALL 

SPIN 

Routines 

USE mpac mPac+1. leave 

RESULT 

IN A. END WITH TC DECRET 

lAOl 

REF 

1 




06,7054 


SETLDC 

ENDDPDEC +1 

R1A02 

DEGINSF 

applies 1000/180 =5.55555(10) 

= 

5.43434(8) 


1403 

REF 

6 

LAST 

510 

06 » 70 54 

0 515 7 

1 

DEGINSF 

TC 

DMP 

1404 

REF 

1 



06 1 7055 

57121 

1 


XCADR 

uegconi 

1405 

REF 

405 

LAST 

516 

06 * 7 056 

1 0116 

0 


CCS 

MPAC +1 

1406 

REF 

20 

LAST 

491 

06,7057 

3 4504 

1 


CAF 

BITll 

1407 





06 , 7060 

0 7062 

1 


TC 

+ 2 

1400 

REF 

21 

LAST 

517 

06 , 7061 

4 4504 

0 


cs 

BITll 

1409 

REF 

406 

LAST 

517 

06,7062 

6 0116 

1 


AO 

MPAC +1 

1410 

REF 

1 



06,7063 

0 7226 

0 


TC 

2R0UND +2 

1411 

REF 

141 

LAST 

516 

06 , 7064 

0 5654 

0 


TC 

BANKCALL 

1412 

REF 

8 

LAST 

95 

06 , 7 065 

06367 

0 


CAOR 

SLl +3 

1413 

REF 

142 

LAST 

517 

06 , 7 066 

0 5654 

0 

0EGINSF2 

TC 

BANKCALL 

1414 

REF 

9 

LAST 

517 

06,7067 

06367 

0 


CAOR 

SLl +3 

1415 

REF 

1 



06,7070 

0 7235 

1 


TC 

TESTOFUF 

1416 

REF 

143 

LAST 

517 

06,7071 

0 5654 

0 


TC 

BAN^CALL 

1417 

REF 

10 

LAST 

517 

06,7072 

06367 

0 


CAOR 

SLl +3 

1418 

REF 

407 

LAST 

517 

06,7073 

1 0115 

0 


CCS 

MPAC 

1419 

REF 

1 



06,7074 

0 7100 

1 


TC 

SIGNFIX 

1420 

REF 

2 

LAST 

517 

06,7075 

0 7100 

1 


TC 

SIGNFIX 

1421 





06,7076 

4 0000 

0 


COM 


1422 

REF 

408 

LAST 

517 

06,7077 

5 0115 

1 


T5 

MPAC 

1423 

REF 

18 

LAST 

515 

06,7100 

1 0122 

1 

SIGNFIX 

CCS 

OVFINO 

1424 

REF 

1 



06,7101 

0 7116 

0 


TC 

SGNTOl 

1425 

REF 

1 



06,7102 

0 7112 

1 


TC 

ENDSCALE 

1426 

REF 

409 

LAST 

517 

06,7103 

1 0115 

0 


CCS 

MPAC 

1427 

REF 

35 

LAST 

514 

06,7104 

0 3062 

0 


TC 

CCSHOUE 

1428 

REF 

1 



06,7105 

0 7114 

1 


TC 

NE6180 

1429 





06 ,7106 

0 7107 

0 


TC 

♦1 

1430 

REF 

410 

LAST 

517 

06,7107 

3 0115 

1 


XCH 

MPAC 

1431 

REF 

21 

LAST 

390 

06,7110 

7 4476 

1 


V1A5< 

POSMAX 

1432 

REF 

411 

LAST 

517 

06,7111 

5 0115 

1 


T5 

MPAC 

1433 

REF 

19 

LAST 

514 

06,7112 

0 5720 

1 

ENDSCALE 

TC 

POST JUMP 

1434 

REF 

4 

LAST 

516 

06,7113 

17053 

1 


CAOR 

PUTC0M2 

1435 

REF 

22 

LAST 

517 

06,7114 

4 4476 

1 

NEG180 

C5 

POSMAX 

1436 

REF 

2 

LAST 

517 

06,7115 

0 7111 

1 


T C 

ENDSCALE -1 

1437 

ref 

412 

LAST 

517 

06,7116 

4 0115 

0 

SGNTOl 

cs 

MiPAC 

1438 

REF 

23 

LAST 

517 

06,7117 

7 4476 

1 


MAS< 

POSMAX 

1439 

REF 

408 

LAST 

516 

06,7120 

4 0000 

0 


C5 

A 

1440 

REF 

3 

LAST 

517 

06,7121 

0 7111 

1 


TC 

ENDSCALE -1 

1441 





06,7122 

26161 

0 

DLGCONl 

20EC 

5.555555555 B-3 

C1441 





06,7123 

30707 

1 





J5eR*S own page no, 37 


5E routine for dec uEGREES 
Mult by 5.5 5(10)X2/-3 

THIS ROUNDS OFF MPAC+1 BEFORE SHIFT 
LEFT 3» and causes 360,00 TO OF/UF 
WHEN shifted left AnD ALARM. 


LEFT I 

Left 2 


RETURNS IF NO OF/UF 
LEFT 3 

iF+f GO TO SIGNFIX 
IF ♦Of GO TO SIGNFIX 
IF - » USE -MAGNITUDE +1 
IF -Of USE +0 

IF OVERFLOW 

NO OVERFLOW/UNDERFLOW 

IF UF FORCE SIGN TO 0 EXCEPT -180 


IF OF FORCE SIGN TO l 


4d4t37BA YUL SYSTEM FOR A6C<t; REVISION 0 Of PROGRAM SOLRUMS5 SY NASA 1021108-021 


DEC 4, 1966 


(MAIN) PAGE S18 


L 

pinball 

GAME 

BUTTONS 

AND LIGHTS 





USER’S OWN PAGb NO. 38 

1AA2 




06*712** 

2l6l6 

0 

DEGC0N2 

2DEC 

2.222222222 

B-2 

ClA*t2 




06*7126 

07071 

0 





1A43 




06*7126 

71527 

1 

NE6.2 

Dcr 

-06250 

= .197753906 I.E. THE BIAS SCALED 

lAAA 

REF 7 

last 

517 

06*712 7 

0 5157 

1 

ARTHINSF 

TC 

UhP 

Scales mpac* +i by sftempi, sftempz* 

14A5 

REF 15 

last 

511 

06*7130 

50107 

1 


XCADR 

SpTEMPl 

ASSUMLS POINT BETWEEN HI ANo LO PARTS 

14<t6 

REF i+13 

last 

517 

06*7131 

3 0117 

0 


XCH 

MPAC +2 

OF SFCON. SHIFTS RESULTS LEFT BY U. 

l4<+7 

REF 

last 

5ie 

06*7132 

3 0116 

1 


X CH 

MPAC +1 

(bY TAKING RESULTS FROM MPAC+1, MPAC+2) 

14^6 

REF 415 

last 

51b 

06*7133 

3 0116 

1 


xc^ 

MPAC 


14*t9 

REF 409 

last 

517 

06*713h 

1 0000 

0 


CCS 

A 


1460 

REF 6 

LAST 

516 

06*7135 

0 7^42 

1 


TC 

DSPALARM 

Too LARGE A LOAD 

1461 

REF 2 

LAST 

516 

06.7136 

0 7140 

0 


TC 

bINROUND 


1462 

REF 6 

LAST 

518 

06*7137 

0 7i^42 

1 


TC 

DSPALARM 

TOO LARGE A LOAD 

1463 

REF 2 

LAST 

517 

06*7140 

0 7224 

1 

binrqund 

7C 

2R0UND 


1464 

REF 2 

LAST 

517 

06*7141 

0 7235 

1 


TC 

TESTOFUF 


1465 

REF 4 

LAST 

517 

06*7142 

0 7112 

1 


TC 

LNDSCALE 

RETURNS IF NO OF/UF 


1466 

REF 416 

EAST 

518 

06*7143 

1 

0115 

0 

OPTDEGIN CCS 

MPAC 

OPTICS SCALING ROUTINE 

1467 

REF 1 



06 * 7 144 

0 

7150 

1 

TC 

OpDEGlN2 

LOW range 0 TO 90 DEG ALwAyS 

1466 

REF 2 

LAST 

518 

06*7l*t5 

0 

7150 

1 

TC 

0PDEG1N2 


1469 

ref 7 

Last 

518 

06 * 7 1 46 

0 

7442 

1 

TC 

DSPALARM 

REJECT - INPUT. ALARM 

1460 

REF 8 

LAST 

518 

06*7147 

0 

7442 

1 

TC 

DSPALARM 

DITTO 


Ri461 no longer Do we TE^T bit 13 OF i^ASOPSET TO DETERMINE RAr4GE. RANGE NOW 


R1462 

IS always 90 

DEg 

(BLOCK 50 - 

100) 







1470 

REF 

417 

LAST 

518 

06*7150 

3 0115 

1 

0PDEGIN2 

XC-i 

MPAC 


RANGE IS 90 DEG 

1471 

REF 

1 



06.71S1 

6 7126 

0 


AD 

NEG.2 


Subtract bias 

14 72 

REF 

418 

LAST 

518 

06*7152 

5 0115 

1 


TS 

MPAC 



1473 

REF 

8 

LAST 

518 

06*7163 

0 5157 

1 


TC 

DMP 


MULT BY 100 / 45 B-2 

1474 

REF 

1 



06 * 7 1 64 

57123 

0 


XCADR 

DEGC0N2 



1475 

REF 

19 

LAST 

390 

06.7155 

3 4603 

0 


CAF 

B1T12 


RUUND AS IN DEGIN5F 

1476 

REF 

419 

LAST 

518 

06*7156 

6 0116 

1 


AD 

MPAC 

♦ 1 


1477 

REF 

3 

LAST 

518 

06*7157 

0 7226 

0 


TC 

2R0JND 

+ 2 


147 8 

REF 

1 



06*7160 

0 7066 

0 


TC 

DEGIN5F2 



1479 

ref 

9 

LAST 

518 

06*7161 

0 5157 

1 

DPINSF 

TC 

DMP 


SCALES MPaC* mpac +i BY SFTEMPi, 

1480 

ref 

16 

LAST 

518 

06*7162 

50107 

1 


XCADR 

SFTEMPI 


SFTEMP2. STORES LOw PART OF RESULT 

1481 

REF 

420 

LAST 

518 

06 * 7 1 63 

3 0117 

0 


XCH 

MPAC 

+ 2 

In (E SUBK) +1 OR E+l 

1482 





06*7164 

6 0000 

1 


DDJBLE 




1483 

REF 

421 

LAST 

518 

06*7165 

5 0117 

0 


15 

MPAC 

+ 2 


1484 

REF 

190 

LAST 

516 

06 * 7 1 66 

3 5501 

0 


caf 

ZERO 



1485 

REF 

422 

LAST 

518 

06*7167 

6 0116 

1 


AD 

MPAC 

+ 1 


1486 

REF 

4 

LAST 

518 

06.717U 

U 7226 

0 


TC 

2R0UND 

*2 



4 lii Ml. . 


I 


I 


' 1 

ft *' 


YUL SYSTEM FOR AGC^t; REVISION 0 OF PROGRAM SOLRUMS5 Bi 


PINGALL OAMh BUTTONS AND LIGHTS 


lAb7 

REF 

3 

LAST 

510 

06*7171 

0 

7235 

1 


lAae 

REF 

11 

LAST 

516 

06*71 72 

2 

0107 

0 


lAb9 





06*7173 

0 

7173 

0 


1A90 

REF 

1 



06*7174 

0 

7205 

1 


lAvl 

REF 

29 

LAST 

516 

06*7175 

3 

0063 

1 


1A92 

REF 

30 

LAST 

519 

06*7176 

5 

0063 

1 


iA93 

REF 

31 

LAST 

516 

06*7177 

6 

0624 

1 

DPINCOM 

lAvA 

REF 

258 

LAST 

51S 

06*7200 

5 

0001 

0 


1A95 

REF 

423 

LAST 

518 

06*7201 

3 

0116 

1 


IA96 

REF 

259 

LAST 

519 

06*7202 

2 

0001 

1 


1A97 





06*7203 

5 

0001 

0 


1A98 

REF 

5 

LAST 

518 

06*7204 

0 

7112 

1 


1A99 

REF 

191 

LAST 

518 

06*7205 

3 

5501 

0 

DPINORM 

1500 

REF 

1 



06*7206 

0 

7177 

1 


1501 

ref 

10 

Last 

518 

06*72o7 

0 

5157 

1 

DPINSF2 

1502 

REF 

17 

LAST 

518 

06f7210 

50107 

1 


1503 

REF 

2 

last 

510 

06*7211 

0 

7213 

0 


150A 

REF 

3 

LAST 

516 

06*7212 

0 

7163 

I 


1505 

ref 

260 

last 

519 

06*7213 

3 

0001 

0 

TPLEFT7 

1506 

REF 

9 

last 

516 

06*7214 

5 

0111 

0 


1507 

REP 

19 

last 

512 

06*7215 

3 

4475 

0 


1508 

REF 

18 

LAST 

519 

06*7216 

5 

Olio 

1 

LEFT7C0M 

1509 

REF 

144 

last 

517 

06*7217 

0 

5654 

0 


1510 

REF 

11 

last 

517 

06*7220 

06364 

0 


1511 

REF 

19 

LAST 

519 

06*7221 

1 

Olio 

0 


1512 

REF 

1 



06*7222 

0 

7216 

0 


1513 

REF 

10 

LAST 

519 

06*7223 

0 

0111 

0 


151A 

ref 

424 

LAST 

519 

06*7224 

3 

0116 

1 

2R0UND 

1515 





06*7275 

6 

0000 

1 


1516 

REF 

425 

LAST 

519 

06*7226 

5 

0116 

1 


1517 

REF 

261 

LAST 

519 

06*7227 

0 

0001 

0 


1518 

REF 

426 

LAST 

519 

06*7230 

6 

0115 

1 


1519 

REF 

427 

LAST 

519 

06*7231 

5 

0115 

1 


1520 

REF 

262 

LAST 

519 

06*7232 

0 

0001 

0 


1521 

REF 

19 

LAST 

517 

06,7233 

5 

0122 

0 


1522 

REF 

263 

LAST 

519 

06*7234 

0 

0001 

0 

2RNDEND 

1523 

ref 

20 

LAST 

519 

06*7235 

1 

0122 

1 

TESTOFUF 

1524 

REF 

9 

LAST 

518 

06 * 72 36 

0 

7442 

1 



TC 

INDEX 

TO 

TC 

XC^ 

T5 

AO 

T5 

XCH 

index 

TS 

TC 

CAP 

TC 


TC 

XCADR 

TC 

TC 


XCH 

TS 

CAF 

TS 

TC 

CAOR 

CCS 

TC 

TC 


XCH 
OOJBLI 
TS 
TC 
AO 
TS 
TC 
TS 
T 


W 


T 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE Sl9 


USER *5 OWN page NO. 39 


Returns if no of/uf 


TESTOFUF 

MIXBR 

+ 0 

DP I NORM 
DECOUNT 

DECDUNT 

NOUNADD 

0 

MPAC +1 
Q 
1 

ENDSCALE 

ZERO 

DPINCOM 


MiXEDNOUN 

MIXED 
E SUBK 


NORMAL 

E 


PLACE LOW PART IN 
CE SUBK) ♦! MIXED 
E +1 NORMAL 


DMP assumes Point between bits 7-e of high 

SFTEMPI part of SF const, DPINSF2 SHIFTS RESULTS 

TPLEFT7 LlFT BY 7, ROUNDS MPAC+2 INTO MPAC+l. 

DPINSF +2 


0 OPERATES ON MPACt MPaC+1* MPAC+2 

SFTEMP2 

SIX LEFT BY 7 

SFTEMPI 

BANKCALL 

SLl 

SFTEMPI 

LEFT7C0M 

SFTEMP2 


MPAC 

+ 1 



MPAC 

Q 

♦ 1 

IF 

MPAC+1 DOES NOT OF/UF 

MPAC 

MPAC 

0 

OVFiND 


IF 

MPAC DOES NOT OF/UF 


Q 


OVFIND RETURNS IF NO OF/UF 

DSPALARM OF 


^84!j78A YUL system FOR AGCA: REVISION 0 OP PROGRAM SOLRUM5S BY NASA 1021108-021 


DEC A ♦ 1 966 


(MAIN) PAGE 520 


L PINBALL GAME BUTTONS AND LIGHTS 


USER'S OWN PAGE NO. AO 


1525 REF 26A LAST 5l9 06*7237 0 0001 0 TC 0 

1526 REF 10 LAST 519 06*7240 0 7‘+A2 1 TC DSPALARM UE 



k 



' 

I 









> • |iA i 




yul System for agc4: revision o or program solrumss by nasa 1021108-021 


DEC 4, 1966 


(MAIN) page S2l 


L PINBALL game BUTTONS AND LIGHTS USER’S OWN PAGE NO, 41 

P1527 monitor ALLoi^S oTHER KEYBOARD ACTIVITY, IT IS ENDED BY VERB TERMINATE, 

kislb any nvsub Call that passes the dsploc<, or another monitor. 

Ri529 monitor action IS SuSpeUDeD, BUT NOT ENDED, BY ANY <EYBOARD ACTION, 

HiSiO except ERROR LIGHT RESeU IT BEGINS AGAIN WHEN KEY RELEASE IS PERFORMED. 

RiS3i Monitor saves the noun and appropriate display veRb in monsave, it saves 

R1532 NOUnADD IN MONSaVEU IF NOUn = MACHINE ADDRESS TO BE SPEC I F I ED. BIT 15 OF 

R1533 MONSAVEl IS THE KILL MONITOR SIGNAL (<ILLeR BIT). 

R1534 monsave INDICATES IF MONITOR IS ON(+=ON, +0=0FF) 

R153S IF MONSAVF- IS +, MONITOR ENTERS Nu REQUEST, BUT TJ^NS KILLER BIT OF'F. 

Ri536 IF monsave is +0, MONITOR ENTERS REUJeST AND TURNS KILLeR BIT OFF, 

Ri537 NVSUB AND VB=TERMINATE TJRN KILL MONITOR BIT ON. 

Risse IF killer bit is on, monReq enters no further Requests, zeros monsave 

ftl539 AND MONSAVEl (TURNING OFF KILLER BIT). 


H1540 monitor dosent test FOR matbs since Nvsub can hanqee internal matbs now 

1541 REF 1 07,7102 SETLOC ENDRUTIN 


1542 

REF 

23 

LAST 

513 

07,7102 

4 

4500 

1 

MONITOR 

C5 

BIT15 


1543 

REF 

32 

LAST 

519 

07,7103 

7 

0624 

0 


MASK 

NOUNADD 


1544 

REF 

428 

LAST 

519 

07,7104 

5 

0116 

1 

MONITI 

TS 

MPAC ♦! 

TtMP STORAGE 

1545 

REF 

1 



07,7105 

3 

7421 

1 


CAF 

L0W6 


1546 

REF 

19 

LAST 

505 

07,7106 

7 

0602 

1 


MASK 

VERBREG 


1547 

REF 

B 

LAST 

515 

07,7107 

0 

3203 

0 


TC 

LEFTS 


1546 

REF 

17 

LAST 

488 

07,7110 

5 

0022 

1 


TS 

CYL 


1549 

REF 

18 

LAST 

521 

07,7111 

3 

0022 

1 


XCH 

CYL 


1550 

REF 

8 

LAST 

505 

07,7112 

6 

0603 

1 


AD 

ndunreg 


1551 

REF 

429 

LAST 

521 

07,7113 

5 

0115 

1 


] s 

MPAC 

TEMP STORAGE 

1552 

REF 

2 

LAST 

148 

07,7114 

4 

0630 

0 


C5 

grablock 

NtlTHER CASE SEARCHES LIST. 

1553 

REF 

77 

LAST 

513 

07,7115 

6 

5503 

1 


AD 

T WO 


1554 

REF 

410 

LAST 

518 

07,7116 

1 

0000 

0 


CCS 

A 


1555 

REF 

1 



07,7117 

0 

3356 

1 


TC 

RELDSPl 

6KABL0CK=0,1. +0 INTO D5PLQCK AND 

1556 





07,7120 

0 

7123 

0 


TC 

+ 3 

TURN OFF KEY RLSE LIGHT. 

1557 

REF 

36 

LAST 

517 

07,7121 

0 

3062 

0 


TC 

CCSHOLE 


1558 

REF 

1 



07,7122 

0 

3257 

1 


TC 

DSPLOCKO 

GKAbL0CK=2. +0 INTO DSPLOCK (BIT4 OF 

A1559 












STATE) and leave K^EY RELEASE LIGHT ALONe 

1560 





07,7123 

2 

001 r 

0 


INHINT 



1561 

REF 

2 

LAST 

148 

07,7124 

1 

0625 

1 


CCS 

MONSAVE 


1 56? 





07,7125 

0 

7131 

0 


TC 

+ 4 

IF monsave was +, No REQUEST 

1563 

REF 

171 

LAST 

515 

07,7126 

3 

4516 

1 


CAF 

ONE 

IF monsave was 0 , request MONREQ 

1564 

REF 

59 

LAST 

456 

07,7127 

0 

2173 

0 


T ^ 

WAITLIST 


1565 

REF 

1 



07,7130 


17137 

1 


CADR 

MONREQ 


1566 

REF 

430 

LAST 

521 

07,7131 

3 

0115 

1 


XCH 

MPAC 


1567 

REF 

3 

LAST 

521 

07,7132 

5 

0625 

0 


TS 

MONSAVE 

Place monitor veRB and noun into monsave 

1568 

REF 

431 

LAST 

521 

07,7133 

3 

0116 

1 


XCH 

MPAC +1 



^eAb?0A YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUM55 BY 


L pinball Game buttons and lights 


1569 

ref 

2 

LAST 

lAa 

07t7l3A 

5 

0626 

0 

TS 

1570 





07*7135 

2 

0016 

1 

reli 

1571 

REF 

A 

LAST 

A97 

07*7136 

0 

0065 

1 

TC 


1572 

ref 

8 

LAST 

478 

07*7137 

0 

2677 

0 

monreo 

TC 

1573 

REF 

2 

LAST 

477 

07*7140 

0 

27 36 

1 


TC 

157A 

ref 

3 

LAST 

522 

07.7141 

1 

0626 

1 


CCS 

1575 





07.7142 

0 

7146 

Q 


TC 

15 76 





07.7143 

0 

7146 

0 


TC 

1577 

ref 

1 



07.7144 

0 

7155 

1 


TC 

1578 

ref 

2 

LAST 

522 

07*7145 

0 

7155 

1 


TC 

1579 

ref 

1 



07.7146 

3 

7161 

0 


CAF 

1580 

ref 

60 

LAST 

521 

07.7147 

0 

2173 

0 


TC 

1581 

ref 

2 

LAST 

521 

07*7150 


17137 

1 


CAOR 

1582 

REF 

3 

LAST 

355 

07.7151 

3 

2164 

0 


caf 

1583 

REF 

15 

LAST 

477 

07.7152 

0 

2052 

1 


TC 

1 58A 

REF 

1 



07.7153 


17162 

1 


CADR 

1585 

REF 

A5 

LAST 

456 

07.7154 

0 

22 56 

1 


TC 

1586 

REF 

192 

LAST 

519 

07.7155 

3 

5501 

0 

KILLMON 

CAP 

1587 

REF 

4 

LAST 

521 

07*7156 

5 

0625 

0 


TS 

1588 

REF 

4 

LAST 

522 

07.7157 

5 

0626 

0 


T5 

1589 

REF 

46 

LAST 

522 

07.7160 

0 

2256 

1 


TC 


1590 





07*7161 

00144 

0 

MONDEL 

3CT 

1591 

REF 

5 

LAST 

522 

07*7162 

1 

0626 

1 

MON DO 

CCS 

1592 





07*7163 

0 

7167 

0 


TC 

1593 





07*7164 

0 

7167 

0 


TC 

1 594 

REF 

62 

LAST 

494 

07*7165 

0 

2124 

1 


TC 

1595 

ref 

63 

LAST 

522 

07*7166 

0 

2124 

1 


TC 

1596 

REF 

1 



07*7167 

0 

3274 

0 


TC 

1597 

REF 

1 



07*7170 

0 

7214 

1 


TC 

1598 

REF 

2 

LAST 

521 

07,7171 

3 

7421 

1 


CAF 

1599 

REF 

5 

LAST 

522 

07.7172 

7 

0625 

1 


viA5< 

1600 

REF 

3 

LAST 

252 

07*7173 

5 

0110 

1 


TS 

1601 

REF 

2 

LAST 

252 

07,7174 

0 

3121 

0 


TC 

1602 

REF 

64 

LAST 

522 

07*7175 

0 

2124 

1 


TC 

1603 

REF 

1 



07*7176 

3 

7212 

1 


CAF 

1604 

REF 

6 

LAST 

522 

07*7177 

7 

0625 

1 


MA 5<. 

1605 

REF 

3 

LAST 

515 

07*7200 

0 

3174 

0 


TC 

1606 

REF 

31 

LAST 

281 

07*7201 

5 

0020 

0 


TS 

1607 

REF 

32 

LAST 

522 

07.7202 

3 

0020 

0 


XCH 

1608 

REF 

20 

LAST 

52 1 

07.7203 

5 

0602 

0 


TS 


NASA 1021108-021 


DEC At 1966 


(MAINI PAGE 522 



USER’S OWN PAGE NO. 42 

MONSAVE 1 

ENTRET 

ZERO THE KILL MONITOR BIT 

Readtime +i 
lodsampt 

MONSAVEl 

Called by waitlist 

TIME IS snatched IN RUPT FOR NOUN 65 

+4 
* 3 

KILLMON 

KILLMON 

IP KILLER BIT = 0. ENTER REQUESTS 

Ir KILLER BIT = 0* ENTER REQUESTS 

IP killer bit = 1. NO requests 

Ir killer bit = 1. NO REQUESTS 

MONQEL 

WAITLIST 

monreq 

enter WAITLIST request FOR MONREQ 

PRI031 

NOVAC 

MON DO 

TASKOVER 

ENTER EXEC REQUEST FOR MONDO 

Zero 

zero MONSAVE AND TURN KILLeR BIT OFF 

MONSAVE 

MONSAVEl 

TASKOVER 

TURN OFF KILL MONITOR BIT. 

144 

FUR 1 SEC monitor INTERVALS 

MONSAVEl 

+ 4 

+ 3 

ENDOFjOa 

ENDOFjOe 

TSTDSPLK 

MONBUSY 

L0v«6 

MONSAVE 

CALLED BY EXEC 

IP killer bit = 0. CONTINUE 

Ir killer bit = 0* CONTINUE 

CASE terminate CAME SINCE LAST MONREQ 
IN CASE terminate CAME SINCE LASt MONREQ 
PERFORMS CCS OSPLOCK 

NV5UB IS BUSY 

NVSUB IS AVAlLAbLE 

NVTEMP 

NVSUBMON 

ENDOFJOB 

PLACE NOUN INTO NOUnREG AND DISPLAY IT 

I.M CASE OF ALARM DURING DISPLAY 

monmask 

MONSAVE 

RIGHTS 

CYR 

CYR 

VERBRLG 

CHANGE monitor VERB TO DISPLAY VERB 


4b^&78A YUL SYSTEM FOR AGC^: REVISION 0 OF PROGRAM SOLRUMS5 BY NASA 1021108-021 


DEC 4, l966 


(MAIN) page 523 


L pinball came Buttons and lights 


USER’S OWN PAGE NO, 43 


1609 

ref 

1 



07*7204 

3 

7213 

0 


CAF 

MONBACK 

SET RETURN TO PA5TEVB AFTER DATA DISPLAY 

1610 

REF 

5 

LAST 

522 

07*7205 

5 

0065 

1 


T5 

ENTRET 


1611 

REF 

24 

LAST 

521 

07*7206 

4 

4500 

1 


CS 

BIT15 


1612 

REF 

6 

LAST 

522 

07*720/ 

7 

0626 

1 


viAb< 

MONSAVEl 


1613 

REF 

33 

LAST 

521 

07*7210 

5 

0624 

1 


T5 

NOUNADD 


1614 

REF 

2 

LAST 

497 

07.7211 

0 

6046 

0 

ENDMONDO 

TC 

TESTNN 


1615 

REF 

1 





3071 


SETLDC 

endfailf 


1616 

REF 

1 



son 

3 

3077 

1 

PASTEVe 

CAF 

MIDSIX 


1617 

REF 

7 

LAST 

522 

3 072 

7 

0625 

1 


MA5< 

MONSAVE 


1618 

ref 

4 

LAST 

522 

3073 

5 

Olio 

1 


TS 

NVTEMP 

PLACE monitor Verb into verbreg and 

1619 

REF 

3 

LAST 

522 

3074 

0 

3121 

0 


TC 

NVSUBMON 

DISPLAY IT. 

1620 





3075 

0 

3076 

0 


TC 

+ 1 

In case of alarm during DISPLAY 

1621 

REF 

65 

LAST 

522 

3076 

0 

2124 

1 

EN0PA5TE 

TC 

endofjob 


1622 





3077 


07700 

1 

MIDSIX 

octal 

07700 



1623 

REF 

1 


07,7212 


SETLDC 

ENDMONDO +1 


1624 



07*7212 

00/00 0 

MONMASK 

OCT 

700 


1625 

REF 

1 

07*7213 

03071 1 

MONBACK 

AORES 

PASTEVB 


1626 

ref 

1 

07*7214 

0 3250 0 

MONBUSY 

TC 

reldspon 

TURN key release UGHT 

1627 

REF 

66 LAST 523 

07*7215 

0 2124 1 


TC 

enoqfjob 



R1628 DSPBANK is USED Tq DISPLAY (IN OCTAL) ANY FIXED REGISTER IN BAN<. 

R1629 IT IS used WITH NOJN = MACHINE ADDRESS TO BE SPECIFIED, THE CADR OF THE 

R1630 desired location IS THEN PUNCHED IN. 


1631 

REF 

7 

LAST 

511 

07*7216 

3 

3171 

0 DSPBANK 

CAF 

RlDl 

1632 

REF 

29 

last 

514 

07,7217 

5 

0614 

1 

TS 

DSPCOUNT 

1633 

REF 

34 

last 

523 

07*7220 

4 

0624 

0 

CS 

NOUNADD 

1634 

REF 

411 

last 

521 

07,7221 

4 

0000 

0 

CS 

A 

1635 

REF 

3 

last 

278 

07*7222 

0 

5730 

0 

TC 

datacall 

1636 

REF 

4 

last 

505 

07*7223 

0 

7225 

0 

TC 

DbPUCTWO 

1637 

REF 

6 7 

LAST 

523 

07*7224 

0 

2124 

1 

TC 

ENDOFJOB 

1638 

REF 

4 

LAST 

519 



06,7241 

setloc 

TtsToruF 


R1639 DSPDECWD CONVERTS C(MPAC) AND C(MPaC +1>T0 A SIGN AND 5 CHAR DECIMAL 
R1640 starting 1(4 LOC SPECIFIED IN OSPCOUNT 

1641 REF 265 LAST 520 06t7241 3 0001 0 DSPDECWD XCH Q UseS SHORTMP THROUGHOUT 

1642 REF 8 LAST 509 06t7242 5 0106 0 T5 WURLT 

1643 REF 432 LAST 521 06i724i 1 0115 0 CCS MPAC 


H6^t778A YUL SYSTEM FOR AGC-*! REVISION 0 OF PROGRAM SOLRUM55 BY 


L PINBALL game BUTTONS AND LIGHTS 


i6AA 





06 1 7 244 

0 

7253 

1 


IC 

1645 





0 6 » 7 2 4 5 

0 

7253 

1 


TC 

1646 

REF 

172 

LAST 

521 

06*7246 

6 

A516 

1 


AD 

1647 

REF 

433 

LAST 

523 

06*7247 

5 

0115 

1 


IS 

1646 

REF 

2 

LAST 

490 

06*7250 

0 

6343 

0 


TC 

1649 

REF 

434 

LAST 

524 

06*7251 

4 

0116 

0 


cs 

16S0 





06*7252 

0 

7255 

1 


TC 

1651 

REF 

2 

LAST 

491 

06*7253 

0 

6322 

1 


TC 

1652 

ref 

435 

LAST 

524 

06*7254 

3 

0116 

1 


XCH 

1653 

REF 

1 



06*7255 

6 

7314 

0 


AD 

1654 

REF 

436 

LAST 

524 

06 * 72 56 

5 

0116 

1 


T5 

1655 

REF 

193 

LAST 

522 

06.7257 

3 

5501 

0 


CAP 

1656 

REF 

437 

LAST 

524 

06*7260 

6 

0115 

1 


AD 

1657 

REF 

430 

LAST 

524 

06*7261 

5 

0115 

1 


T5 

1658 





06*7262 

0 

72 66 

1 


TC 

1659 

REF 

24 

LAST 

5l7 

06*7263 

3 

4476 

0 


CAP 

1660 

REF 

439 

LAST 

524 

06*7264 

5 

0115 

1 


T5 

1661 

REF 

440 

LAST 

524 

06*7265 

5 

0116 

1 


TS 

1662 

REF 

11 

LAST 

419 

06 * 7 266 

3 

5502 

0 


CAP 

1663 

REF 

1 



06*7267 

5 

0076 

0 

OSPDCWDl 

TS 

1664 

REF 

2 

LAST 

492 

06.7270 

3 

3232 

1 


CAP 

1665 

REF 

7 

LAST 

509 

06*7271 

0 

54 1 6 

1 


TC 

1666 

REF 

441 

LAST 

524 

06*7272 

2 

0115 

0 

TRACEl 

INDEX 

1667 

REF 

3 

LAST 

48 7 

06*7273 

3 

2652 

1 


CAP 

1668 

REF 

11 

LAST 

515 

06.7274 

7 

3220 

0 


V!A5< 

1669 

REF 

8 

LAST 

495 

06*7275 

5 

0111 

0 


TS 

1670 

REF 

194 

LAST 

524 

06*7276 

3 

5501 

0 


CAP 

1671 

REF 

442 

LAST 

524 

06*7277 

3 

011 7 

0 


XCH 

1672 

REF 

443 

LAST 

524 

06*7300 

3 

Ollb 

1 


XCH 

1673 

REF 

444 

LAST 

524 

06*7301 

5 

0115 

1 


TS 

1674 

REF 

30 

LAST 

523 

06.7302 

3 

Obi 4 

1 


XCH 

1675 

REF 

5 

LAST 

495 

06*7303 

5 

0104 

1 

TRACEIS 

TS 

1676 

REF 

412 

LAST 

523 

06.7304 

1 

0000 

0 


^ 4 . b 

1677 

REF 

31 

LAST 

524 

06*7305 

5 

06 1 4 

1 


TS 

1678 

REF 

5 

LAST 

495 

06*7306 

0 

7341 

0 


TC 

1679 

REF 

2 

LAST 

524 

06*7307 

1 

0076 

1 


CCS 

16fa0 

REF 

1 



06*7310 

0 

7267 

0 


TC 

1681 

REF 

5 

LAST 

513 

06*7311 

4 

3227 

1 


C5 

1682 

REF 

32 

LAST 

524 

06.7312 

5 

06l4 

1 


TS 

16B3 

REF 

9 

LAST 

523 

06*7313 

0 

0106 

0 


TC 

1664 





06 * 7 3 1 H 

02476 

0 

DECROUND 

DCT 

R1685 

DSP2DEC 

CONVERTS 

C(MPAC) AND 

C (MPAC+ 

u 

into a sign and 

Rl6e6 

STARTING IN 

THE 

Loc Specified 

IN DSPCDUNT. 


1687 

REF 

266 

LAST 

523 

06*7315 

3 

0001 

0 

D5P2DEC 

XCH 

1688 

REF 

10 

LAST 

524 

06*7316 

5 

0106 

0 


T 5 


NASA 1021108-021 


DEC 1966 


(MAIN) 



USER'S OWN PAGE NO. 44 

+ 7 
♦ 6 

ONE 

MPAC 

-ON 

MPAC +1 

♦ 3 

♦ ON 

MPAC +1 

DECROUND 

MPAC +1 

ZERO 

MPAC 

MPAC 


+ 4 

POSMAX 

MPAC 

MPAC +1 

POUR 

WDCNT 

BiNCOfy 

SHORTMP 

MPAC 

RELTAB 

L0l^5 

CODE 

ZERO 

MPAC +2 

MPAC +l 

MPAC 

DSPCOUNT 

COUNT 

A 

DSPCOUNT 

DSP IN 

WDCNT 

DSPDCWDl 

VDl 

DSPCOUNT 

wdret 

02476 

DECREMENT DSPCOUNT EXCEPT AT +o 


iO CHAR decimal 


YUL SYSTEM FOR AGC^t: REVISION 0 OF- PROGRAM 50LRUM55 BY NASA 1021108-021 


DEC 1966 


(MAIN) PAGE 62 6 


L 

PINBALL 

GAME 

BUTTONS 

AND LIGHTS 





USER'S OWN page No 

1689 

REF 

195 

LAST 

52A 

06W31 7 

3 

5501 

0 

caf 

ZERO 



1690 

REF 

9 

LAST 

52A 

06»7320 

5 

0111 

0 

T5 

CODE 



1691 

REF 

20 

LAST 

A97 

06 W321 

3 

Aa73 

0 

caf 

THREE 



1692 

REF 

A 

LAST 

A93 

06.7322 

0 

7 A 2 6 

0 

TC 

IIDSPIN 

-K2 OFF 

1693 

REF 

12 

LAST 

52a 

06.7323 

3 

5502 

0 

CAF 

FOUR 



1 69 A 

REF 

5 

LAST 

525 

06.732a 

0 

7A26 

0 

TC 

IIDSPIN 

+K2 OFF 

1696 

REF 

AA5 

LAST 

52A 

06.7325 

1 

0U5 

0 

CCS 

MPAC 



1696 





06.7326 

0 

7336 

0 

TC 

*8D 



1697 





06*7327 

0 

7336 

0 

TC 

*1 



1698 

REF 

173 

LAST 

52A 

06 .7330 

6 

A5 1 6 

1 

AD 

ONE 



1699 

REF 

AA6 

LAST 

525 

06.7331 

5 

0115 

1 

TS 

MPAC 



1700 

REF 

3 

LAST 

52A 

06.7332 

0 

63A3 

0 

TC 

-ON 



1701 

REF 

AA7 

LAST 

525 

06.7333 

A 

0116 

0 

C5 

MPAC 

+ 1 


1702 

REF 

AA8 

LAST 

525 

06 .733*. 

5 

0116 

1 

T5 

MPAC 

+ 1 


1703 





06.7335 

0 

7337 

1 

TC 

+ 2 



170A 

REF 

3 

LAST 

52A 

06 » 7 3 3b 

0 

6322 

1 

TC 

+0N 



1706 

REF 

3 

LAST 

502 

06.733 ? 

3 

3172 

0 

CAF 

R2D1 



1706 

REF 

2 

LAST 

52A 

06.73A0 

0 

7267 

0 

END2DEC TC 

DSPUC^Dl 

i 

1707 

REF 

2 

LAST 

A99 



07.7225 

SETLOC 

DSPBANK +7 



R1708 DSPOCTWD DISPLAYS C(A) UPON ENTRY AS A 5 CHAR OCT STARTING IN THE DSp 


R1709 

CHAR 

SPECIFIED IN 

DSPCOUNT. IT 

STOPS 

after 5 CHAR 

HAVE 

Been displayed. 


1710 

REF 

19 

LAST 

521 

07.7225 

5 

0022 

1 

DSPOCTWD 

TS 

CYL 


1711 

REF 

267 

LAST 

52a 

07.72^6 

3 

0001 

0 


XCH 

Q 


1712 

REF 

11 

LAST 

52A 

07. 72^ 7 

5 

0106 

0 


TS 

WDRET 


1713 

REF 

33 

LAST 

52A 

07.7230 

3 

0614 

1 


XCH 

DSPCOUNT 


171A 

REF 

13 

LAST 

390 

07.7231 

6 

4501 

1 


AD 

BIT14 

TU BLANK signs 

1715 

REF 

3A 

LAST 

525 

07.7232 

5 

0614 

1 


T5 

DSPCOUNT 


1716 

REF 

13 

LAST 

525 

07.7233 

3 

5502 

0 


CAF 

FOUR 


1717 

ref 

3 

LAST 

52A 

07.723A 

5 

0076 

0 

WDA6AIN 

TS 

WDCNT 


1718 

REF 

20 

LAST 

525 

07.7235 

4 

0022 

0 


cs 

CYL 


1719 

REF 

21 

LAST 

525 

07.7236 

4 

0022 

0 


cs 

CYL 


1720 

REF 

22 

LAST 

525 

07.723/ 

4 

0022 

0 


cs 

CYL 


1721 

REF 

A13 

LAST 

52a 

07.72A0 

4 

0000 

0 


cs 

A 


1722 

REF 

1 



07.72AI 

7 

5362 

1 


MA5< 

D5PMSK 


1723 

REF 

AlA 

LAST 

525 

07.72A2 

2 

0000 

0 


INDEX 

A 


172A 

REF 

A 

LAST 

52a 

07.72A3 

3 

2652 

1 


CAF 

rlltae 


1725 

REF 

12 

LAST 

52A 

07.72AA 

7 

3220 

0 


viAb< 

LOWS 


1726 

REF 

10 

LAST 

525 

07.72A5 

5 

0111 

0 


TS 

CODE 


1727 

REF 

35 

LAST 

525 

07.7246 

3 

0614 

1 


xCH 

DSPCOUNT 


1728 

REF 

6 

LAST 

52A 

07.7247 

5 

0104 

L 


TS 

COUNT 


1729 

REF 

415 

LAST 

525 

07.725U 

1 

0000 

0 


r 

^ 3 

A 

DECREMENT DSPCOUNT EXCEPT AT +0 

1730 

REF 

36 

LAST 

525 

07.7251 

5 

06 1*. 

1 


TS 

DSPCOUNT 


1731 

REF 

20 

LAST 

517 

07.7252 

0 

5720 

1 


TC 

POST JUMP 


1732 

REF 

1 



07.7253 


15434 

0 


CADR 

DSPOCTIN 


1733 

REF 

A 

LAST 

525 

07.725*. 

1 

0076 

1 

OCTBACK 

CCS 

WDCNT 


i73A 

REF 

1 



07.7255 

0 

7234 

0 


TC 

WDAGAIN 

+ 


H8^i)78A YUL SYSTEM FOR AGC4! REVISION 0 Of- PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4* I9fa6 


(MAIN) PAGE 526 


L 


pinball game BUTTONS AND LIGHTS 


1735 

ref 

6 

LAST 

524 

07,7256 

4 

3227 

1 

D5PLV 

CS 

VDl 

1736 

REF 

37 

LAST 

525 

07,725? 

5 

06l4 

1 


ts 

dspcount 

1737 

ref 

12 

LAST 

525 

07 , 7 2 bO 

0 

0106 

0 


tc 

vvURET 

1738 

REF 

11 

LAST 

493 



5362 

D5PM5K 


SEVEN 


Rl73g 

DSP2BIT 

DISPLAYS 

C(A) UPON entry 

AS A 

2 

CHAr OCT BEo 

INNING IN 

R17^0 

LOC 

specified 

IN 

DSPCOUNT BY 

pre 

CYCLING 

RIGHT C(A) 

and using 

R1741 

OF 

THE 5 

CHAR 

OCTAL DISPLAY 






1742 

REF 

33 

LAST 

522 

07,7261 

5 

0020 

0 

DSP2BIT TS 

CYR 

1743 

REF 

268 

LAST 

52 5 

07,7262 

3 

0001 

0 

XCH 

u 

i744 

REF 

13 

LAST 

526 

07,7263 

5 

OlOb 

0 

T5 

wDRET 

1745 

REF 

174 

LAST 

525 

07,726^+ 

3 

4516 

1 

CAF 

ONE 

1746 

REF 

5 

LAST 

525 

07,7265 

5 

0076 

0 

TS 

WDCNT 

1747 

REF 

34 

LAST 

526 

07,7266 

4 

0020 

1 

CS 

CYR 

1748 

REF 

35 

LAST 

526 

07,7267 

4 

0020 

1 

C5 

CYR 

17^9 

REF 

36 

LAST 

526 

07,7270 

3 

0020 

0 

KCH 

CYR 

1750 

REF 

23 

LAST 

525 

07,7271 

5 

0022 

1 

IS 

CYL 

1751 

REF 

2 

LAST 

525 

07,7272 

0 

7241 

1 

TC 

WDAGA 


THE DSP 

the logic 


IN +S 


R1752 

For 

DSPIN PLACE 0/25 

OCT INTO 

CqUnt, 

5 

bit 

Relay 

code 

INTO Code* 

BOTH 

R1753 

ARE 

Destroyed 

. IF 

BIT14 OF COUNT 

IS 1 

t 

sign 

15 blanked 

WITH Left 

CHAR 

R1754 

FOR 

DSPiNi place 

Ovl 

INTO bITll 

OF CODE 

, 2 

INTO 

COUNT, 

PEL ADDRESS OF 

R1755 

DSPTAB 1 

ENTRY 

INTO 

OSREL. 









1756 

REF 

1 





06,7341 



5ETL0C END2DEC 

+ 1 

1757 

ref 

269 

LAST 

526 


06,7341 

3 

0001 

0 

DSPlN 

xch 

Q 


1758 

ref 

3 

LAST 

486 


06,7342 

5 

0112 

0 



TS 

DSEXIT 


1759 

REF 

13 

LAST 

525 


06,7343 

3 

3220 

1 



CAP 

LOWS 


1760 

REF 

7 

LAST 

525 


06 ,7344 

7 

0104 

0 



MASK 

COUNT 


1761 

REF 

24 

LAST 

514 


06,7345 

5 

0021 

1 



TS 

SR 


1762 

REF 

25 

LAST 

526 


06,7346 

3 

0o21 

1 



XCH 

SR 


1763 

REF 

1 




06,7347 

5 

0102 

1 



TS 

DSREL 


1769 

REF 

20 

LAST 

368 


06,7350 

3 

4516 

1 



CAF 

blTl 


1765 

REF 

8 

LAST 

526 


06,7351 

7 

0104 

0 



MASK 

COUNT 


1766 

REF 

416 

LAST 

525 


06,7352 

1 

0000 

0 



CCS 

A 


1767 






06,7353 

0 

7355 

0 



TC 

+ 2 


1768 

REF 

1 




06,7354 

0 

7365 

0 



TC 

DSPINI 

-1 

1769 

REF 

11 

LAST 

525 


06,7355 

3 

Olli 

0 



XCH 

CODE 


1770 

REF 

1 




06,7356 

0 

3212 

0 



TC 

5LEFT5 


1771 

REF 

12 

LAST 

526 


06,7357 

5 

0111 

0 



TS 

CODE 


1772 

REF 

14 

LAST 

525 


06,7360 

3 

4501 

1 



CAF 

blTl4 


17 73 

REF 

9 

LAST 

526 


06 , 7 3b 1 

7 

0104 

0 



MASK 

COUNT 


1779 

REF 

417 

LAST 

526 


06,7362 

1 

0000 

0 



CCS 

A 



USER *5 OWN PAGE NO. 46 

TO BLOCK numerical CHARACteRSi CLEARS, 
AND SIGNS AFTER A COMPLETED DISPLAY. 


left if count is odd 

RIGHT IF count IS EVEN 
DUES NOT USE CYL 


^tl^5»78A YUL SYSTEM FOR AGC<f; HEViSIjN 0 Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4, 1966 (MAIN) PAGE 527 


1 

PINBALL 

GaMc, 

Buttons 

AND lights 





USER’S 

OWN page no* 47 

1115 

REF 

78 

LAST 

521 

06f7363 

3 5503 

1 


CAF 

TWO 

B1T14 a 

1, blank sign 

1776 

REF 

175 

LAST 

526 

0 6 t 7 364 

6 4 516 

1 


AO 

ONE 

BaT14 s 

0, LEAVE sign alone 

17/7 

REF 

10 

LAST 

526 

06 1 7365 

5 0 104 

1 


IS 

COUNT 

+0 INTO 

COUNT FOR right 

AL778 











+1 INTO 

Count for leftisign left alone) 

Ai779 











+3 INTO 

COUNT for Left (TO blank sign) 

1780 





06*7366 

2 0017 

0 

DSPINI 

INHINT 




1781 

REF 

2 

LAST 

526 

0 6 * 7 3 6 7 

2 0102 

0 


INDEX 

DSREL 



17 82 

REF 

89 

LAST 

496 

06,7370 

1 0710 

0 


CCS 

D5PTAB 



1783 





06,7371 

0 73 /3 

1 


TC 

+ 2 

If + 


17 84 

REF 

37 

LAST 

521 

06,7372 

0 3062 

0 


TC 

CCSHOLE 



1785 

REF 

176 

LAST 

527 

06,7373 

6 4516 

1 


AO 

ONE 

IF- 


1 /b6 

REF 

1 



06 ,73/4 

5 0103 

0 


IS 

DSMAG 



1787 

REF 

11 

LAST 

527 

06,7375 

2 0104 

0 


INDEX 

COUNT 



1786 

REF 

1 



06,7376 

7 7422 

0 


MASiC 

DSMSK 



1789 





06,7377 

2 5/77 

1 


EXTEND 




1790 

REF 

13 

LAST 

526 

06,7400 

6 0111 

0 


SJ 

CODE 



1791 

REF 

418 

LAST 

526 

06,7901 

1 0000 

0 


CCS 

A 



1792 

REF 

1 



06,7A02 

0 7406 

1 


TC 

DFRNT 

IF* 


1793 

REF 

38 

LAST 

527 

06 ,7A03 

0 3062 

0 


TC 

CCSriOLE 



1794 

REF 

2 

LAST 

527 

06,7904 

0 7a06 

1 


TC 

DFRNT 

IF- 


1795 

REF 

1 



06,7A05 

0 742U 

0 


TC 

DSLV 

IF -0 


1796 

REF 

12 

LAST 

527 

06 , 7 A 06 

2 0104 

0 

dfrnt 

INDEX 

COUNT 



1797 

REF 

2 

LAST 

527 

06,7407 

4 7422 

0 


C5 

DSMSK 

Mask wITFI 77740 , 76037 , or 75777 

1798 

REF 

2 

LAST 

527 

06,7910 

7 0103 

1 


NA5< 

DSMAG 



1799 

REF 

14 

LAST 

527 

06,7411 

6 0111 

0 


AD 

CODE 



1800 

REF 

419 

LAST 

527 

06,7412 

4 OOOO 

0 


C5 

A 



1801 

ref 

3 

LAST 

527 

06 ,7413 

2 0102 

0 


I NDEX 

DSREL 



1802 

REF 

90 

LAST 

527 

06,7a14 

3 0710 

1 


XCH 

DSPTAB 



1803 

REF 

420 

LAST 

527 

06,7415 

1 0000 

0 


CCS 

A 



1804 

REF 

3 

LAST 

508 

06,7416 

0 6640 

0 


TC 

INCNOUT 



1805 

REF 

39 

LAST 

527 

06,741/ 

0 3062 

0 


TC 

CCSHOLE 



1806 





06,7420 

2 0016 

1 

DSLV 

relint 




1807 

REF 

4 

LAST 

526 

06 ,7421 

0 0112 

0 


TC 

DSEXIT 



l808 





06,7422 

00037 

0 

DSMSK 

dct 

37 



1809 





06,7423 

01740 

0 


Dcr 

1740 



1810 





06,7424 

02000 

0 


dct 

2000 



1811 





06,7425 

03740 

1 


DCT 

3740 




Ri8l2 

R1B13 

For IIDSPIN, 
BITll OF CODE 

PUT ReL 

. 

ADDReSSS 

OF 

dsptab 

entry into a. 

1 In bit 11 OR 0 IN 

1814 

REF 

4 LAST 

52 / 

06,7426 

5 

0102 

1 

llDSPiN T5 

DSREL 

1815 

REF 

79 LAST 

527 

06 *7427 

3 

5503 

1 

caf 

TWO 

1816 

REF 

13 LAST 

527 

06,7430 

5 

0104 

1 

ts 

COUNT 

1817 

REF 

270 LAST 

526 

06,7431 

3 

0001 

0 

XCH 

U 

1818 

REF 

5 LAST 

527 

06, 7432 

5 

0112 

0 

T5 

DSEXIT 

1819 

REF 

2 LAST 

526 

0 6 , 7 4 3 3 

0 

7366 

0 

TC 

DSPINI 
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(MAIN) PAGE bZR 


L 

PINBALL 

Game 

buttons 

AND LIGHTS 





USER'S OWN 

PAGE NO. 48 

1820 

REF 

6 

LAST 

524 

06*7434 

0 7341 

0 

dspoctin 

TC 

DSPIN 

5U USPOCTWD 

OOESNT USE SWCALL 

1821 





06*7435 

3 7437 

0 


caf 

+ 2 



1822 

REF 

17 

LAST 

5 1 6 

06*7436 

0 5723 

1 


TC 

bANi4JUMP 



1823 

REF 

1 



06*7437 

172 54 

1 

ENDSPOCT 

CADR 

OCT BACK 




R1S24 

ospalarm 

finds TC 

nvsubeno in 

ENTREl 

FOR 

nvsub initiated 

ROUTINES. 



R1825 

ABORT 

with OCT 01 

501. 









H1826 

dspalarm 

FINOS TC 

ENDDFJ03 IN 

ENTRET 

for 

KEYBOARD 

INITIATED ROUl INES, 



R1827 

DO rc 

ENTRET. 











1828 

pef 

5 

east 

502 

06*7440 

3 

3147 

0 

CHARALRM 

CAF 

END INST 

alarms which must Do endofjobs 

CoMe 

1329 

REF 

6 

LAST 

523 

06*7441 

5 

0065 

1 


T5 

ENTRET 

Here, allows entret to be temp 

erasable 

1830 

ref 

5 

last 

264 

06*7442 

0 

3233 

0 

DSPALARM 

TC 

FALTON 

TURN ON CHECK FAIL LIGHT. 


1831 

REF 

1 



06*7443 

4 

7447 

0 


C5 

NVSBENDL 



1832 

REF 

8 

LAST 

511 

06*7444 

6 

0065 

1 


AD 

ENTtXiT 



1833 

REF 421 

LAST 

527 

06*7445 

1 

0000 

0 


CCS 

A 



1834 

ref 

9 

LAST 

528 

06 * 7 446 

0 

0065 

1 


TC 

ENTEXIT 

NUT NVSUB INITIATED. 


1835 

REF 

1 



06*7447 

0 

3125 

1 

nvsbendl 

TC 

NV SUBEND 



1836 

REF 

10 

LAST 

528 

06 * 7 450 

0 

0065 

1 


TC 

ENTEXIT 

NUT NVSUB INITIATED, 


1837 

REF 

10 

LAST 

295 

06*7451 

0 

3044 

I 


TC 

ABORT 

NVSUB initiated. 


1638 





06*7452 


01501 

1 


OCT 

01501 




1839 

ref 

22 

LAST 

517 

06*7453 

3 

4504 

1 

FLASHONi 

CAF 

BIT 11 

glts 

here 

THRU 

FLA5H0N (STANDARD LEAD IN) 

1840 

REF 

15 

LAST 

527 

06*7454 

5 

Olll 

0 


T5 

code 





1841 

REF 

1 



06*7455 

3 

7464 

0 


CAF 

FLASHLOC 





1842 

REF 

5 

LAST 

527 

06 * 7456 

5 

0102 

1 


TS 

D5REL 





1843 

REF 

80 

Last 

52 7 

06 * 7 45 7 

3 

5503 

1 


CAF 

TWO 





1844 

REF 

14 

LAST 

527 

06*7A60 

5 

0104 

1 


TS 

COUNT 





1845 

REF 

3 

LAST 

52 7 

06 * 7 46 1 

0 

7366 

0 


TC 

DSPINI 





1846 

REF 

196 

LAST 

525 

06*7462 

3 

5501 

0 

FLASHOF 1 

CAF 

ZERO 

GETS 

HERE 

THRU 

FLAShoFF (STANDARD LEAD IN 

1847 

REF 

2 

LAST 

486 

06*7 463 

0 

7454 

0 


TC 

FLASHONI +1 





1848 





06*7 464 


00011 

1 

FLA5HL0C 

OCT 

ll 






Ri849 

mmchang 

USES 

NOUN 

DISPLAY UNTIL 

enter. 

then 

IT 

USES MODE 

DISP. 


R105O 

IT GOES 

TO MODROUT 

WITH THE 1 

new 

M M CODE IN 

A t 

but not displayed 

IN 

Riesi 

M M LIGI 

HT5. 










1852 

REF 2 

LAST 

503 



07,7273 



SETLOC 

DSP2BIT 

+ 10D 

1853 

REF 1 



07*7273 

0 

7306 0 

MMCHANC 

I TC 

REQMM 


1854 

REF 197 

LAST 

528 

07*7274 

3 

5501 0 



CAP 

ZERO 


1855 

ref 9 

LAST 

521 

07*7275 

3 

0603 1 



XCH 

NOUNREG 


1856 

REF 449 

LAST 

525 

07*7276 

5 

0115 1 



TS 

MPAC 




DEC 4, 
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(MAIN) 


page 629 


AbA67flA 

YUL 

SYS 

lEM FOR A6CA: 

REVISION 

0 

OF PROGRAM 

50LRUM55 BY 

NASA 1021 

L 

pinball 

Game 

Buttons 

i AND LIGHTS 




18S7 

REF 

3 

LAST 

503 

07«7277 

3 

3230 

0 

CAF 

NDl 

laSB 

REF 

38 

LAST 

526 

07 .7300 

5 

061A 

1 

TS 

DSPCOUNT 

1869 

REF 

IA5 

LAST 

519 

07.7301 

0 

565a 

0 

TC 

BANXCALL 

I860 

REF 


LAST 

*t95 

07 t 7302 


LA62i 

1 

CAOR 

28 LANK 

1861 

REF 

A50 

LAST 

528 

07.7303 

3 

0115 

1 

XCH 

MPAC 

I0o2 

REF 

21 

LAST 

525 

07t7309 

0 

5720 

1 

TC 

POSTJUMP 

1863 

REF 

1 



07.7305 


10002 

1 

CAOR 

MODROUra 


USER'S OWN PAGE NO. A9 


GU THRU STANDARu LOC. 


186A 

REF 

271 

LAST 

527 

07 

. 7306 

4 

0001 

1 REQMM 

cs 

Q 

1665 

REF 

12 

LAST 

502 

07 

.7307 

5 

0613 

0 

TS 

REQRET 

1866 

REF 

A 

LAST 

529 

07 

.7310 

3 

3230 

0 

CAF 

NDl 

1867 

REF 

39 

LAST 

529 

07 

.7311 

5 

06l4 

1 

TS 

DSPCOUNT 

186 8 

REF 

198 

LAST 

526 

07 

.7312 

3 

5501 

0 

CAP 

ZERO 

1869 

REF 

10 

LAST 

528 

07 

.7313 

5 

0603 

1 

TS 

NOUNREG 

1870 

REF 

146 

last 

529 

07 

.7314 

0 

5654 

0 

TC 

BANKCALL 

1871 

REF 

5 

LAST 

529 

07 

.7315 


14621 

1 

CAOR 

2bLANK 

1872 

REF 

147 

LAST 

529 

07 

.7316 

0 

5654 

0 

T k. 

BANKCALL 

1873 

REF 

11 

LAST 

502 

07 

.7317 


14000 

1 

CADR 

FLASHON 

ie7A 

REF 

11 

LAST 

528 

07 

.7320 

0 

0065 

1 

TC 

ENTEXIT 


R1875 

VBRUEXEC enters j 

request TO EXEC 

FOR 

ANY address a 

ITH any priority. 



Ri876 

IT DOES 

ENDOFjOB 

after entering 

Rlouest 

.assumes 

PHID 

preloaded into 



R1877 

BITS 

10 

-14 OF 

FIRST REGISTER 

of 

temp 

area, with 

BITl=: 

0 FOR NOVAC, BlTl 



R1878 

= 1 FOR 

FINDVAC) . 

the verb is 

used with 

N0UN=MACHINE ADDRESS TO BE 



R1879 

SPECIFI 

ED, CADR 

jobaddr is punched I 

N. 

DISPLAY 

SYST IS released. 



1880 

ref 

6 

LAST 

528 

07.7321 

3 

3147 

0 

VBRGiEXEC CAF 

ENDINST 



iStil 

REF 

1 



07.7322 

5 

0075 

0 


TS 

PROGREG +2 



1862 

REF 

2 

LAST 

499 

07.7323 

0 

3323 

0 


TC 

RELD5P 



1883 

REF 

21 

LAST 

526 

07.7324 

3 

45 1 6 

1 


CAF 

eiTi 



1884 

REF 

43 

LAST 

434 

07.7325 

7 

0616 

1 


MASK 

DSPTEMl 


1885 

REF 

422 

LAST 

528 

07 .7326 

1 

0000 

0 


CCS 

A 



1886 

REF 

1 



07.7327 

0 

7340 

1 


TC 

SETVAC 

1 F 

BlTl =1. 

1887 

REF 

1 



07.7330 

3 

3223 

1 


CAP 

TCNOVAC 

IF 

6 1 T I - 0 . 

1888 

REF 

2 

LAST 

529 

07.7331 

5 

00 ^3 

0 

REQEXl 

TS 

PROGREG 

TC 

NOV AC OR 

1889 

REF 

35 

LAST 

523 

07.7332 

3 

0624 

1 


XCH 

NOUNADD 



18 90 

REF 

3 

LAST 

529 

07.7333 

5 

0074 

1 


TS 

PROGREG +1 

CrtDR JOBADDR 

1891 

REF 

22 

LAST 

529 

07.7334 

** 

4516 

0 


C5 

BlTl 



1892 

REF 

44 

LAST 

529 

07,7335 

1 

061 6 

1 


MASK 

DSPTEMl 


1893 





07,7336 

2 

0017 

Q 


I MHINI 



1894 

REF 

4 

LAST 

529 

07.7337 

0 

0073 

0 


TC 

PROGREG 



1895 

REF 

2 

LAST 

138 

07.7340 

3 

3226 

1 

SETVAC 

CAF 

TCFINDVC 



1896 

REF 

1 



07.7341 

0 

7331 

1 


TC 

REQEXl 



R1897 

VBRQWA I 

T enters 

Request td waitlist 

For 

ANY address with ANY DELAY, 




FINDVAC 

NOVAC 

TC FINDVAC INTO PROGREG 
INTO PROGREG ♦! 
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R18V8 IT DOES EnDqFJOB AFTEK ENTERING REQUEST , ASSUMES DELAY PKELOADED IN FIRST 

RiR99 Register of temp area, the verb is useD with noun= «iachine address to 


R19O0 

be 

specified. 

CaDr 

TASKADDR 

IS 1 

punched 

IN. display syst 

IS released. 



1901 

REF 

7 

LAST 

529 

07»73‘+2 

3 

31A7 

0 

vbruwait 

CAP 

END! NS T 



1902 

REF 

5 

LAST 

529 

07»73A3 

5 

0075 

0 


IS 

PROGREG +2 

tl endofjob into 

PROGREG+2 

1903 

REF 

3 

LAST 

529 

07i73A9 

0 

3323 

0 


TC 

kELDSP 



190 A 

REF 

2 

LAST 

135 

07t73A5 

3 

3224 

0 


CAP 

TCWAIT 



1905 

REF 

6 

LAST 

530 

07»73Ab 

5 

0073 

0 


T5 

PROGREG 

TL WAITLIST into 

PROGREG 

1906 

REF 

36 

LAST 

529 

07t73A? 

3 

062h 

1 


XCH 

NOUNADD 



1907 

REF 

7 

LAST 

530 

07f 7350 

5 

0074 

1 


T5 

PROGREG +1 

CaDK TASKADDR INTO PROGREG+l 

1908 





07»7351 

2 

0017 

0 


INHINT 




1909 

REF 

A5 

LAST 

529 

07t7352 

3 

061 6 

0 


xch 

DSPTEMl 

Delta t In a 


1910 

REF 

8 

last 

530 

07*7353 

0 

0073 

0 

ENDROWT 

TC 

PROGREG 




1911 

REF 

2 

LAST 

528 


06*7465 

SETLDC 

FLASHLOC +1 



1912 

ref 

177 

LAST 

527 

06 » 7 465 

3 A516 1 VBPROC 

CAF 

ONE 

Proceed without 

DATA 

1913 

REF 

2 

LAST 

513 

06 » 7466 

5 0632 0 

TS 

L0AD5TAT 



1914 

REF 

4 

LAST 

530 

06 f 7 4b 1 

0 3323 0 

TC 

RELDSP 



1915 

REF 

3 

LAST 

497 

06*7470 

0 6003 1 

TC 

PLASHOFF 

See if there is 


1916 

ref 

2 

LAST 

514 

06*74 M 

0 7600 0 

TC 

RECALTST 

ANY recall from eNDIDLE 


1917 

ref 

1 

06 * 7472 

0 3127 

0 VBTERM TC 

kilmonon 

TURN ON KILL Monitor bit 

1918 

ref 178 LAST 530 

06*7473 

4 4516 

0 C5 

ONE 

TERM VERB SETS LOADSTAT NEG 

1919 

REF 

2 LAST 499 

06*7474 

0 7466 

1 TC 

VBPROC +1 

1920 

FLASH 

15 turned off 

only by 

proceed 

without data* TeRMI 

NATE* END oF 

Load 


R1921 

vbreldsp 

' turns off 

release display system 

LIGHT (AND 

Searches list only 


Ri922 

IF 

THIS 

LIGHT WAS 

TURNED DI4 BY 

NVbUBJSY) , 

AND TURNS 

OFF UP ACT LIGHT. 


1923 

REF 

199 

LAST 529 

06*7475 

3 5501 0 VBRELDSP CAP 

ZERO 

Release display syst 

1924 

REF 

16 

LAST 528 

06*7476 

5 0111 0 

T5 

CODE 

Turn off upact light 

1925 

REF 

12 

LAST 526 

06*7477 

3 5362 0 

CAF 

SEVEN 


1926 

REF 

6 

LAST 525 

06*7500 

0 7426 0 

TC 

IIDSPIN 


1927 

REF 

5 

LAST 530 

06*7501 

0 3323 □ 

TC 

RELDSP 

SEARCHES LIST 

1928 

REF 

68 

LAST 523 

06*7502 

0 2124 1 

TC 

endofjob 



R1929 BUMP SHIFTS WORD DISPLAYED IN R2 TO R3t R1 TO R2. IT BLANKS Rl. 



4a4b78A YUL SYSTEM FOR AGC^; KEylSlON 0 OF PROGRAM SOLRUM55 BY 
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1930 

REF 

10 

LAST 

512 

06»?503 

3 

4477 

1 

BUMP 

CAP 

1931 

REF 

AO 

LAST 

529 

06 » 7 5 0 ‘t 

5 

0614 

1 


T5 

1932 

REF 

15 

LAST 

528 

06»750b 

5 

0104 

i 


T5 

1933 

REF 

179 

LAST 

530 

06 ♦ 7506 

3 

4516 

1 


CAF 

193A 

REF 

16 

LAST 

531 

06*7507 

7 

0104 

0 


v|A5< 

193S 

REF 

17 

LAST 

531 

06*7510 

3 

0104 

1 


XCH 

19 36 

REF 

26 

LAST 

526 

06*7511 

5 

0021 

1 


TS 

1937 

REF 

27 

LAST 

531 

06*7512 

3 

0021 

1 


XCH 

1938 

REF 

A23 

LAST 

529 

06 * 75 1 3 

2 

0000 

0 


I NOEX 

1939 

REF 

91 

LAST 

527 

06*751*+ 

1 

0710 

0 


CCS 

19A0 





06.7515 

0 

7517 

0 


TC 

19A1 

REF 

AO 

LAST 

527 

06 * 7 5 1 6 

0 

3062 

0 


TC 

19^2 

REF 

180 

LAST 

531 

06*7517 

6 

4516 

1 


A3 

19A3 

REF 

18 

LAST 

531 

06*7520 

2 

010*+ 

0 


noEx 

i9AA 

REF 

3 

LAST 

527 

06*7521 

7 

7*+22 

0 


MASK 

19 AS 

REF 

19 

LAST 

531 

06*7522 

2 

0104 

0 


INDEX 

19A6 





06*7523 

0 

7524 

0 


TC 

19A7 





06.7524 

0 

7526 

1 


TC 

19A8 

REF 

A 

LAST 

522 

06*752b 

0 

31/4 

0 


TC 

19a9 

REF 

17 

LAST 

530 

06 *7526 

5 

0111 

0 


TS 

19b0 

REF 

11 

LAST 

531 

06.7527 

4 

447 7 

0 


C5 

19S1 

REF 

A1 

LAST 

531 

06*7530 

6 

0614 

1 


A3 

1932 

REF 

A2A 

LAST 

531 

06*7531 

1 

0000 

0 


CCS 

19S3 

ref 

181 

LAST 

531 

06*7532 

6 

4516 

1 


A3 

195A 





06*7533 

0 

7535 

0 


TC 

19S5 

REF 

Al 

LAST 

531 

06 *7 53*+ 

0 

3062 

0 


T C 

1956 

REF 

20 

LAST 

531 

06.7535 

5 

010*+ 

1 


TS 

1957 

ref 

7 

LAST 

528 

06 * 7 b 3fa 

0 

7341 

0 


TC 

1958 

REF 

A2 

LAST 

531 

06*753 r 

4 

06l4 

0 


C5 

1959 

REF 

e 

LAST 

523 

06*7540 

6 

3171 

0 


A3 

1960 

REF 

A25 

LAST 

531 

06*7541 

1 

0000 

0 


CCS 

1961 

REF 

A3 

LAST 

531 

06.7542 

3 

06 1 4 

1 


XCh 

1962 

ref 

182 

LAST 

531 

06*7543 

6 

A5 l6 

1 


A3 

1963 

REF 

2 

LAST 

499 

06*754*+ 

0 

7504 

1 


TC 

196A 

ref 

200 

LAST 

530 

06*7545 

3 

5501 

0 

SWSGN 

CAF 

1965 

REF 

AA 

LAST 

531 

06*7546 

5 

0614 

1 


T 5 

1966 

REF 

1 



06,7547 

6 

7576 

1 


A3 

1967 

REF 

A26 

LAST 

531 

06.7550 

2 

0000 

0 


INDEX 

1968 

ref 

92 

LAST 

531 

06.7551 

1 

0710 

0 


C. 

^ ^ D 

1969 





06.7552 

0 

7554 

1 


TC 

1970 

REF 

A2 

LAST 

531 

06,7553 

0 

3062 

0 


TC 

1971 

REF 

183 

LAST 

531 

06 .7 554 

6 

4516 

1 


A3 

1972 

REF 

23 

LAST 

528 

06 * 7 555 

7 

4504 

0 


MASK 

1973 

REF 

18 

LAST 

531 

06*7556 

5 

on 1 

0 


TS 

197A 

REF 

A5 

LAST 

531 

06*7557 

2 

0614 

0 


INDEX 

1975 

REF 

2 

LAST 

531 

06,7560 

3 

7574 

0 


CAF 

1976 

REF 

7 

LAST 

530 

06*7561 

0 

7426 

0 


TC 

1977 

REF 

A6 

LAST 

531 

06.7562 

4 

0614 

0 


CS 

19 70 

REF 

3 

LAST 

531 

06*7563 

6 

7576 

1 


A3 
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DEC At 1966 
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USER'S OWN page NO. 51 

E 1 vE 

DSPCOUNT 

R2D5 

COUNT 

ONE 

COUNT 

SnlFT DATA OF R2 TO F<3. Rl TO R2 

COUNT 

SR 

SR 

A 

OSPTAB 
+ 2 

CCSHOLE 
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R1991 NVSUB IS USeD FqR SUB RoJllNE CALLS FRQM WITHIN Co'IPJteR* IT CAN BE 
Ri992 USED TO DO ANY THING THE <EYB0ARD CAN CALL. PLACE . . • VVVVVVNNNNNN 
R1993 INTO A. V-S ARE 6 BIT VERB CoDe* N-S i 6 BIT NOUN CODE* 

R199A NV5UB CAN Be USED WITH MACH ADDR TO Be SPeC BY PLACING THE ADDRESS IN 

R1995 MPAC+2 BEFORE THE STANDARD NVSUB CALL. 

R1996 NVSUB RETURNS TO 2+ CALLING LOC AFTER PERFORMING TAS<t IF DISPLAY 

R1997 SYSTEM IS AVAILABLE. THE NEw NOUN AND VERB CODES ARE DISPLAYED. 

Ri99e IF V;S =0* the new NOUN CODE IS DISPLAYED ONLY (RETURN MTH NO FURTHER 
Ri999 ACTION). IF N-5 =o* THE N£w VERB CODE IS DISPLAYED ONLY (RETURN WljH NO 
R2000 FURTHER ACTION) . 

R2001 IT RETURNS TO 1+ CALLING LQC WItHqUT PERFORMING TA5<* IF DISPLAY 
R2002 SYSTEM IS BLOCKED (NOTHING IS DISPLAYED IN THIS CASE). 

R2003 IT DOES TC ABORT (WITH OCT OlbOl) IF IT ENCOUNTERS A DISPLAY PROGRAM 

R2004 ALARM CONDITION BeFORE RETURN TO CALLER. 

R2005 the display SYSTEM IS BLOCKED BY THE DEPRESSION OF ANY 
R2006 KEY* EXCEPT ERROR LIGHT RESET. ALSO BY ENDIDLE. 

r^007 IT IS RELEASED BY SPECIAL VERB = RELEASE DISPLAY* ALL GO TO VERBS* 

R2008 PROCEED WITHOUT DATA* TERMINATE* INITIALIZE EXECUTIVE. 

R2009 RECALL PART OF RECALTST IF ENDIDLE wAS USED* 

R2010 IN RECALTST IF NVSUB INITIATED LOAD AND ENDIDLE WAS NOT USED* 

R2011 VB 5 request EXECUTIVE* VB = REQUEST WAITLIST* 

R2012 MONITOR SET UP. 

R2013 A NVSUB CALL THAT PASSES OSPLOCK ENDS OLD MONITOR. 

R201A DSPLOCK IS THE INTERLOCK FOR USE oF KEYBOARD AND DISPLAY SYSTEM WHICH 

R20i5 LOCKS OUT INTERNAL USE WHENEVER THERE IS EXTERNAL KEYBOARD ACTION, 

R2016 NVSUB IN F/F PLACES 2 + CALLING CaDR INTO NVSBCADR* TC NVSUBEND INTO 

R2017 ENTRET. IT WILL HANDLE A CALL FROM F/F OK, BUT WILL NOT RESTORE BANKREG 








-a. r 


.r(t . ^ ■ If CJII. 


1 ° * , • ' '".ft' 


^ I ' i ■ * k m i 1 


4tt^578A YUL SYblEM FOR AGC4: RLylSlON 0 Ot- P^DGRAM SOLRUMbS BY 


L pinball gaM£ Buttons and lights 


R2O10 

TO : 

ITS ORIGINAL CONTENTS 

0 






2019 

REF 

2 

LAST 

523 



3100 


SETLDC 

2020 

REF 

5 

LAST 

523 

3100 

5 

0110 

1 

NVSUB 

ts 

2021 

REF 

23 

LAST 

498 

3101 

3 

4513 

1 


caf 

2022 

REF 

3 

LAST 

492 

3102 

7 

0645 

1 


MASK 

2023 

REF 

428 

LAST 

532 

3103 

1 

0000 

0 



202A 

REF 

272 

LAST 

529 

3104 

0 

000 i 

0 


TC 

2025 

REF 

273 

LAST 

533 

3105 

3 

0001 

0 


XCH 

2026 

REF 

185 

LAST 

532 

3106 

6 

4516 

1 


AD 

2027 

REF 

11 

LAST 

291 

3107 

5 

0071 

I 


TS 

2028 

REF 

2 

LAST 

530 

3110 

0 

3127 

0 


TC 

2029 

REF 

1 



3111 

3 

3120 

1 

NVSUBCOM 

CAF 

2030 

REF 

45 

LAST 

292 

3112 

3 

0015 

0 


XC-I 

2031 

REF 

9 

LAST 

291 

3U3 

5 

0072 

1 


TS 

2032 

REF 

14 

LAST 

455 

311^ 

0 

5706 

0 


TC 

2033 

REF 

90 

LAST 

291 

3115 

3 

0062 

0 


XCH 

203A 

REF 

1 



3116 

5 

0631 

0 


TS 

2035 

REF 

1 



3117 

0 

6000 

1 


TC 

2036 

REF 

2 

LAST 

497 

3120 


17354 

0 

NV5U8ANK 

CADR 

2037 

REF 

274 

LAST 

533 

3121 

3 

0001 

0 

NVSUBMON 

XCH 

2038 

REF 

186 

LAST 

533 

3122 

6 

4516 

i 


AD 

2039 

REF 

12 

LAST 

533 

3123 

5 

0071 

1 


T5 

20A0 

REF 

1 



312** 

0 

3111 

0 


TC 


20^1 

REF 

2 

LAST 

533 

3125 

3 

0631 

0 NVSUBEND XCH 

2042 

REF 

12 

LAST 

513 

3126 

0 

5662 

0 TC 


2043 

ref 

1 




OT *7354 

SETLDC 

2044 

REf 

1 



07» 7354 

3 

7373 

1 NVSUBl 

CAF 

2045 

REF 

7 

LAST 

528 

07^7355 

5 

0065 

1 

T 5 

2046 

REF 

3 

LAST 

522 

07»7356 

3 

7421 

1 

CAF 

2047 

REF 

6 

LAST 

533 

07t7357 

7 

0110 

0 

MASK 

2046 

REF 

451 

LAST 

529 

07f 7360 


0115 

1 

TS 

2049 

REF 

1 



07»7361 

3 

7422 

i 

CAF 

2050 

REF 

7 

LAST 

533 

07»7362 

7 

0110 

0 

MASK 

2051 

REF 

5 

LAST 

531 

07*7363 

0 

3174 

0 

TC 

2052 

REF 

37 

LAST 

526 

07*7364 

5 

0020 

0 

TS 

2053 

REF 

38 

LAST 

533 

07*7365 

3 

0020 

0 

XCH 

2054 

REF 

452 

LAST 

533 

07*7366 

5 

0116 

1 

15 

2055 

REF 

453 

LAST 

533 

07*7367 

1 

0115 

0 

c 

V. J 

2056 





07*7370 

0 

7374 

0 

TC 

2057 

REF 

454 

LAST 

533 

07*7371 

3 

0116 

1 

XCH 

2058 

REF 

7 

LAST 

512 

07*7372 

0 

6345 

0 

T C 


1021108-021 


DEC A, 1966 


(MAIN) PAGE 533 


USER’S Oi«N page no. 53 


M IDS IX +1 
NVTLMP 

BITA 

DSPLOCK 

A 

0 

Q 

ONE 

TEMOS 

KILMONON 

NV5UBAN< 

BANK.Rt G 

6AN<TEM 

MAKECADR 

ADDRWD 

NVSBCADR 

NVSUBB 

NVSUBl 


IN FIXED FIXED 
BiTA OF state 

DSP SVST BLOCKED. RET TO 1+ CALLING LOC 

Djp syst available 
2 + calling caow into TEMOS 

TURN ON kill monitor BIT 


GO TO NVSUBl THRU STANDARD LOC 

Bank numb of nvsubi 


0 MuNDO comes HERE 

ONE 

TEMOS 

NVSUBCOM 


NVSBCADR 

SWCALL 


ENDRQWT +1 


ENTSET 


IN BANK 

ENTRET 

L0W6 

NVTEMP 


SET RETURN TO NVSUBEND 

MPAC 

M1D6 

NVTEMP 

RIGHTS 

CYR 

CYR 


TtMP STORAGE 

MPAC 

+ 1 

TEMP STORAGE 

MPAC 


TEST NOUN 

+ 4 


IE NOUN NOT +0* 60 ON 

MPAC 

♦ 1 


UPDATVB 

-1 

IF NOUN = +0* DISPLAY VERB . THEN RETURN 


Ab^578A YUL SYSTEM FOR AGC^i HEVlSljN 0 Ol- PROGRAM SQLRUM 55 BY NASA 102110B-021 


Dec a* 1966 


(MAIN) PAGE b3A 


L PINBALL game BUTTONS AND LIGHTS 


USER'S OWN PAGE NO. 54 


2059 

REF 

2 

LAST 

52b 

07*7373 

0 

3125 

1 

entset 

TC 

nvsjbend 


2060 

REF 

455 

LAST 

533 

07* ?374 

1 

0116 

0 


r ^ 

W «iiP p 

MPAC +1 

TEST VERB 

2061 





07*73/5 

0 

7401 

0 


TC 

+ 4 

IF VFKB NOT +0, GO ON 

2062 

REF 

456 

LAST 

534 

07*7376 

3 

0115 

1 


XCH 

MPAC 


2063 

REF 

1 



07*7377 

0 

6326 

0 


TC 

UPDATNN -1 

IF VERB = +0* display NOUN. THEN RETURN 

2064 

REF 

3 

LAST 

534 

07*7400 

0 

3125 

1 


TC 

NVSUBENO 


2065 

REF 

457 

LAST 

534 

07*7401 

3 

0116 

1 


XCH 

MPAC +1 


2066 

REF 

8 

LAST 

533 

07*7402 

0 

6345 

0 


TC 

UPDATVB -1 

IF BOTH NOUN AND VERB NOT +0* DISPLAY 

2067 

REF 

458 

LAST 

534 

07*7403 

3 

0115 

1 


XCH 

MPAC 

BOTH AND GO TO ENTPASO 

2068 

REF 

2 

LAST 

534 

07*7 4 O 4 

0 

6326 

0 


TC 

UPDATNN -1 


2069 

ref 

5 

LAST 

506 

07*7405 

1 

0054 

1 


CCS 

NNADTEM 

NOUN TABLES WERE READ IN UPDATNN. 

20 JO 





07 ♦ 7406 

0 

7411 

1 


TC 

♦ 3 

NURMAL 

2071 

REF 

13 

last 

514 

07*7407 

0 

6356 

1 


TC 

GODSPALM 

NOUN NOT IN USE 

20 T2 

REF 

1 



07*7410 

0 

7416 

0 


1 C 

MATBSUB 


20 73 

REF 

201 

LAST 

531 

07*7411 

3 

5501 

0 

NVSUB2 

CAF 

ZtRO 


2074 

REF 

3 

LAST 

530 

07*7412 

5 

0632 

0 


T5 

loaostat 

Set for waiting for DATA CONDITION 

2075 

REF 

13 

LAST 

513 

07*7413 

5 

0633 

1 


TS 

CLPASS 


20751 

REF 

13 

LAST 

529 

07*7414 

5 

0613 

0 


T5 

REGRET 

SET REGRET FOR PASS 0 , 

2076 

REF 

3 

LAST 

497 

07*7415 

0 

6035 

1 


TC 

ENTPASO 


2077 

ref 

459 

last 

534 

07 * 7 4 1 6 

3 

0117 

0 

matbsub 

XCH 

MPAC +2 

NVSUB CALL left ADDreS FOR MATBS IN 

2078 

REF 

37 

LAST 

530 

07*7417 

5 

0624 

1 


TS 

NOUNADD 

MPAC* 2. 

2079 

REF 

1 



07*7420 

0 

7411 

1 


TC 

NVSUB2 



2080 





07 * 7 42 1 

00077 

1 

L0W6 

OCT 

77 





2081 





07*7422 

07700 

1 

MID6 

OCT 

7700 





2082 

REF 

4 

LAST 

534 


3127 


SETLOC 

NVSUBENO +2 

FORCE BIT 15 

OF 

MONSAVEL 


2083 

REF 

25 

LAST 

523 

3127 

4 4500 

1 

KILMONON 

C5 

bITl5 

TO 1, 

2084 





3130 

2 0017 

0 


INHINT 


THIS 

IS 

THE KILL 

monitor bit. 

2085 

REF 

7 

LAST 

523 

3131 

7 0626 

1 


MAS< 

MONSAVEl 





2086 

REF 

26 

LAST 

534 

3132 

6 4500 

0 


AD 

B1T15 





2087 

REF 

8 

LAST 

534 

3133 

5 0626 

0 


TS 

MONSAVEl 





2088 





3134 

2 0016 

1 


RELINT 






2089 

REF 

275 

LAST 

533 

3135 

0 0001 

0 


TC 

0 






R2090 LOADSTAT +0 INACT 1 VE ( WAI T I NG FOR DaTA). SET BY NVSjB 
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Save dspcount 


RESTORE dspcount 


NORMAL EXIT IF KEYBOARD INITIATED 

-0, CONCLUSION OF NVSUB INITIATED LOAD. 
+U INTO CAORSTORt RELEASE DISPLAY, 

AND ENDOFJOB, NEEDED FOR DATAWAIT. 


♦ PROCEED WITHOUT DATA 
PaTHALOGICAL CASE EXIT 
TERMINATE 


LuC IS - FOR BASIC JOBS 


‘♦d^bTflA YUL SYSTEM FOR AGC<f; REVISION 0 OE PROGRAM SOLRUMSS BY NASA 102110e-021 


DEC A, 1966 


(MAIN) page S37 



pinball 

Game 

Buttons 

AND L IGNIS 





USER’S OWN PAGE NO. 

2173 

REF 

30 

LAST 

536 

06»7622 

5 

0120 

1 


T5 

LOC 


217A 





0 6 * 762 3 

2 

O0l6 

1 


REtlNT 



2175 

REF 

2 

LAST 

521 

06 t 7 62‘* 

0 

3356 

1 

RECAL3 

TC 

reldspi 

Dues NOT SEARCH LIST 

2176 

REF 

72 

last 

536 

06»7625 

0 

212A 

1 


TC 

ENDUFJOB 


21 n 

REF 

203 

LAST 

536 

06*7626 

3 

5501 

0 

DOTERM 

CAP 

ZERO 


2178 

REF 

1 



06*7627 

0 

7617 

0 


TC 

RECAL2 


2179 

REF 

167 

LAST 

533 

06*7 630 

A 

A5 1 6 

0 

DOPROC 

C5 

ONE 


2180 

REF 

2 

LAST 

537 

06*763i 

0 

7617 

0 


TC 

RECAL2 



^8^578A YUL SYSTtM FDR AGC4; REVISION 0 OF PROGRAM SOLRUM55 BV NASA 1021106-021 


DEC A, 1966 


(MAIN) page 538 


L PINBALL Game Buttons and lights 

P2ia2 THE following REFeRS TO THE NOUN TABLES 


2183 

REF 2 LAST A97 

07t7A3l 

R216A 

COMPONENT CODE NUMBER 

interpretat 

R2185 

00000 

1 COMPONENT 

R2186 

OOOOl 

2 COMPONENT 

R2187 

OOOlO 

3 COMPONENT 


USER’S OWN PAGE NO. 58 

SETLOC DSPMMl +6 
ON 

(EACH 5 P) 

(EACH SP) 


R2188 SF routine COdE NuMBER 


interpretation 


R2169 

R2190 

R2191 

K2192 

R2193 

R219A 

R2195 

R2196 

R2197 


00000 octal only 

00001 straight fractional 

00010 DEGREES (XXX. XX) 

00011 arithmetic SF 

00100 ARITH dpi OUT(viuuT by 2/IA at END) 

00101 ARITH DP2 out (STRAIGHT) 

00110 OPTICS DEGREES(Xx.xXX max 89.999) OR 

00111 ARITH DP3 OUT ( bL 7 AT END) 

END OF SF ROUTINE CODE NUMBERS 


in(straight) 

1N(SL 7 AT END) 
(XXX. XX MAX 179.99) 
IN ( STRAIGHT) 


R2198 

SF CONSTANT CoOe NJMBeR 

INTERPRETATION 

R2199 

00000 

WHOLE 

K2200 

00000 

TIME 5EC(XXX.XX)SAME AS KHOLE(ARITH DPI) 

R2201 

OOOOl 

TIME HOURS(XXX.XX) USE ARITH DP2 

R2202 

OOOlO 

DEGREES 

R2203 

00010 

OPTICS DEGREES 

R220A 

OOOll 

GYRO OEGREES(XX.XXX) USE ARITH DPI 

R2205 

00100 

GYRO BIAS DRIFT .S3XXXXX MILLIRAD/SEC 

R22U6 

00101 

GYRO AXIS ACCEL. DRIFT 

R2207 

R22U8 

00110 

.bBXXXXX (MILLIHAO/SEC) / (CM/SEC SEC) 
PIPA BIAS X.XXXX CM/SEC SEC 

R2209 

OOlll 

PIPA SCALE FACTOR ERROR 

R2210 

R2211 

01000 

XXXXX, PARTS/MILLION 

POSITION(XXXX.X KILOMETERS) USE ARITHDP3 

R2212 

OlOOl 

VELOCITY (XXXX.X METERS/SEC) USE ARITHDP2 

R22i3 

01010 

TIME HOURS(XXX.XX) WEExS I hSl OE ( AR ITHDP2) 

R221A 

OlOll 

ELEVATION DEGREES(89.999MAX) USE ARITH 

R221A1 

01 LOO 

VG FDR 50l (XXXX.X MET/SEC) USE ARITH 

R2215 

end OF SF CONSTANT CODE 

N JMbERS 


I . 



4 I 












i-. " J. viv Ar. 
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T 
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YUL SYSTtM FOR AGC^ ; REVISION 0 OF PROGRAM SOLRUM 55 BY NASA 1021108-021 


OEC l9t6 


(MAIN) PAGE b39 


L PINBALL Game Buttons and lights user’s o^n page no. 

R 22 i 6 For greater than single precision scales, put address of major part into 

K22i7 NOUN TABLES. 

R2218 OCTAL LOADS PLACE +0 INTO MAJOR PART* DATA INTO MINjR PART. 

R2219 OCTAL DISPLAYS SHOW MINOR PART ONLY, 

R2220 TO get AT BOTH MAJOR AND MINOR PARTS (IN OCTAL)* JSe NOUN 01. 


59 


^t6Ab7eA YUL 5Y5TtM FDR AqcA; REVISION 0 OF PROGRAM 50LRUM55 BY NASA 1021108-021 


DEC ^1 


1 9fa6 


(MAIN) page 5^0 


L PINBALL GAMt BUTTONS AND LIGHTS 

P2221 THE Following routines are for reading the noun tables and the sf tables 

R2222 (WHICH ARE IN A SEPARATE BANK FROM 7 HE REST OF PINBALL). THESf READING 
R2223 routines ARE IN THE SAME BAuK AS tHe TABLES. THEY ARE CALLED BY SwCALL, 


R222A LODNNTAB LOADS NNADTEM wIth THE NnAuTAB ENTRY* NNTYPTEM WITH THE 

R2225 NNTYPTAB FNTRY. IF THE NDJN IS MixED, IUADITEM IS LDADED wITH THE FIRST 

R2226 IDADDTAB eNtRY* IDAD2TEM THE SECOND lOADDTAB ENTRY* 1DAD3TEM THe THIRD 


R2227 

IDADDTAB 

entry. MIXBR 

IS SET 

FOR 

MIXED 

OR NORMAL 

NDJN. 


2226 

REF 

1 




05,7153 


SErUDC 

endextvs 

2229 

REF 

278 

LAST 

535 

05*7153 

3 

0001 

0 

LODNNTAB 

xCh 

0 

2230 

REF 

1 



05*7154 

5 

0060 

1 


T5 

iDAD3TEM 

2231 

REF 

11 

LAST 

529 

05*7155 

2 

0603 

0 


INDEX 

NO U NR EG 

2232 

REF 

I 



05*7156 

3 

7231 

0 


CAF 

NNADTAB 

2233 

REF 

6 

LAST 

534 

05* 715 ? 

5 

0054 

0 


TS 

NNADTEM 

223A 

REF 

12 

Last 

540 

05*7160 

2 

0603 

0 


INDEX 

NOUNREG 

2235 

REF 

1 



05*7161 

3 

7331 

1 


caf 

NNTYPTAB 

2236 

REF 

5 

LAST 

515 

05*71 62 

5 

0055 

1 


TS 

NNTYPTEM 

2237 

REF 

13 

LAST 

540 

05*7163 

4 

0603 

0 


C5 

NOUNREG 

2238 

REF 

1 



05 * 7 1 64 

6 

7167 

0 


AD 

MIXCON 

2239 

REF 

430 

LAST 

536 

05*7165 

1 

0000 

0 


CCS 

A 

22H0 

REF 

1 



05*7166 

0 

7210 

0 


TC 

LODNORM 

22A1 





05*7167 

00055 

1 

MIXCON 

DCT 

55 

22A2 





05 * 7170 

0 

7171 

1 


TC 

+ 1 

22A3 

REF 

82 

LAST 

536 

05*7171 

3 

5503 

1 

LODMIXNN 

caf 

TWO 

224A 

REF 

12 

LAST 

519 

05*7172 

5 

0107 

1 


T5 

MIXBR 

2245 

REF 

18 

Last 

515 

05*7173 

3 

4606 

0 


CAP 

LOWIO 

2246 

REF 

7 

last 

540 

05*7174 

7 

0054 

1 


MASK 

NNADTEM 

2247 

REF 

279 

LAST 

540 

05*7175 

5 

0001 

0 


TS 

Q 

2248 

REF 

431 

LAST 

5A0 

05*7176 

2 

oooo 

0 


index 

A 

2249 

REF 

1 



05*7177 

3 

7515 

1 


CAF 

IDADDTAB 

2250 

REF 

5 

LAST 

515 

05*7200 

5 

0056 

1 


IS 

IDADlTEM 

2251 

REF 

280 

LAST 

540 

05*7201 

2 

OoOl 

1 


INDEX 

Q 

2252 

REF 

2 

LAST 

5A0 

05*7202 

3 

7516 

1 


caf 

IDADDTAB 

2253 

REF 

1 



05*7203 

5 

0057 

0 


15 

IDAD2TEM 

2254 

REF 

281 

LAST 

540 

05*7204 

2 

OOGi 

1 


index 

0 

2255 

ref 

3 

LAST 

540 

05*7205 

3 

7517 

.0 


CAF 

IDADDTAB 

2256 

ref 

2 

LAST 

540 

05,7206 

3 

0060 

1 

LODNLV 

XCH 

IDAD3TEM 

2257 

REF 

432 

LAST 

540 

05*7207 

0 

0000 

i 


TC 

A 

2258 

REF 

188 

LAST 

537 

05*7210 

3 

4516 

1 

LODNORM 

CAF 

ONE 

2259 

REF 

13 

LAST 

540 

05*7211 

5 

0107 

1 


T5 

MIXBR 

2260 

REF 

1 



05*7212 

0 

7206 

1 


TC 

LOUNLV 


R2261 GT5F0UT LOADS SFTeMPI* SFTEMP^ WITH THE DP 5F0UTAB ENTRIES. 



USER’S OWN page no. 60 


Save RETURN ADDRESS IN IDADoTEM 


NOUN L/ FIRST MIXED NOUN 
FiRST MIXED NOUN = S5. 

NOUN G/E FIRST MIXED NOUN 

loADDREL INTO Q 

LOAD IDADlTEM WITH FIRST IDADDTAB ENTRY. 

LOAD IDAD2TEM WITH 2ND IDADDTAB ENTRY. 

LOAD IDAD3TEM WITH 3RD IDADDTAB ENTRY, 
PUT RETURN ADOESS INTO A, 


i 1 ' 


C 


J 




^d^5>78A YUL SYSTEM FOR AGC^; REvISIjN 0 OF PROGRAM SOLRUMS5 BY NASA 1021108-021 


DEC A » 1966 


(MAIN) PAgE: SAV 


L 

pinball 

Game 

Buttons 

AND LIGHTS 




user*s own page 

NO, 61 

2262 

REF 

11 

LAST 

519 

05 t 72 1 3 

2 

0111 

1 GTSFOUT 

imoex 

SFTEMP2 

Sh CONUM ARRIVES 

IN SFTEMP2. 

2263 

PEF 

1 



05,72lA 

3 

7a63 

1 

caf 

SFOUTABl 



2 2 6A 

REF 

20 

LAST 

519 

05,7215 

5 

Olio 

1 

is 

SFTLMpl 



2265 

REF 

12 

LAST 

5Al 

05,7216 

2 

011 1 

1 

IMDEx 

SFTEMP2 



2266 

REF 

1 



05,7217 

3 

7500 

0 

caf 

SF0UTAB2 



2267 

REF 

13 

LAST 

5A1 

05,7220 

5 

Oill 

0 

TS 

SFTEMP2 



2268 

REF 

282 

LAST 

5A0 

05,7221 

0 

0001 

0 

TC 

Cl 




R2269 

gtsfin 

loads 

SFTEMPl 

, SFTEMP2 

WiTh THE 

UP SFINTAB ENTRIES. 


2270 

REF 

lA 

LAST 

541 

05,7222 

2 

0111 

1 

GTSFIN INDEX 

SFTEMP2 

SF CONUM ARRIVES IN 5FTEMP2. 

2271 

REF 

1 



05,7223 

3 

7431 

0 

caf 

5F INTaBL 


2272 

REF 

21 

LAST 

5Al 

05,7224 

5 

Olio 

1 

TS 

SFTEMPl 


2273 

REF 

15 

LAST 

5A1 

05,7225 

2 

Olll 

1 

INDEX 

SFTEMP2 


227A 

REF 

1 



05,7226 

3 

7AA6 

0 

CAF 

SF INTAB2 


2275 

REF 

16 

LAST 

5Al 

05,7227 

5 

0111 

0 

TS 

SFTEMP2 


2276 

REF 

283 

LAST 

5Al 

05,7230 

0 

0001 

0 

TC 

Q 



A2277 










Nn 

normal nouns 


22 78 





05,7231 

00000 

1 nnadtab 

DCT 

00000 

ou 

NOT IN USE 


22 79 





05,7232 

40000 

0 

OCT 

40000 

01 

SPECIFY MACHINE ADDRESS 

(FRACTIONAL) 

22BO 





05,7233 

4000U 

0 

DCT 

40000 

02 

SPECIFY MACHINE ADDRESS 

(WHOLE) 

22 8 1 





05,7 2 3*+ 

40000 

0 

DCT 

40000 

03 

SPECIFY MACHINE ADDRESS 

(DEGREES) 

2282 





05,7235 

40000 

0 

DCT 

40000 

04 

SPECIFY MACHINE ADDRESS 

(HOURS) 

22tt3 





05,7236 

40000 

0 

DCT 

40000 

05 

SPECIFY MACHINE ADDRESS 

(SECONDS) 

2284 





05,7237 

40000 

0 

DCT 

40000 

06 

specify machine address 

(GYRO DEG) 

2285 





05,7240 

40000 

0 

DCT 

40000 

Of 

SPECIFY MACHINE ADDRESS 

(Y OPT DEG.) 

2286 





05,7241 

OOOOU 

1 

DCT 

00000 

10 

SPARE 


2287 





05,7242 

OOOOQ 

1 

DCT 

00000 

u 

SPARE 


2288 





05,7243 

00000 

1 

DCT 

00000 

12 

SPARE 


2289 





05,7 244 

00000 

1 

DCT 

00000 

13 

spare 


2290 





05,7245 

00000 

1 

OCT 

00000 

14 

SPARE 


2291 





05,7246 

77777 

0 

DCT 

77777 

15 

increment machine address 

2292 





05,7247 

00035 

i 

DCT 

00035 

16 

TIME SECONDS 


2293 





05,7250 

00035 

1 

DCT 

00035 

1? 

TIME HOURS 


2294 

REF 

18 

LAST 

409 

05,7251 

00047 

1 

ADRE5 

CDUX 

20 

ICDU 


2295 

REF 

13 

LAST 

456 

05,7252 

00044 

1 

ADRES 

PIPAX 

21 

PI PAS 


2296 

REF 

19 

LAST 

469 

05,7253 

00700 

0 

ADRE5 

thetad 

22 

NEW angles I 


2297 

REF 

13 

LAST 

453 

05,7254 

00621 

1 

ADRES 

DSPTEM2 

23 

delta angles I 


2298 

REF 

46 

LAST 

530 

05,7255 

00616 

0 

ADRES 

DSPTEMl 

24 

DELTA TIME (SEC) 


2299 

ref 

47 

LAST 

541 

05,7256 

006l6 

□ 

ADRES 

DSPTEMl 

25 

checklist 


2300 

REF 

48 

LAST 

541 

05,7257 

006l6 

0 

ADRES 

DSPTEMl 

2u 

PR 10/DELAY 


2301 

REF 

B 

LAST 

284 

05,7260 

01762 

0 

ADRES 

smode 

27 

SELF. TEST ON/OFF SWITCH 


2302 

REF 

49 

LAST 

541 

05,7261 

00616 

0 

ADRES 

DSPTEMl 

30 

STAR NUMBERS 


2 303 

REF 

10 

LAST 

493 

05,7262 

01763 

1 

ADRES 

failreg 

31 

FAILREG, SFAIL, ERCOUNT 


2304 

REF 

7 

LAST 

330 

05 ,7263 

01266 

1 

ADRES 

TDLC 

32 

DECISION TIME (MIDCOURSEJ 


^b^578A YUL SYSTEM FOR AGC4; REVISION 0 OF PROGRAM SqLRUMSS bY 


L PINBALL Game buttons and lights 


2305 

REF 

4 

last 

32a 

05 

2306 

REF 

1 



05 

2307 

REF 

1 



05 

2308 

REF 

1 



05 

2309 

REF 

2 

LAST 

542 

05 

2310 

REF 

50 

LAST 

541 

05 

2311 





05 

2312 





05 

2313 





05 

2314 





05 

2315 





05 

2316 





05 

2317 





05 

2318 





05 

2319 





05 

2320 

REF 

3 

LAST 

222 

05 

2321 

ref 

2 

LAST 

216 

05 

2322 

ref 

2 

LAST 

21b 

05 

A2323 






2324 





05 

2325 





05 

2326 





05 

2327 





05 

232B 





05 

2329 





05 

2 330 





05 

2331 





05 

2332 





05 

A2333 






2334 





05 

2335 





05 

2336 





05 

2337 





05 

2336 





05 

2339 





05 

2340 





05 

2341 





05 

2342 





05 

2343 





05 


A2 344 


2345 

05 

2346 

05 

2347 

05 

2348 

05 

2349 

05 

2350 

05 


7264 

01146 

0 

ADRES 

7265 

01276 

0 

A3RES 

7266 

01314 

0 

ADRES 

7267 

00616 

0 

ADRES 

7270 

00621 

1 

A3RES 

7271 

006 1 6 

0 

AORES 

7272 

OOOOO 

I 

OCT 

72 73 

OOOOO 

1 

DCT 

7274 

OOOOO 

1 

OCT 

7275 

OOOOO 

1 

DCT 

7276 

OOOOO 

1 

ocr 

7277 

OOOOO 

1 

OCT 

730D 

OOOOO 

1 

OCT 

7301 

OOOOO 

1 

OCT 

7 302 

OOOOO 

1 

OCT 

7303 

00744 

0 

A0RE5 

7304 

00747 

0 

A0RE5 

7305 

00752 

1 

A0RE5 


7 306 

02000 

0 

OCT 

730 I 

04002 

1 

OCT 

7310 

02005 

0 

OCT 

7311 

04007 

1 

OCT 

7312 

02012 

0 

OCT 

7313 

04062 

1 

ocr 

7314 

02016 

1 

OCT 

7315 

02020 

1 

ocr 

7316 

02022 

0 

OCT 

7317 

04024 

0 

OCT 

7320 

0402 7 

0 

DCT 

7321 

04032 

1 

OCT 

7322 

04035 

0 

OCT 

7323 

04040 

i 

OCT 

7324 

04043 

1 

OCT 

7325 

04046 

1 

OCT 

7 326 

04051 

1 

OCT 

7327 

04054 

1 

ocr 

7330 

04057 

1 

ocr 


»7331 

OOOOO 

1 

NNTYPTAB OCT 

»7 332 

00040 

0 

DCT 

♦ 7333 

00140 

1 

OCT 

*7334 

00102 

1 

OCT 

♦ 7335 

00241 

0 

OCT 

♦ 7 336 

00200 

0 

OCT 


1 ■? c 0 ' C 

• J 


i 


* 


(MAIN) PAGE 5A2 


NASA 1021106 


TLT 

MEASO 

ROLL 

LANDMARK 

LANDMARK +3 

DSPTEN'l 

OOOOO 

00000 

OOOOO 

OOOOO 

OOOOO 

OOOOO 

OOOOO 

OOOOO 

OOOOO 

GblASX 

ADIAX 

A05RAX 


02000 
0A002 
02005 
0AO07 
02012 
0 A 0 6 2 
02016 
02020 
02022 

0A02A 

OA027 

04032 

04035 

04040 

04043 

04046 

04051 

04054 

04057 


OOOOO 

00040 

00140 

00102 

00241 

00200 


021 


DEC 4, 1966 


UStR»5 OWN PAGE NO. 62 

33 EPHEMERIS T I ME (MIDCOURSE J 

34 measured quantity (MIOCouRSe) 

35 HOLLi PITCH, YAW 
3b landmark data I 
31 LANDMARK DATA 2 

40 VG FOR 501 

41 SPARE 

42 SPARE 

43 spare 

44 spare 

45 SPARE 

46 SPARE 

47 SPARE 

50 SPARE 

51 SPARE 

52 GYRO BIAS ORlFT 

53 GYRO INPUT AXIS ACCELERATION DRIFT 

5h gyro Spin axis acceleration drift 

NN MIXED NOUNS 

55 OCDU 

56 uncalled mark DATA (OCDU 6 TIME (SEC)) 

57 NEW angles OCDU 

60 IMU MODE status 

61 target azimuth and elevation 

62 RE-ENTRY VARIABLES 
6 3 QCDUX Af4D TIME (SEC) 

64 OCDUY AND TIME (SEC) 

65 sampled time (HOURS AND SECONDS) 

(FETCHED IN INTERRUPT) 

66 SYSTEM test RESULTS 

67 DELTA GYRO ANGLES 

70 PIPA BIAS 

71 PIPA SCALE factor ERROR 

72 DELTA POSITION 

73 DELTA VELOCITY 

74 MEASUREMENT DATA (MIDCOURSE) 

75 measurement DEVIATIONS (MIOCOURSE) 

7b POSITION VECTOR 

77 VELOCITY VECTOR 


NiM NORMAL NOUNS 

00 NOT IN USE 

01 icoMP fractional 

Ok ICOMP WHOLE 

03 ICOMP degrees 

04 ICOMP hours 

05 ICOMP SECONDS 


45^'376A YUL SYSTEM FOR AGC^f! REVISION 0 01- PROGRAM SOLRUMSS BY 


L 


PINBALL GAME 


Buttons ano lights 


23S1 

05»7337 

00203 

0 

OCT 

23S2 

05,73‘tO 

00302 

0 

OCT 

23S3 

05i7391 

OOOOO 

1 

OCT 

23SA 

05,7392 

00000 

1 

OCT 

2355 

05»7393 

OOOOO 

1 

OCT 

2356 

05 , 7399 

OOOOO 

1 

OCT 

2357 

05^7395 

OOOOO 

1 

OCT 

2358 

05*7396 

OOOOO 

1 

OCT 

2 359 

05 ,7397 

00200 

0 

OCT 

2360 

05 ,7350 

00291 

0 

OCT 

23b 1 

05,7351 

09102 

0 

OCT 

2 362 

05,7352 

09190 

0 

OCT 

23o3 

05,7353 

09102 

0 

OCT 

2369 

05,7359 

09102 

0 

DC? 

2365 

05,7355 

00200 

0 

OCT 

2366 

05,7356 

00190 

1 

OCT 

2367 

05 ,7357 

00190 

1 

OCT 

2368 

05,7360 

00190 

1 

OCT 

2369 

05,7361 

09190 

0 

OCT 

2370 

05,7 362 

09000 

0 

OCT 

2371 

05,7363 

00252 

1 

OCT 

2372 

05,7369 

00252 

1 

OCT 

2373 

05 , 7365 

00350 

1 

OCT 

2379 

05 » 7 366 

09102 

0 

OCT 

2375 

05,7367 

09000 

0 

OCT 

2376 

05,7370 

09000 

0 

OCT 

2377 

05,7371 

09159 

0 

OCT 

2378 

05,7372 

OOOOO 

1 

OCT 

2379 

05,7373 

OOOOO 

1 

OCT 

2380 

05,7379 

OOOOO 

1 

OCT 

2361 

05,7375 

OOOOO 

1 

OCT 

2382 

05,7376 

OOOOO 

1 

OCT 

2383 

05,7377 

OOOOO 

1 

OCT 

2389 

05,7900 

ooooo 

1 

OCT 

2385 

05,7901 

OOOOO 

1 

OCT 

2386 

05,7902 

OOOOO 

1 

OCT 

2387 

05,7903 

09199 

1 

OCT 

2388 

05 , 7 909 

09195 

0 

OCT 

2389 

05,7 905 

09195 
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2 

0017 

0 
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12 

LAST 

598 
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TURN ON Release display syst light 
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2592 

REF 
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590 

32/6 

1 

0000 

0 


CCS 

A 
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REF 
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DSPLOCK = 0» RETURN TO L+2 

2595 



3301 

0 

0001 

0 


TC 

1 


*♦8^5378^ YUL SYSTEM FOR A 6 C<i^! REVISION o 08 PROGRAM SOLRUM 55 6 Y NASA 1021108-021 


1966 


(MAIN) 


PAGE 5A9 


L 

P 2 5 96 
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R2612 

R2613 
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R2615 
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R2617 

R26i8 

R2619 


R2620 

R2621 

R2622 


R2623 

R262A 

R2625 

R2626 
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DeC it t 


pinball Game buttons and lights user»s own page no. 69 

internal routines that use THe keyboard and DISPLAY SYSTEM(THRU 

NVSUB) MUST TC GRADDSP 3LF0REHAND , TO GRAB THE DISPLAY SYSTEM AND 
make IT BUSY TO OTHER INTERNAL USeRS* 

when finished , there must be a TC freedsp » TO Release the 

SYSTEM FOR OTHER INTERNAL USERS. 

the calling sequences are 

L TC GrABDSP 

L+l RETURN Here when system is already grabbed 

L+2 RETURN HERE MEANS YOU HAVE IT 

L TC NVSUB 

L*l RETURN Here IF OPERATOR HAS INTERVENED 

L+2 RETURN HeRE AFTER EXECUTION 


A routine called grabusy is Provided (use is optional) to put your 

JOB TO SLEEP UNTIL THE SrSTEM IS FREED BY THE JOB HOLDING IT. 

YoUR CADR IS PUT AT FIRST AVAILABLE SLOT IN A WAITING LISt (FIFO). 

THE calling sequence IS 
CAF WAKECADR 

TC GRABUSY 

A Routine called nvsubusy is provided (use is optional) to put 

YOUR JOB to sleep UNTIL THE OPERATOR RELEASES IT. YOJR CADR IS PUT 
ON TOP OF A waiting LIST (FIFO). IT AlSO TURNS ON <EY RELEASE LIGHT. 

THE CALLING SEQUENCE IS 
CAF WAKECADR 
TC nvsubusy 


after A TC freedsp* THe Internal interlock is kept busy for lo seconds. 

AFTER WHICH A CADR IS CALLED FROM THE LIST. THIS INSURES THAT ALL 
DISPLAYS WAITING WILL BE VISIBLE. 


GRABLOCK IS THE INTERNAL INTERLOCK FOR THe USE QP THE KEYBOARD 
AND display SYSTEM. 

♦0 FREE 

+1 SOME INTERNAL ROUTINE HAS GRABBED DSP SYST 
*2 SOME INTERNAL ROUTINE HAS GONE TO NVSUBUSY 
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2643 
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TC 

2651 

ref 

3 

LAST 

550 

07,7447 

1 

0113 

0 


CCS 

2652 





07,7450 

0 

7442 
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TC 

2653 
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1 
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0 
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1 


TC 
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ref 

3 

LAST 
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07,7452 
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0114 

0 

PUTINLST 

XCH 

2655 

REF 

4 

LAST 

550 

07 * 745 3 
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0113 

0 


INDEX 

2656 

REF 

5 

LAST 

550 

07*7454 

5 

0634 
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T5 

2657 

REF 

19 

LAST 

535 

07,7455 

0 

2127 
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TC 
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REF 

2 

LAST 
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3315 


SETLDC 
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ref 

1 



3315 

4 3322 0 

PRENVBSY 

C5 
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ref 
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LAST 

550 

3316 

6 0001 0 


AD 

2661 

ref 
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LAST 

550 

3317 

6 0015 0 


AD 

2662 

REF 

24 
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550 

3320 

0 5720 1 

NVSUBUSY 

TC 
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CADR 
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6K + 3 

DCT 
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SETLDC 
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GRABLOC< 

Q 

ONE 

GRABLOC< 

Q 


1 


gkabbed. return to L+1 

NOT grabbed, set TO +l 

And return to L+2 


LOWIO special entrance for routines in banks 

Q DtSIRING the CADR OF I ♦ (LOC FROM WHICH 

BANKREG TO PREGBSy WAS DONE) TO BE ENTERED, 

POSTJUMP 

GHABUSYB 

ENDSPMMl +l 


CADRTEM 

GRABLOCK 

♦ 3 

CADRTEM 
BANKJUMP 
T WO 

LSTPTR 

LSTPTR 

DSPLIST 

+ 2 

PUTINL5T 

LSTPTR 

-6 

LSTFULL 

CADRTEM 

LSTPTR 

DSPLIST 

JOBSLEEP 


STILL grabbed 

Nut grabbed SO DO DIRECT CALL 


Search list for first available space 

FROM BOTTOM, 

SPACE FOUND 

decrement pointer 


GRABUSY *2 
6K + 3 
0 

6ANKREG 

POSTJUMP 

NVSJBSYB 

6003 


SPECIAL entrance FOR ROUTINES IN BANKS 
DlSIRING the CADR OF (LOC FROM WHICH THE 
TL PRENVbSY WAS DONE) -2 TO BE ENTERED, 


To PRENVbSY WAS DONE) -2 TO BE ENTERED. 


PUTINLST +A 
CADRTEM 
TSTDSPLK 
♦ 3 

CADRTEM 


TEST IF really LOCKED OUT 
STILL BUSY 

DSPLOCK = +0 So RETURN DIRECTLY 
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CAF 
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REF 
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REF 
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LAST 
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ref 

6 
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REF 
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LAST 
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REF 
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0 

7475 

0 


TC 
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REF 

3 
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0 
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TC 
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2 
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0 
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TC 
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REF 

9 

LAST 

551 
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4 

0636 

0 


C5 

2683 





0 7 , 7h / 7 

4 
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0 


COM 

2684 

REF 

20 

LAST 

550 

07 ,75uO 

0 

212 / 

1 

ENDNVBSY 

TC 

2685 

REF 

5 

LAST 

411 



3323 


SETLOC 

2 686 

REF 

298 

LAST 

550 

3323 

3 

OOOi 

0 

RELDSp 

XCH 

2687 

REF 

1 



3324 

5 

0113 

1 


TS 

2688 

REF 

8 

LAST 

508 

3325 

3 

4335 

0 


CAF 

2689 

REF 

7 

LAST 

551 

3326 

6 

0630 
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AO 

2690 

ref 

435 

LAST 

551 

3327 

1 
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0 


CCS 
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3330 

0 

3334 

0 


TC 

2692 

REF 

43 

LAST 

531 

3331 

0 

3062 

0 


TC 

2 693 

REF 

1 



3332 

0 

3351 

0 


TC 

2694 

REF 
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LAST 

551 

3333 

0 

3351 

0 


TC 

2695 

REF 

204 

LAST 

53/ 

3 334 

3 

5501 
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CAF 

2696 

REF 

10 

LAST 

551 

3335 

3 

0634 

0 


XCH 

2697 

REF 

11 

LAST 

551 

3336 

3 

0635 
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XCH 
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REF 

12 

LAST 

551 
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REF 

7 

LAST 
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LAST 
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REF 

8 

LAST 

551 

3344 

3 

0114 
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REF 
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LAST 
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TC 
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REF 
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CAF 
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REF 
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LAST 
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LAST 
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4 
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REF 
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LAST 
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MASK 
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REF 

42 

LAST 
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REF 
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LAST 
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REF 
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BANI^JUMP 
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GRAbLOC< 

CADRTEM 

D5PLIST +2 
DSPLIST +1 
DSPLIST 
A 

LSTFULL 

+ 2 

LSTFULL 
RELDSPON 
DSPLIST +2 


J0B5LEEP 
NVSUBUSY +3 
Q 

RELRET 

NEGl 

GRABLGC< 

A 

♦ A 

CCSHOLE 

RELDSP2 

RELDSP2 

ZERO 

DSPLIST 

DSPLIST +1 

DSPLIST +2 

CAORTEM 

A 

+ 2 

RELDSP2 

CADRTEM 

JOB WAKE 
ONE 

GRABLOC< 

BITS 

OUTl 

OUTl 

DSPLOCKO 

RELRET 

0 

RELRET 


USER'S Own page no. 71 

SET FOR GRABBED STATE AND NVSUBUSY USE 

enter CADR into first position of LIST 

(BOTTOM) 


SLT DSpLOCK TO +0f TURN RELDSp LIGHT 
OFF, search DSPLIST 


SEARCH LIST ONLY IF GRABLOCK = +2 
(SOMEONE USED NVSUBUSY) 


LIST EMPTY 


0 INTO DSPLOCK (BITa OF STATE) 

RtLiNT IS done in DSPLOCKO. 

SLT DSPLOCK TO +0i RELDSP LIGHT OFF, 
NO LIST search 


RELDSP2 
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SET FOR 1.75 SECS FOR 501 


CALLED BY T3RUPT 


cmlled by executive 


SET FOR GRABBED CONDITION 

SET FOR Free condition 


pinball waiting line full. 
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REF 
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REF 

AA 

LAST 

551 

32*7172 

0 

3062 

0 


TC 

07A1 

ref 

1 



32*7173 

0 

7216 

0 


TC 

07A2 

REF 

1 



32*717*+ 

3 

7257 

0 


CAF 

07A3 

REF 

13 

LAST 

573 

32*7175 

7 

06A 7 

0 


MA5< 

0 7AA 

ref 

A59 

LAST 

579 

32,7176 

1 

0000 

0 


CCS 

07A5 

REF 

1 



32,7177 

0 

7222 

1 


TC 

07A6 

REF 

2 

LAST 

553 

32,7200 

3 

7567 

1 


CAF 

07A7 

REF 

83 

LAST 

577 

32,7201 

0 

2173 

0 


TC 

07A8 

REF 

2 

LAST 

330 

32,7202 


65152 

1 


CAOR 

07A9 

REF 

1 



32 *7203 

3 

2152 

0 

makeserv 

CAF 

0750 

REF 

21 

LAST 

577 

32 ,720A 

0 

20A6 

L 


TC 

0751 

REF 

1 



32,7205 


65262 

1 


CAOR 

07511 

REF 

23 

LAST 

572 

32*720b 

3 

Ai+73 

Q 


CAP 

07512 

REF 

A3 

LAST 

579 

32,7207 

0 

2312 

0 


TC 

07513 





32,7210 


00005 

1 


OCI 

0752 

ref 

73 

LAST 

577 

32*7211 

0 

2256 

1 


TC 

0753 

REF 

3 

LAST 

579 

32*7212 

3 

756 7 

1 

setupent 

CAF 

0 75A 

REF 

89 

LAST 

579 

32*7213 

0 

2173 

0 


r c 

0755 

REF 

1 



32*721A 


5600a 

0 


CAOR 

0756 

REF 

1 



32 * 7215 

0 

7203 

1 


TC 
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PIPCADR 

ISWCALL 

Two 

NEWPHASE 

00005 

PiPTlME +1 

T bASES 

Two 

PIPAGE 

BRANCH TO PIPA READ ROUTINE 

LNTRYMS< 

FLAGWRDl 

A 

SETUPENT 

Test if entry flag set 

FLAGWRDl 

CSTMASK 

A 

TEST IF COAST FLAG SET 

CCSHOLE 

SETUPSO< 

U IS, DO NOT RESET READACCS 

AB0RT32 

FLAGWRD2 

A 

TEST IF abort BURN IS SET. IP SO, NEED 
2,5SECS COMPUTING INTERVAL 

changedt 

II IS 

2SEC 

WAITLIST 

REAOACCS 

If IS NOI, CALL READACCS IN 2 SECS 

PRI016 

FINDVAC 

SERVICER 

three 

NEWPHASE 

5 

ESTABLISH servicer ROUTINE 

TASKOVER 

2SEC 

WAITLIST 

PIPUP 

MAKESERV 

CALL ENTRY ROUTINES IN 2 SECS 
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0757 

REl- 

4 

LAST 

579 

i2*7Z\b 

3 

7567 

1 

5ETUPS0K 

CAF 

U rbB 

REF 

90 

LAST 

579 

32t72i r 

0 

2173 

0 


TC 

0759 

REF 

1 



32 f 7220 

66657 

0 


CAOR 

0760 

REF 

2 

LAST 

579 

32 »7221 

0 

7203 

1 


TC 

07ol 

ref 

26 

Last 

563 

32»7222 

3 

45 16 

1 

CHANGEDT 

CAP 

0762 

REF 

1 



32»7223 

5 

1030 

0 


T5 

0763 

ref 

1 



32 i722*+ 
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7260 

1 


CAF 

0764 

REF 

3 

LAST 

580 

32»7225 
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7201 

0 


TC 

0765 

REF 

2 

LAST 

579 


3 

7257 

0 

rereadac 

CAF 

0766 

REF 

14 

LAST 

579 

32i7227 

7 

064 7 

0 


MA5< 

0767 

REF 

460 

LAST 

579 

32 t7230 

1 

0000 

0 


CCS 

0768 

REF 

1 



32t7231 

0 

7234 

0 


TC 

0769 

REF 

1 



32 *7232 

3 

7255 

1 

CAFREPIP 

CAF 

0770 

REF 

3 

Last 

579 

32»7233 

0 

7153 

1 


TC 

0771 

REF 

2 

LAST 

580 

32»7234 

4 

7260 

0 

5ET2.5S 

C5 

0772 

REF 

5 

LAST 

579 

32 » 7235 

6 

0667 

0 


A3 

0773 

REF 

22 

LAST 

567 

32 i7236 

6 

0036 

1 


A3 

0774 

REF 

36 

LAST 

571 

32*7237 

3 

0572 

1 


XCH 

07 75 

REF 

37 

LAST 

580 

32*72^10 

1 

0572 

0 


CCS 

0776 

REF 

1 



32*7241 

0 

723 2 

0 


TC 

0777 

REF 

2 

LAST 

580 

32*7242 

0 

7232 

0 


TC 

0778 

REF 

3 

LAST 

580 

32*7243 

3 

7260 

1 


CAP 

0779 

REF 

38 

LAST 

580 

32*7244 

6 

0572 

1 


A3 

0760 

REF 

25 

LAST 

524 

32*7245 

6 

44 76 

0 


A3 

07801 

REF 

461 

LAST 

580 

32*7246 

5 

0000 

1 


T5 

07802 

REF 

3 

LAST 

580 

32*724 7 

0 

7232 

0 


TC 

07803 

REF 

39 

LAST 

580 

32*7250 

4 

0572 

0 


CS 

0781 

REF 

91 

LAST 

580 

32*7251 

0 

2173 

0 


T C 

0782 

REF 

4 

LAST 

580 

32*7252 


65232 

1 


CA3R 

0783 

REF 

74 

LAST 

579 

32*7253 

0 

2256 

1 


TC 

0784 

REF 

2 

LAST 

338 

32*7254 


6l3l3 

1 

PIPCADR 

CA3R 

0785 

REF 

2 

LAST 

338 

32*7255 


61364 

1 

repipcad 

CA3R 

0786 

REF 

24 

LAST 

531 



4504 

chdtmask 

E3JALS 

0787 

REF 

15 

LAST 

551 



4 514 

ENTRYMSK 

E3JALS 

0788 

REF 

25 

LAST 

580 



4504 

readmask 

E3JALS 

07885 





32*7256 


40u00 

0 

cstmask 

OCT 

0789 





32*7257 


00006 

1 

AB0RT32 

OCT 

0790 





32*7260 


00372 

1 

2.5SEC32 

DEC 

0791 





32*7261 


00620 

0 

4SEC 

dec 
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2SbL 

WAITLIST 

soaktasc 

MAKESERV 

CALL SOAiQTASK IN 2 SECS 

eiTi 

DELTAT +1 

force servicer to Set deltat to 2.5 stcs 

2.5SEC32 
MAKESERV -2 

CALL KEADACCS in 2.5 SECS 

AbORT32 

FLAGWRD2 

A 

SET2,5S 

REPIPCAD 
READACCS +1 

2,5SEC32 

TbASES 

TIMEI 

RUPTSTOR 

RUPT5T0R 

CAFREPIP 

CAFREPIP 

2.5SEC32 

RUPTSTOR 

P05MAX 

A 

CAFREPIP 

readaccs restart location 

RUPTSTOR 

WAITLIST 

CAFREPIP 

TASKOVER 

PIPASR 

repipasr 

B I T 1 1 

BITS 

bITll 

40000 

6 

250 

400 

/ 
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0794 

ref 

155 

last 

565 

32,7262 

0 5654 

0 

Servicer 

TC 

0795 

REF 

3 

LAST 

339 

32,7263 

31017 

0 


C4DR 

079502 

ref 

30 

LAST 

571 

32,7264 

4 0645 

1 


C5 

079504 

REF 

21 

LAST 

570 

32,7265 

7 4503 

1 


MAS< 

079506 

REF 

462 

LAST 

580 

32,7266 

1 0000 

0 


CCS 

079508 

REF 

2 

LAST 

131 

32,7267 

0 7276 

0 


TC 

07951 

ref 

4 

LAST 

22 

32,7270 

5 lOOi 

1 


TS 

079512 

REF 

5 

LAST 

581 

32t72 a 

5 1002 

1 


T5 

079514 

REF 

6 

LAST 

581 

32,72/2 

5 1003 

0 


ts 

079516 

REF 

7 

LAST 

581 

32 , 72 73 

5 1004 

1 


T5 

079518 

REF 

8 

LAST 

581 

32,7274 

5 1005 

0 


TS 

07952 

REF 

9 

LAST 

581 

32,7275 

5 1U06 

0 


T5 

0796 

REF 

57 

LAST 

577 

32*7276 

0 4000 

0 

REDOS. 3 

TC 

07961 





32*7277 

76776 

0 


ITC 

07962 

REF 

1 



32*7300 

15712 

1 



0797 





32*7301 

76776 

0 

REGSTEP 

ITC 

0798 

REF 

1 



32,7302 

21551 

0 



07961 

ref 

5 

LAST 

553 

32,7303 

3 3533 

1 

AVGRET 

CAF 

07982 

REF 

460 

LAST 

534 

32,730h 

5 0115 

1 

AGAIN 

TS 

07983 

REF 

461 

LAST 

581 

32*7305 

2 0115 

0 


IMDEX 

07984 

REF 

i 



32*7306 

4 1416 

1 


cs 

07985 

REF 

462 

LAST 

581 

32*7307 

2 0115 

0 


IVDEX 

07986 

REF 

1 



32*7310 

5 1263 

1 


T5 

07987 

REF 

4-63 

LAST 

581 

32*7311 

1 Oils 

0 


CCS 

07968 

REF 

1 



32*7312 

0 7304 

1 


TC 

079881 

REF 

4 

LAST 

571 

32 * 7313 

4 1446 

1 


CS 

079882 

REF 

1 



32*7314 

5 1261 

0 


TS 

079883 

REF 

2 

LAST 

568 

32,7315 

4 144 7 

0 


C5 

079884 

REF 

1 



32,7316 

5 1262 

0 


TS 

07989 

REF 

9 

LAST 

564 

32*7317 

0 2276 

0 


TC 

079895 





32,7320 

02705 

1 


OCT 

0799 

REF 

58 

LAST 

581 

32,7321 

0 4000 

0 

RES. 23 

TC 

0800 





32*7322 

43576 

1 


T*EST 

0801 

REF 

I 



32*7323 

00036 

i 



0802 

REF 

1 



32*7324 

25 354 

1 



0803 





32*7325 

45176 

0 


DMOVE 

08035 

REF 

1 



32*7326 

21144 

0 



0804 

REF 

1 



32 * 7327 

33576 

0 


STORE 

08042 





32*7330 

75575 

1 


AXT *1 
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BANkCALL 

1/PlPA 

STATE 

BlTi2 

A 

RED05*3 

DELV 
DELV +l 
DELV +2 
DELV +3 
DELV +4 
DELV +5 


INTPHET 


0 

501 JPCHK 


0 

CALCRVG 

ELEVEN 

MPAC 

MPAC 

VR 

MPAC 

VRl 

MPAC 

again 

VGCNTR 

VGCNTl 

DVCNTR 

DVCNTl 


USER'S OWN page no. 29 
compensate THE PIPA DATA IN THE DELV 

registers, 

TtST IF PIPAS BIAS IS TO EE DISREGARDED 
NO 

yes, clear OUT DELV AS LONG AS BIAS FLAG 

IS set. 



See if time for state vector update. 

(501 6 2 ONLY) , 


routine cycles 12 TIMES TO SAVE OLD VR, 
VN FOR restarts 


(TEMPORARIES IN AMEMORY) 


SAVE FOR restarts 


PhASCHNG 

02705 

INTPRET 


0 TEST IF ENTRY FLAG SET 

ENTRYFLG 

GETFF Ills NOT 

0 

LAD 

INITL/D 
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08045 





32i7331 

43565 

0 


TEST 

OBU55 





32*7332 

OOOOi 

0 



0806 

REF 

1 



32*7333 

00003 

1 



08065 

REF 

1 



32*7334 

2533 7 

1 



0807 





32*7335 

OOOll 

1 



0811 





32*7336 

461 7 6 

0 

PACIFIC 

COMP»t 

0812 

REF 

2 

LAST 

554 

32.7337 

03275 

1 



0813 

ref 

3 

LAST 

554 

32*7340 

33145 

1 


STORE 

0814 





32*7341 

74176 

i 


YMOVEi 

0815 

REF 

2 

LAST 

555 

32,7342 

03301 

0 



0816 

REF 

3 

LAST 

555 

32,7343 

33115 

1 


STORE 

0817 





32,7344 

7b7 76 

0 


ITC 

0818 

REF 

3 

LAST 

555 

32*7345 

13450 

1 



0819 





32*7346 

77576 

0 


EXIT 

0B20 

REF 

211 

LAST 

577 

32*734 7 

3 5501 

0 


caf 

0921 

REF 

2 

LAST 

580 

3-^*7350 

5 1030 

0 


T5 

0822 

REF 

26 

LAST 

560 

32*7351 

0 5720 

1 


TC 

0823 

REF 

1 



32*7352 

6l430 

1 


CAOR 

08231 





32,7353 

76776 

0 

getff 

ITC 

08232 

REF 

1 



32,735h 

22001 

0 



0824 





32,7355 

43575 

1 

COASTEST 

TEST 

0025 





32*7356 

75026 

1 


VYDVE 

0026 

REF 

X 



32*7357 

O0O22 

1 



0827 

REF 

1 



32*7360 

25454 

0 



0828 

REF 

9 

LAST 

355 

32,7361 

00766 

0 



08281 

REF 

11 

LAST 

326 

32 * 7362 

00002 

0 



0829 

REF 

16 

LAST 

330 

32*7363 

33101 

1 


STORE 

0830 





32*7364 

75176 

0 


VMOVE 

0831 

REF 

8 

LAST 

355 

32*7365 

00774 

0 



0832 

REF 

13 

LAST 

330 

32,7366 

33107 

1 


STORE 

003202 





32*7367 

77576 

0 


EXIT 

083204 

REF 

3 

LAST 

158 

32,7370 

4 1456 

0 


cs 

083206 

REF 

26 

LAST 

580 

32,7371 

6 4476 

0 


AO 

083208 

REF 

463 

LAST 

501 

32,7372 

1 0000 

0 


CCS 

08321 

REF 

2 

LAST 

565 

32,7373 

0 3462 

1 


TC 

083212 





32,73 ?4 

10000 

0 


0 V- T 

083214 

REF 

1 



32,7375 

0 7406 

1 


TC 

083216 

REF 

1 



32,73 

4 1720 

1 


CS 
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AXTtl 

0 

ADORTSIG 

PACIFIC 



0 

TPACIFCtl 

dtearot 



0 

RTPACIFCtl 

RTINIT 

0 

EARROTl 

0 


ZERO Reset deltat *i to zero 

deltat +1 


postjump go to entry initialization routine, 

startent 


0 

CALCTFF 



COMPUTE TIME TO FREE-FALL TO RTERM 


I 

VSRT 

COASTFLG 
TFFTEST 
RN 

RSCALE -15D 
RRECT 



TEST IF COAST FLAG SET 

IT IS. TRANSFER RN,VN TO ORBITAL 
INTEGRATION ROUTINE 


0 

VN 

VRECT 



TFF 

POSMAX 

A 


STATEUP 

lOOOO 


NUMCASE 


TFF NOM 


SEE IF TFF IS POSMAX (I.E.- WILL NOT 
INTERSECT 400,000 FT) 


AuL O.K.» SO Set TFFz FLAG TO ENABLE 
(TFF - TFFMIN) calculations FOR SPS2 

IGNITION SEQUENCE 

Wall not intersect AOOfOOO FT* SO SET 



I 
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083217 





32*7377 

4 0000 

0 

083218 

REF 

4 

LAST 

582 

32*7400 

5 1456 

I 

08322 

REF 

2 

LAST 

582 

32*740i 

4 1721 

0 

083221 





32*7402 

4 0000 

0 

083222 

REF 

5 

LAST 

583 

32*7403 

5 1457 

0 

083224 

REF 

1 



32*7 404 

0 3474 

0 

083226 





32*7405 

10000 

0 

083228 

REF 

59 

LAST 

581 

32 *7406 

0 4000 

0 

0833 





32*7407 

66776 

1 

0834 

REF 

6 

LAST 

583 

32 i74iO 

01457 

0 

0835 

REF 

1 



32*7411 

25571 

0 

0836 

REF 

4 

LAST 

32 f 

32,7412 

33211 

0 

0837 





32,7413 

47574 

1 

0838 





32*7414 

66756 

0 

0839 





32*7415 

66 742 

0 

08391 

REF 

1 



32*7416 

25573 

1 

08392 

ref 

1 



32*7417 

25433 

1 

08393 

REF 

8 

LAST 

572 

32.7420 

01463 

1 

08394 

REF 

6 

LAST 

579 

32 * 742 1 

0 1465 

1 

08395 

REF 

4 

LAST 

577 

32,7422 

33557 

0 

0840 





32*7423 

77576 

0 

0841 

ref 

7 

LAST 

583 

32*7424 

4 1465 

0 

0842 





32*7425 

4 0000 

0 

0043 

REF 

4 

LAST 

223 

32*7426 

5 0755 

0 

0844 

REF 

1 



32*7427 

0 3440 

1 

0845 





32*7430 

40000 

0 

0846 

REF 

65 

LAST 

578 

32*7431 

0 2124 

1 

084605 





32 * 7432 

775 76 

0 

08461 

REF 

14 

LAST 

576 

32*7433 

0 3 4 1 6 

1 

084615 





32*7 434 

00400 

0 

08462 

REF 

200 

LAST 

574 

32*7435 

3 4516 

1 

064625 

REF 

5 

LAST 

581 

32,7436 

5 l44b 

0 

08463 

ref 

10 

LAST 

571 

32*7437 

0 3430 

0 

084635 





32*7440 

40000 

0 

08464 

ref 

201 

LAST 

583 

32*7441 

4 4516 

0 

084645 

ref 

44 

LAST 

579 

32*74‘+2 

0 2312 

0 


NOMCASE 


SPS2N0W 


CJ^ 

T5 


C5 

COM 

T5 

TC 

3CT 

TC 

D5J 


STORE 


NOlOD 

05J 

D5J 


STORE 

EXIT 

C5 

COM 

IS 

TC 

OCT 

TC 

EXIT 

TC 

OCT 

CAP 

T5 

TC 

OCT 


cs 

TC 
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TFF 

TFFNOM *1 

TFF +1 

TFF TO nominal VALUE TO COMPUTE 

TAVEGON AND TCOASj FOR A SPSi^ BURN 

5TATEDWN 

loooo 

INTPRET 

RlSLT TFP2 FLAG SO THAT SPS2 IGNITION IS 
scheduled a FIXED TIME AFTER AVE G, ON 

0 

TFF 

23M1N 

TAVEGON 

TIME TO TURN AVE G ON sTFF-23MIN. 

2 

BMN 

DAD 

TIME OF COAST = PIPTIME ♦ (TFF-25MIN) 

- TCUTOFF 

2MIN 

SPS2N0W 

TCUTOFF 

PIPTIME ^ 

TCOAST / i 

/ 1 

TmVEGON TOO SMALL-SCHEDULE SPS2 NOW 

PIPTIME +r 

OLDBTl 

START UP free-fall GYRO DRIFT COMP. 

FLAG2UP 

40000 

BEGINS WITH NEXT IDLETASK. SET DRIFTFLG 

ENDQFJOB 

0 

Servicer dies here at start of coastphs. 

FLACjIUP 

00400 

Set imt flag to enable maneuver to 

SPS2 burn attitude 

ONE 

VGCNTR 

PLAGlDy^N 

40000 

RtMOVE COAST FLAG TO CANCEL COLD SoAK 

ONE 

NtWPHASE 

Let enema kill cold soak manuever 
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32 » 7 443 

00002 

0 


DCT 

084655 

REF 

202 

last 

583 

32 *7444 

4 45 1 6 

0 


C5 

08466 

REF 

45 

LAST 

583 

32 t7445 

0 2312 

0 


TC 

084665 





32 *7 446 

00004 

0 


DCT 

08467 

REF 

1 



32 i7447 

3 2151 

0 


CAF 

004675 

REF 

25 

LAST 

574 

32»7450 

0 2052 

1 


t: 

0B468 

ref 

4 

LAST 

568 

32,7451 

11147 

0 


CADR 

084665 

REF 

60 

LAST 

583 

32»7452 

0 4000 

0 


TC 

0847 





32,7453 

435 75 

1 

TFFTEST 

TEST 

084702 





32*7454 

66616 

0 


05J 

084704 

REF 

1 



32,7455 

00004 

0 



084706 

REF 

1 



32*7456 

25514 

0 



084708 

REF 

7 

LAST 

583 

32*7457 

01457 

0 



08471 

REF 

3 

LAST 

263 

32 * 7 460 

01677 

0 



084712 

REF 

2 

LAST 

584 

32 * 74b 1 

25514 

0 



084714 





32*7 462 

77576 

0 


EXIT 

084716 





32*7 463 

2 Oul 7 

0 

TESTTFF 

IN41 

084718 

REF 

1 



32*7 464 

3 7575 

1 


CAP 

08472 

REF 

92 

LAST 

580 

32 *7 465 

0 2173 

0 


TC 

084722 

REF 

2 

LAST 

131 

32 * 7466 

50463 

0 


CADR 

084724 

ref 

1 


> 

32*7467 

1 1722 

0 


CCS 

084726 

REF 

1 



32*7470 

0 747 7 

i 


TC 

084728 

REF 

2 

LAST 

584 
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L PO*^ERED flight SUBROUTINES USER'S OWN PAGE NO. 6 
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L POWERED flight SUBROUTINES UStR»S OWN PAGE NO. & 

R01T6 this RoUTINl compute^ incremental CHAMGeS in CDU(oIMBAL) angles from incremental angular changes about AXeS. 
Roive It Requires sm increments a6 a dp vector in vac scaled at one revolution, sim,coS{Cdux,y, 2 ) in sincdu, + 2 , +4 
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L PO^^/ERED flight SUBROUTINES USER’S OWN PAGE NO. 9 

R 02 IO THIS routine computes I NCRgi-JENTAL AiMGJLAR CHANGeS ABOUT NAV, tASE AXES FRuM INCREMENTAL CDU ANGLE CHANGES, IT 
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L Powered flight subroutines useR'S page no, lo 

R02^9 this routine compute^ incremental changes to CDU ANSLeS from incremental angular changes about nav, base axes. 

R02bl IT requires THE INCREMENTAL NAV, BASE ANGLES AS A DP VECTOR IN VAC SCALED AT I REVOLUTION* SiN ,COS (CDUX , Y ,2 > 
Ru2S3 must Be in 31NCDU, COSCDJ RESPECTIVELY SCALED AT 2(>l). IT LeAVeS CDU INCKeMfNTS AS A DP VECTOR IN UCDU AT THe 
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R02H4 THIS routine RESOLVES THE SMALL ANGLE VECTOR STqRED AS SM COMPONENTS IN VaC* SCALED TO qNE REVqLUTIoN* INTq 
R 02d6 commanded CDU ANGLE CHANGES VAC, SCALED TO ONE REVOLUTION, THROUGH THe DeSIReD CDU ANGLeS DeFINeD BY 
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L POvJERED flight SUBROUTINES USER’S OWN PAGE NO. 12 

Ro367 the Following series of closed subrootines compute iHe required velocity vr, scaled to 2(+a)M/Cs, velocity-to-Be 
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25*7052 

33425 

1 

STORE 

0662 





25*7053 

75176 

0 

Y'40vE 

0663 

REF 

2 

LAST 

326 

25*7054 

15575 

1 
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DEC A, 



USER'S OWN PAGE NO, 18 

KPIP 

4 

MEASURED DELTA V SCALED 2 (+5) 

3 

DMP 

VXSC 

UNIT 

DELTAT 

hULHAM 

APPROX COS OF THRUST ONTO HORU PLANE 

5 

UMTHORZ 

CUE'F OF SIN TERM OF IT SCALED 2Ul) 

1 

DAD 

RVH 

RMAG 

LOOKANG 

RADIUS TO VISUAL HORIZON SCALED 2C+26) M 
R SCALED 2 ( + 25) 

Ptil SCALED 2 (* 0 ) REv, 

1 

VXSC 

UNITR 

2 

VSU 

CUS(PHI) IR scaled 2 (+2) 

18D 

12D 

1 

PHI 

SIN COEF SCALED 2(+l) 

CoStPHI) SCALED 2(+2> 

Unit final, n. scale'd 2( + u 

3 

TSLT 

TSRT 

RTS 

2 

4 

0 

1 

FIXVG 

I 

FRESHPD 

VG 

D 2(+2) 

DELTA V 2(+5) 
delta D 2 ( + U 

Is MAG VG GR THaN 2 (+5) M/CS 

IF yes* set mAG VG TO 2(+5) M/CS 

IF NO* SCALE mag VG BACK TO 2 (+6) 

IT 2(+l) 

ZERO PO POINTER 

VG SCALED 2 (+7) M/CS 

0 

6 

DIFFVECT 

0 

ZEROVEC 

SAVE HEW DIFFVECT SCALED 2(+l) 


^b^b7BA YUL SYSTtM FOR AGCA; REVISION 0 OF PROGRAM 50LRUM55 BY 


L powered flight subroutines 


066A 

REF 

5 

LAST 

639 

25,7055 

33A11 

0 


STORE 

0665 





25 , 7 J56 

AA576 

Q 


1 TCI 

0666 

ref 

25 

last 

639 

25,7057 

00052 

0 



0667 

ref 

81 

LAST 

629 

25,7060 

0 AOOO 

0 

CHEKEXIT 

TC 

0668 





25,7061 

76575 

1 


RTS 

0669 





25,7062 

76776 

0 


ITC 

0670 

REF 

9 

LAST 

6A5 

25,7063 

20265 

1 



0671 

REF 

1 



25,706A 

2565 7 

1 



06 r2 





25,7065 

53776 

1 

ANOVFLOW 

SIGN 

0673 

ref 

1 



25,7066 

13161 

0 



067A 





25*706 7 

00015 

0 



0675 

REF 

2 

LAST 

6AA 

25,70 70 

33AA1 

0 


STORE 

06 76 





25,7071 

76776 

0 


ITC 

0677 

REF 

1 



25,7072 

12 775 

1 



06 771 





25,7073 

75175 

0 

FIXVG 

VMOYE 

06772 





25,707A 

75771 

1 


vxsc 

06773 





25,70 75 

7777 7 

0 



0677A 

REF 

1 



25,7076 

15573 

1 



06775 

REF 

10 

last 

6A6 

25,7077 

20265 

1 



06 77 6 

REF 

7 

LAST 

6A5 

25,7100 

33353 

1 


STORE 

06777 





25,7101 

76776 

0 


ITC 

06 778 

REF 

1 



25,7102 

13051 

1 



0676 





25,7103 

A51 76 

D 

GETRANGE 

DMOVE 

0679 

REF 

1 



25,710A 

13151 

0 



0680 





25,7105 

32025 

1 


STORE 

0681 





25,71 06 

76776 

0 


ITC 

0682 

REF 

1 



25,7107 

12635 

1 



0683 





25,7110 

77576 

0 

PAST IT 

EXIT 

068A 

REF 

22 

LAST 

629 

25,7111 

0 3007 

0 


TC 

0685 





25,7112 

01A03 

1 


ocr 

0686 

REF 

1 



25,7113 

0 7060 

0 


TC 

0687 





25,7Ha 

77576 

0 

SMACHECK 

EXIT 

0688 

REF 

23 

LAST 

646 

25,7115 

0 3007 

0 


TC 

0689 





25,7116 

OlAOA 

0 


OCI 

0690 

REF 

2 

LAST 

6 A6 

25,7117 

0 7060 

0 


TC 

0691 





25,7120 

77576 

0 

GAMCHECK 

EXIT 

0692 

REF 

2A 

LAST 

6A6 

25,7121 

0 3007 

0 


TC 

0693 





25 * 7122 

01A05 

1 


OCT 
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CBDT 


0 

52 

INTPRET 

I 

FRESHPO 

VRFAIL 

0 

ANPSEUOO 

12D 

ANORMAL 


0 

GO-ON 


1 

RT0 

DP2 (-U 

F'KESHPD 

VG 


USER'S OWN PAGE NO, 19 
CbDT 5 0 FOR 501 ABORTS 

RETURN 

EXIT FOR VR check FAILURES 


ZERO PD POINTER 


AN = B FT/5/S SIGNED WITH DELTA V 

delta V 


IT 2(*1) 

ZERO PD POINTER 

MAG VG 2{+5) M/CS SCALED 2 (+7) 


0 

PREXIT GU CLOSE OUT 501 ABORT 


0 

MINRANGE 

20D freeze range angle at MINRANGE 


0 

gotrange continue 

0 

alarm 

01A03 

CHEKEXIT 

0 

alarm 

01 AO A 
CHEKEXIT 

0 

alarm 

0 1 A 0 5 




> » j 




wV 


. • • 
> • • . t 


4 


ft* . 


YUL SYSTEM E OR AGC<»; REVlSljFT Q OF PROGRAM 50LRUMS5 BY 


L powered flight subroutimes 


069A 

REF 

3 

LAST 

696 

25.7123 

0 7060 

0 


TC 

06VS 





25*7129 

77576 

0 

tancheck 

EXIT 

0696 

REF 

25 

LAST 

696 

25.7125 

0 300 7 

0 


TC 

0697 





25.7126 

01906 

1 


OCT 

069B 

REF 

9 

LAST 

69/ 

25.7127 

0 7060 

0 


TC 

0699 





25.7130 

06195 

1 

RINTALT 

20EC 

C0699 





25.7131 

33650 

1 



0700 





25.7132 

02000 

0 

DP2 (-9) 

20EC 

C0700 





25.7133 

00000 

1 



0701 





25.7139 

00900 

0 

DP2 (-6) 

20EC 

C0701 





25.7135 

00000 

1 



0702 





25.7136 

00010 

0 

DP2 l-ll ) 

20£C 

C0702 





25.7137 

00000 

1 



0703 





25.7190 

OOC 1 O 9 

0 

DP2 (-12) 

20£C 

C0703 





25.7191 

00000 

1 



0709 





25.7192 

06010 

0 

krangeo 

20EC 

C0709 





25»7193 

35650 

1 



0705 





25.7199 

51120 

0 

KRANGEl 

20EC 

C0705 





25.7195 

56532 

0 



0706 





25*71 96 

25691 

0 

KRANGE2 

20EC 

C07U6 





25.7197 

36206 

0 



0707 





25.7150 

0096 7 

1 

minrange 

20EC 

C0707 





25.7151 

16603 

0 



0700 





25.7152 

33537 

0 

V900 

20EC 

C0708 





25.7153 

15299 

1 



0709 





25.7159 

00000 

1 

TgOBIAS 

20EC 

C0709 





25.7155 

37200 

1 



0710 





25.7156 

20607 

1 

VCRIT 

20EC 

C07i0 





25*7157 

05301 

0 



0711 





25*7160 

03775 

1 

ANPSEUDO 

20EC 

C071 1 





25.7161 

17232 

1 


20EC 

0712 





25.7162 

06052 

0 

RE 

C0712 





25.7163 

12650 

1 



0713 





25.7169 

03025 

0 

RVH 

20EC 

C0713 





25.7165 

05329 

1 



0719 





25.7 166 

36099 

1 

FULHAM 

20EC 

C07i9 





25.7167 

03661 

0 
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(MAIN) 
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USER'S Own page NO. 20 

che<exit 

0 

ALARM 

01A06 

CHEiCEXIT 


6500085 B-25 

900K FT RADIUS 


0,0625 



0,015625 



0,000988261 



0, 000299191 



0,188095173 


2 (+91 

-.713839193 


2(+ll) 

0,681759381 


2 (+18) 

0,019010080 

6,8936288 DEG 

2(+0) REVS. 

0.865198796 

110,7959396 

2(+7) M/C5 

0,000059605 

5 SECS 

2{+23) CS 

0.523875000 

22.000 FT/SEC 

2<+7) M/CS 

0,129896080 

8 FT/S/S 

2(-9) M/C5/C3 

0,190089130 

6.378165 b6 M 

2(+25) M 

0,095092065 

6,378165 E6 M 

2(+26) M 

0,9397096 

CUS 20 deg. 
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(MAIN) page 6A8 


L powered flight subroutines 


K0715 

THESE 

routines compute VR Tj 

ACHIEVE 

A 

circular : 

EARTH- 

OR moon-centered 

0717 





25*7170 

45175 

0 

earthorb 


1 

0718 





25*7171 

76776 

0 


I TC 


0719 

REF 

A 

LAST 

6Al 

26*7172 

13376 

1 



MUE 

0720 

REF 

1 



25*7173 

13201 

Q 



SORTMU/R 

0721 





25*7174 

45175 

0 

LUNDEBST 

O'^OVE 

1 

0722 





25*7176 

63576 

0 


INCR*l 

0723 

REF 

1 



25*7176 

13400 

1 



MUM 

072A 





25*71 77 

00007 

0 



60 

0725 





2 5 * 7 200 

47574 

1 

sqrtmu/r 

NOLDD 

2 

0726 





25*7201 

62714 

1 


DDv 

tslt^^ 

0727 





25*7202 

53176 

1 


SORT 


0728 

REF 

6 

LAST 

6A5 

25*7203 

01024 

0 



RMAG 

0729 





25*720** 

00021 

1 



80*1 

A0730 











0731 





25*7205 

41775 

1 


VXY 

1 

0732 





25*7206 

7316b 

1 


UNIT 

VX5C 

0733 

REF 

10 

LAST 

645 

25*7207 

01016 

1 



UNITR 

073A 

REF 

1 



25*7210 

01323 

1 



UNITN 

0735 

REF 

6 

LAST 

640 

25*7211 

33417 

0 


STORE 

VR 

0736 





25*7212 

76776 

0 


ITC 

0 

0737 

REF 

2 

LAST 

640 

25*7213 

12431 

1 



CALCCBDT 


USER'S OWN page NO, 21 
0KB IT 


C(Xl) =IA-N (EARTH) 
=20-N (MOON) 

VK SCALED AT 2(+8)M/CS 


4B4t>7eA YUL SYSTEM FOK REVISION 0 OF PROGRAM SOLRUM^b BY 


L POWERED flight SUBROUTINES 

Kg738 THIS routine COMPUTE^ VR TO ACHIEVE HVPEf^BOLIC VELOCITY 


07A0 





25*7219 

62775 

a 

transear 

DDV 

07^1 





25*7215 

63 3 76 

0 


TSLTit 

0792 

REF 

2 

LAST 

698 

25*7216 

13900 

1 



0793 

REF 

7 

LAST 

698 

25*7217 

01029 

0 



0799 





25*7220 

00011 

1 



0795 





25*7221 

73176 

0 


JNIIT 

0796 

REF 

1 



25*7222 

01323 

1 



0797 

REF 

1 



25*7223 

33367 

0 


STORE 

0798 





25*7229 

97572 

1 


NOLOO 

0799 





25*7225 

92792 

0 


DOT 

07 50 





25*7226 

69716 

0 


O'lP 

0751 





25*7227 

61792 

1 


300V 

0752 





25*7230 

53176 

1 


SORT 

0753 

REF 

11 

LAST 

698 

25*7231 

01016 

1 



0759 

REF 

2 

LAST 

690 

25*7232 

15565 

0 



0755 





25*7233 

00035 

1 



0756 





25*7239 

00009 

0 



0757 





25*7235 

77777 

0 



0758 

REF 

1 



25*7236 

13263 

1 



0759 





25*7237 

32033 

0 


STORE 

0760 





2 5 * 7 290 

97575 

0 


NOLOD 

0761 





25*7291 

70766 

1 


DAO 

0762 

REF 

1 



25*7292 

13261 

0 



0763 

REF 

2 

LAST 

699 

25*7293 

0 1 3t>7 

1 



0769 





25*7299 

66/79 

0 


OSJ 

0765 





25*7295 

75692 

0 


vxsc 

0766 





25*7296 

75622 

0 


vxsc 

0767 





25*7297 

00033 

1 



0768 

REF 

2 

LAST 

699 

25*7250 

I3^i61 

0 



0769 

REF 

12 

LAST 

699 

25*7251 

01016 

1 



0770 





25*7252 

77777 

0 



0771 





25*7253 

00037 

0 



0772 





25 * 7259 

00003 

1 



0773 

REF 

7 

LAST 

698 

25*7255 

33917 

0 


STORE 

0779 





25*7256 

76776 

0 


ITC 

0775 

REF 

3 

LAST 

698 

25*7257 

12931 

L 



0776 





25*7260 

OlOOO 

0 

DP2 (-5) 

20EC 

C0776 





25*7261 

00000 

1 



07 ?1 





25*7262 

00020 

0 

DP2 (-10) 

20EC 

C07 77 





25*7263 

00000 

1 
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VF For tRansearth injection 


1 

MUM 

RMAG 

9*1 


0 

VF 

unitf 

9 

DAD 

TSLT 

DAD 

VF SCALED AT 2(+9)M/CS 

UNITR 

DP2 (-2) 

280 

3 

(VF SQ) 

DP2(-10) 

26D 

1 

VXSC 

DP2 (-5) 

unitf 

2 

VAD 

VSLT 

26D 

DP2 (-5) 

UNITR 

SCALED AT 2(+5) 

30D 

(vF ) 

2 

VR 

0 

CALCCBDT 

0,03125 

VK SCALED AT 2(+8)M/C5 


0,000976563 


4b^b78A YUL SYSTEM FOR AGc^c; RtYlSlON 0 OF PROGRAM SOLRUM55 8Y NASA 1021108-021 


DEC 4* 


1 966 


(MAIN) 


PAGE 660 


POWERED flight subroutines 


USER'S Own page no, 23 


07 re 

THIS 

routine 

COMPUTES 

yR TO achieve A 

TRANSLUNAR 

ellipse 

DEf^ INeO 

0 7 80 

Axis 

5MA 








0781 





2 5 f 7264 

63775 

1 translun 

TSLT 

1 

0782 





25t7265 

53176 

1 

SORT 


0783 

REF 

5 

LAST 

648 

25.7266 

13376 

1 


MUE 

0784 





25.7267 

00002 

0 


1 

0786 





25.7270 

45175 

0 

dmove 

1 

0786 





25.7271 

56376 

0 

T5RT* 


0787 





25.7272 

00037 

0 


30D 

0786 





25.7273 

00025 

0 


lOD.l 

0789 





25.7274 

75174 

1 

YVlovE 

2 

0790 





25.7275 

45232 

0 

VSR T 

bvsu 

0 791 





25.7276 

73026 

1 

JNIT 

VSRT 

0792 

REF 

17 

LAST 

641 

25.7277 

00766 

0 


RN 

0793 





25.7300 

00025 

0 


lOD.l 

07 94 

REF 

1 



25.7301 

01323 

1 


RTRNSLUN 

0 7 95 





25.7302 

00002 

0 


1 

0796 





25.7303 

45775 

0 

VSRT 

1 

0797 





25.7304 

46776 

0 

B\/SJ 


0798 

REF 

13 

LAST 

649 

25.7305 

01016 

1 


UNITR 

0799 





25.7306 

00002 

0 


1 

0800 

REF 

1 



25.7307 

3336 ( 

0 

STORE 

UNIID 

0801 





25.7310 

47575 

0 

NOLOD 

1 

0802 





25.7311 

50/76 

1 

VAO 


0803 

REF 

14 

LAST 

650 

25.7312 

01016 

1 


UNITR 

0804 

REF 

1 



25.7313 

33375 

0 

STORE 

UNITS 

0805 





25.7314 

71174 

0 

ABvAL 

2 

0806 





25.7315 

70742 

1 

DAO 

DAD 

0807 





25.7316 

56776 

1 

T5RT 


0808 

REF 

2 

LAST 

650 

25.73U 

01323 

1 


RTRNSLUN 

0809 





25.7320 

0003 7 

0 


30D 

0810 





25.7321 

7777/ 

0 


I' 

0811 





25.7322 

00002 

0 


1 

0812 

REF 

1 



25.7323 

33433 

0 

STORE 

5 

0813 





25.7324 

47575 

0 

NOLOD 

1 

0814 





25.7325 

66676 

0 

DSJ 

TSLC 

0815 





25.7326 

0003 / 

0 


30D 

0816 

REF 

6 

LAST 

640 

25.732/ 

00050 

1 


X2 

0817 

REF 

1 



25.7330 

33435 

0 

STORE 

DN 

0818 





25.7331 

47575 

0 

NOLOD 

1 


(RN) 

RN RESCALED TO 2(+26)M 


RIRNSLUN-RMAG SCALED AT 2(+25)M 


(L) 

(RN) 

S SCALED AT 2(+26)M 


(L) 


4B4578A 

YUL 

SYSTEM FOR AGC4; 

REVISION 

0 OF PROGRAM SOLRUM55 3Y 

L 

PO'^EREU 

flight subroutines 





0819 





25,7332 

5632o 

0 


T5RT» 

0820 





25,7333 

000 1 6 

0 



0821 

REF 

1 



25,733*, 

01437 

0 



OB22 





25,7335 

64773 

0 



0823 





25,7336 

61711 

1 


B33V 

0824 





25,7337 

63253 

0 


TSLTi' 

0825 





25,7340 

53766 

0 


SIGN 

0826 

REF 

2 

LAST 

651 

25 , 7 341 

01437 

0 



0827 

REF 

2 

LAST 

650 

25,7342 

01435 

1 



0826 





25 ,7343 

77 77 7 

0 



0829 





25,7344 

00021 

1 



0830 





25,7345 

00002 

0 



0831 

REF 

1 



25 ,7346 

01425 

0 



0832 

REF 

2 

LAST 

650 

25,73*, 7 

01375 

1 



0833 





25,7350 

56775 

1 


TSRT 

0834 





25,7351 

656 72 

1 


b:)sj 

0835 

REF 

2 

LAST 

650 

25,7352 

01433 

1 



0836 





25,7353 

00007 

0 



0837 

REF 

3 

LAST 

651 

25,7354 

0l43 7 

0 



0838 





25,7355 

00005 

1 



0839 





25,7356 

64 772 

1 


DMP 

0840 





25,735 7 

61653 

0 


BDOV 

0841 





25,7360 

56766 

0 


TSRT 

0842 





25,7361 

50622 

1 


VAD 

0843 





25,7362 

75 776 

0 


vXSC 

0844 

REF 

4 

LAST 

651 

25,7363 

0143 7 

0 



0845 

REF 

3 

LAST 

651 

25,7364 

01433 

1 



0846 





25,7365 

77777 

0 



0847 





25,73b6 

00007 

0 



0848 

REF 

2 

LAST 

650 

25,7367 

0136? 

1 



0849 





25 , 73 70 

777 7 7 

0 



0850 





25,7371 

00012 

1 


STORE 

0851 

REF 

8 

LAST 

649 

25,7372 

33417 

0 


0852 





25, 7373 

767 76 

0 


ITC 

0853 

REF 

4 

LAST 

649 

25,7374 

12431 

1 



0854 





25,73 75 

04507 

1 

MUE 

20EC 

C0854 





25,7376 

33420 

1 


20EC 

0855 





25,7377 

03516 

0 

f-lUM 

coa55 





25,7400 

10273 

0 
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USER'S 0wr4 page no. 24 

BDSJ 

6*2 

SMA 

3 

I NCR *2 
SQRI 

vxsc 

sma 

UN 

16D 

0,2 

SGNTHETA 

units 

I 

TSRT 

5 

6D 

SMA 

4 

4 

SORT 

VXSC 

VSLT 

SMA 

5 

6 

UN I TO 
9D 

VR VK SCALED AT 2(+8)M/C5 


0 

CALCCbDT 

0, 145011008 3,98603223 E14 SCALED 2 ( + 38 ) M ( +3) /C5 ( ,2) 

0,114151696 4,902r7800 E08 SCALED 2 ( +32 ) M ( +3 ) /CS ( +2 ) 


^bAb78A YUL SYSTEM FOR AGC<^; REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 652 


L Powered flight subroutines user’s own page no. 25 

Po856 THIS routine COMPUTES THE DeSIReD THRJST DIReCtION A5 A HALF UNIT VeCtOR ASC. It COMPUtlS THe HALF UNIT VlCTOR 

R0858 Y5C ALONG RN»eXSC (l.E. ^eFINeS A PITCH AXIS HORIZONTAL, YAW AXIS UP ROLL ATTITUUe) AND 2SC ALONG XSC*YbC, U 

R 0860 Requires prior passes through routines calcrvg and calcvgb to establish unitr. vg, and cbdt, xi must Contain 
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PROC^RAM CALCULAie^s THe FREE-FALL TIME qF FLIOHj FRqM PReSeNT PqSItION RN 


Rn may be o \ eItheR Side of the ellipse, but rteRm is CunsiUeReo on the Inbound side. 


TFF = { DEL E - (02-Ul) ) / (ALFA SORT ( ALFA MUE) I 
q 2 = -SuRT( RTERm ALFA (Z-RTERv) ALFA) -LCp ALFA ) 

Ql = RN.y/N SORT (Alfa/ MUE) 


(INbOuND SIDE) 


LEO 

+ /- 

LCe 

LEO 

+ /- 

LCE 


PROGRAM requirements ON ENTERING. 

1. PUSHDDwN LIST IS ZEROED 

2. INPUTS: POSiriON RN 2(-2A) 


M, VELOCITY VN 2 (-7) M/CS 


THE PROGRAM EXITS WITH ONE OF THE FOLLOWING IN TFF. 

A. TFF s flight TIME. NqRMAl CASE FOR POSITIVE FLIGHT (IMF LESS THAN ONE ORBUAl PERIOD. 

B. TFF=hO. THIS liOlCAJES THAT THe TRAJeCIQRY HAS GONE HAST RTERM AND tHE PReSeNT ALtItUDe IS 

less than the specified terminal altitude. 

C. TFF S PoSMAX. this INDICATES THAT THe ELLIPTICAL CONIC FROM tHe PReSENT PqSItION WILL NOT 
RETURN! TO THE SPECIFIED ALTITJDE. 

THE following QUANTITIES REMAIN iN FHE PUSHLIST 

ALFA 2( + 2U IN PDL lOD 

(2-RTERM ALFA) 2(-3l IN PDL 6 

RTERM ALFA 2(-3) IN PDL 4 

LCP ALFA 2(-6) IN PDL 2 

thus tHE calling program CAii CALCULATE TERMINAL VeLdCItY, VTERMt AND CqS uaMMA qR SIN GaMMA USING ReSIDUe FRqM 
CALCTFF. 


VTERM (RTERM/MJE) = (2-RTERM ALFA) 


SIN gamma = 1 - (LCP ALFA / RTERM ALFA{2-RTERM ALFA) ) 


COS gamma = LCP ALFA /(RTERM ALFA (2-RTERM ALFA) ) 

QUAlOlTlES ARE normalized BY LCe TO OSTAIn BeST ACCJRaCY IN COMPUTING, 
ACCEPTS LCE LEO 1.0. THE oMALLEST LCE WHICH IS NORMALIZED IS 21-4), 
desired. (LCe L 2 (-3) ALL HAVE SAME SCALING) 


espacially FOR sparctan, program 
Although this may Be extended if 
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dmp 

RN 

VN 

1 

1 /MJE 
lOD 

NORMBVE 


USER’S Own PAGE NO. A 
ALFA 

-iU SAVE FOR GETTFFl 

0KB PERIOD 2PI/ALFA SQKTlALFA MUt) 
2 (-17-N) 


MIRS/CS 2(-7) 

21+35) 

ALFA 21*21) 

GET NORM COUNT BASED ON LCF SO. 

LLP ALFA 2(-6) TO HDL 2*3 


1 

bPL 
DP, 3b 
LOECC 

1 

100 

ALF ALIM 
hlECC 

0 

RTERM 

lOD 


0 

DPl/A 

A 


1 

lOD 

1/MJE 

2 

DMP 


2(-2A) 

Alfa 2(*211 

RTERM ALFA 2 (-3) TO PDL A, 5 


RTERM ALFA 2 (-3) 

(<;-RTERM ALFA) 2(-3) TO PDL 6.7 


ALFA 2 (+21) 

2(+35) TO PDL 8*9 


2 (-7) 


RN 

VN 

1 


leave 01 2 (-3) IN MPAC 


^b^b78A YUL SYSTEM EOR AGC4: REVIbljN 0 OF- PROGRAM SOLRUM55 BY 


L 

TIME 

OF 

FREE- 

FALL 

CALCULAT IONS 




3712 

ref 

1 



31 t61i7 

221A3 

1 


3713 





31*6120 

3201 1 

0 
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31*6121 

6A77A 

1 


3715 





31*6122 

66771 

0 


3716 





31*6123 

70776 

D 


3717 





31*612A 

77777 

D 


3718 





31 *6125 

77777 

□ 


3719 





31*6126 

777? t 

0 


3720 
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31*6127 
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0 
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31*6130 
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1 
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0 
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1 
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0 
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0000 7 
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31*6135 

77777 

0 


3730 

REF 

1 



31*6136 
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1 
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0 


373201 

REF 

10 

LAST 
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31*61 AO 

33A5 7 

1 
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A0576 

1 


3733 

REF 

3 7 

LAST 
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31 *6 1A2 

2 0067 

1 

ARGQl 
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31 *61 A3 

2 002 0 

1 


3735 

REF 

31 

LAST 
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31*6 1 AA 

3 A 5 1 3 

L 


3736 

REF 

a 

LAST 
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31*6145 

0 5 A 1 6 

1 


3 73 7 

REF 

A76 

LAST 
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31 * 6 1 A b 

3 0117 

0 


3738 

REF 

A77 

LAST 

686 

31 *61A r 

3 0116 

1 


3739 

REF 

A78 

LAST 

686 

31*6150 

5 0115 

1 


37A0 

REF 

38 

LAST 

686 

31*6151 

2 006 7 

1 


37A1 





31*6152 

5 0022 

1 


37A2 

REF 

39 

LAST 
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31*6153 

0 A02A 

0 


3 7A6 

REF 

39 

LAST 

686 

31 *615A 

2 0067 

1 
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37h7 





31*6155 

2 0021 

0 


3748 

REF 

lA 

LAST 
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31*6156 
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1 
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9 

LAST 
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31*615 f 

0 5a16 

1 
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REF 

216 

LAST 

6eA 

31*6160 

3 5501 

0 
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REF 

A79 

LAST 

686 

31*6161 

3 011/ 

0 
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REF 

A80 

LAST 
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3 1 *6162 

3 0116 

1 


3753 

REF 

A8l 

LAST 
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31 * 6 1 63 
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1 
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REF 
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LAST 

606 
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0 
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REF 
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0 6177 

0 
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0 6170 

1 


3757 

ref 
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0 6202 

1 


3758 

ref 
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LAST 
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0 
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ref 

2 

LAST 
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0 6177 
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INDEX 

T5 
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rc 
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RTB 
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8U 

8D 
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DMP 
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GETTFF 

12D 

IFF 

0 

FIXLOC 
1 6D 
BITA 
SHORTMP 
MPAC *2 
MPAC +1 
MPAC 
FIXLOC 
180 

DANZIG 

FIXLOC 
17D 
BIT7 
SHORTMP 
ZERO 
MPAC +2 
MPAC +1 
MPAC 

MPAC 

Q2RU0T 

+ 2 

NEGQ2 

MPAC +1 
U2R00T 


USER'S OWN PAGE NO. 5 

SfWJl MPAC FOR GONE PAST TEST. ♦ NORMLZF 
01 (OR Ql/2 OR 201 OR 401) 

CALCULATE Q2 


(2-RTLRM ALFA) 2 (-3) FROM POL 6»7 
RFERM ALFA 2(-3) FROM POL A, 5 
LcP ALFA 2 (-6) FROM POL 2 *3 
TlST SGNt take root (RT DOT NEG) 
RETURN -02 (OR -Q2/2 OR -202 OR -AQ2) 
01 (AT similar SCALE) 

01-02 ( OR /2 0R2 ORA) 

LEO +/- 2LCE (OR 1 OR A OR 8) 


2-RTERM ALFA 2 (-3) 

2-RTERM ALFA-RMAG ALFA 2 (-3) IN MPAC 
C(MPAC) s DEN 2(-3) 

OHB PERIOD 2{-17-N) 


COUNT BY ONES 

EFFECTIVE SH L 3 ( 2 OH A OR 6) 

Move UP 

MPAC IS L ,5 AS REQO BY TEST LATER 
Save FOR GONE PAST TEST. 


SH L BY 2fS 

DU EFFECTIVE SHL 6 (A OR 8 OR 10) 
TP ENTRY , C(MPaC+2) VALID, 


NU FREEFALL CONIC TO RTERM FROM HERE. 
CK LO WORD. IF NEC, ASSUME ROUNDOFF . 


4b-^bToA YUL SYSTEM FOR AQC^; REVISION 0 Of- PROGRAM SOLRUMS5 BY 


L TiMt OF free-fall CALCULATIONS 
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DANZIG 

Zero n^g arg from roundoff, set =o. 

MPAC 
MPAC +1 
DANZIG 

BANKCALL GU TAKE DP SQRT 

S(jRT3 CtMPAC +2) =0 

DANZIG 

PuSMAX this WILL LEAVE PUSHLOC AT P0L2 

tff 

T F F +1 

FIXLOC but reset IT. 

PUSHLOC 


INTPRET 

0 Af<D RETURN TO CALLING PROGRAM. 


1-Q2 IN PDL 8*9 


FIXLOC 

16D 

B 1 T A 

SHORTHP 

FIXLOC 

8D 

MPAC +1 
MPAC 
FIXLOC 
16D 

-1/2PI 


COUNT BY 1,S 

EFFECTIVE SL i (2 OR 4 OR S ) 
C(MPAC +U+2J = DEN ON RETURN, 
(UNSCALD NUM and DEn LEQ ♦/- 2 LCE) 

SAVE Q2-QI* get den 

And save. 

COUNT BY 1,S 


MPAC +1 

MPAC +2 -((32-Ql) /2PI SAVED 

5PARCTAN NUM=C (MPAC+ 1 ) *DEN=C (MPAC) 

RETURN WITH DEL ECC, AN0M/2PI IN A 


MPAC +2 
MPAC 

/ALID WHEN 
FIXLOC 
leD 

♦ 2 

sgnatan 

A 

GETTFF3 


TFF NORM=(DEL E : (02 J OU ) /2P I 
5PTEM3 L .5 


IF both sgn qi and 

NtGt THEN SET TFFt 
LEFT BY SPARCTAN 
(=50K =-3/A +1 FOR 
Ok. GO ON 


SGN ATAN ARE 
♦1 =+0. (-3/4+1 

OVFL TEST) 
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LAST 
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LAST 
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REF 
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LAST 
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3i *6251 

3 

3812 

ref 

494 

LAST 
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REF 
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LAST 
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1 

TS 
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4024 
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K 

DANZIG 


USER'S Ov^N page no. 7 
GONE PAST, SET TFF=0. 

-N. BIT^ below valid FOR N LEO lOD. 
SCALE factor* 2(-11+N) 

NOW READY TO MULT BY ORB PERIOD 


R381A TO improve precision of sparctan at smaller lce* come Here to Get normalization factor 

W3816 based OT'* SIZE OF LCE So, ShIFT BY 2fS. ScAlING RESjLTING FROM BELOW YiELuS AT LEAST ONE LEAq ZERC IN 
R3818 NUM AND DEN USED IN SPARCTAfJ. 


3819 

3820 

3821 
382? 
3823 
3 82 A 
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3827 

3828 

3829 

3830 

3831 
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3833 

3834 

3835 

3836 
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3843 

3844 
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3846 
C3846 


REF 
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3 
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1 
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BRACKET SIZE BY OVFL TESTS 

REF 
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LAST 
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31.6255 
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A3 
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REF 
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LAST 
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TC 
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REF 

1 



31.6260 
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AD 
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REF 
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LAST 
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31*6261 
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T5 

A 


REF 
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0 
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0 


TC 
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HERE IF LCE GEO 2<-2) 

REF 
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6 
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1 


AD 
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REF 
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LAST 
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5 
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TS 

A 


REF 
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31 *6265 

0 

6301 

0 


1 C 

EN0RM2 

HERE IF LCE GEO 2(-3) 

REF 

16 

LAST 

6 l4 

31 *6266 

4 

45 1 5 
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C5 

blT2 

HERE IF LCE L 2 (-3) 

REF 

46 

LAST 
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2 

0o67 
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5 
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TS 

16D 
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REF 
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LAST 
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31*6271 

6 
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1 


AD 
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REF 

47 

LAST 
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1 


TS 
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COUNT FOR SL BY 2 *5, 

REF 
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LAST 
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4024 
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REF 
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4516 

1 

E NOR MO 
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REF 
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REF 
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LAST 
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REF 
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LAST 
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REF 

29 

LAST 
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LAST 
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(MAIN) PAGE 690 


P3Bb2 

R386A 

R3866 

R3Bi>a 

R38fj9 

3860 

3861 

3862 

3863 
386A 

3665 
3 866 

3867 

3868 

3869 

3870 

3871 
38 12 
3SJ3 
3874 
38 75 

3876 

3877 

3878 

3879 

3880 
3881 
3882 
38b 3 
308 ^ 

3885 

3886 

3887 

3888 

3889 

3890 

38V1 

3892 

3893 

3894 

3895 

3896 

3897 


time of free-fall calculations USER»S Own page no. 9 

inverse tangent, tHe sifmgle precision arctan is based on a HASTINGS 3 te^m Polynomial, the program 
accepts mum and den t where tan (THETA) = NUM/3£N, AND GIVES THETA/Pi IN THE RANGe (0,1) 
enter with C(MPaC + 1 ) = NJM, AND C(MPaC) = DeN. 'OTE THAT FoR CaLCTFF, IHeTA = DeL E/ 2 , 

SPARCTAN uses 3 SP temporaries: SPTEMQt SPTEMlt 5PTEM2 


temporary erasable assignments for SPARCTAN ROUTINE 


ref 

39 

LAST 

388 



00 71 

SPTEMQ 

- 

VbUP 


ref 

40 

LAST 

690 



0072 

sptemi 


VbUF +1 


REF 

41 

LAST 

690 



0073 

5PTEM2 

z 

VbUF +2 


REF 

1 





0071 

SPATANQ 

EJJALS 

SPTEMQ 


REF 

1 





0072 

sgnatan 

E3JALS 

SPTEMI 


REF 

324 

LAST 

626 

31*6323 

3 

0001 

0 

SPARCTAN 

kZA 

Q 


REF 

1 



3 1 * 6 32** 

5 

0071 

1 


T5 

SpATANQ 


REF 

15 

LAST 

621 

31*6325 

3 

4502 

1 


CAP 

BIT13 

II 

REF 

1 



31 *6325 

5 

0073 

0 


TS 

SPTEM2 


ref 

2 

LAST 

687 

31*632? 

5 

0072 

1 


T 5 

SGNATAN 

Ih NUM=0* THETAsO 

ref 

496 

LAST 

688 

31 ,6330 

1 

0116 

0 


CCS 

MPAC +1 

NUM 

ref 

1 



31*6331 

0 

6341 

1 


rc 

TEST Den 

IF den =0, THETAS90 DEG SGN(NUM) 

REF 

2 

LAST 

690 

31*6332 

0 

6341 

1 


TC 

TESTDEN 

MUST STILL TEST DEN, 





31*6333 

0 

6335 

1 


TC 

+ 2 

Indeterminate case o/o considered as 900 

ref 

3 

LAST 

690 

31,6334 

0 

6340 

0 


TC 

TESTDEN -1 


REF 

3 

LAST 

690 

31*6335 

4 

0072 

0 


CS 

Sgnatan 


REF 

4 

LAST 

690 

31,6336 

5 

0072 

1 


TS 

Sgnatan 


REF 

497 

LAST 

690 

31*633 f 

4 

01 16 

0 


CS 

MPAC +1 


REF 

498 

LAST 

690 

31 * 6 3 4 0 

5 

0116 

1 


TS 

MPAC +1 

AbVAL OF NUM. 

REF 

499 

LAST 

690 

31*6341 

1 

0115 

0 

testden 

CCS 

MPAC 

DtiN 

REF 

1 



31.6342 

0 

6355 

1 


TC 

SPAT ANl 


REF 

1 



31 * 6 3 4 3 

0 

6434 

1 


TC 

5PATAN4 

90 DEG CASE 





31 ,6344 

0 

6346 

0 


TC 

+ 2 


REF 

2 

last 

690 

31,6345 

0 

64 34 

1 


TC 

SPATAN4 

90 DEG CASE 

REF 

5 

LAST 

690 

31*6346 

4 

0072 

D 


CS 

SGNATAN 


REF 

6 

LAST 

690 

31 * 6 347 

5 

0072 

1 


TS 

sgnatan 


REF 
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LAST 

690 

31*6350 

4 

0115 

0 


CS 

MPAC 


ref 
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LAST 
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31*6351 

5 

0115 

1 


TS 

MPAC 

AbVAL OF DEN. 

REF 
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LAST 

690 

31 *6352 

i 

OUb 

0 


CCS 

Mp A C +1 

EITHER POS OR +0, WAS NUM ZERO 

REF 

4 

LAST 

690 

31*6353 

0 

6341 

1 


TC 

testden 

NU, 60 ON 

REF 

2 

LAST 

690 

31*6354 

0 

0071 

1 


TC 

SPATANQ 

YES, theta =0 RETURN 





31 *6355 

2 

5 71 f 

1 

SPAI ANl 

EXTEND 


Here neglect i bit of ccs, lost in mp. 

REF 

1 



31*6356 

4 

6362 

1 


MP 

ITANCO 

POLY transition TEST. 

REF 

503 

LAST 

690 

31*635/ 

6 

0116 

1 


AD 

MPAC +1 

NuM (PNZ, SO +0 IN CCS IMPOSS) 

REF 

493 

LAST 

688 

31 *6360 

1 

0000 

0 


CCS 

A 

IF NEG, USE ZsN/D Fqr POLY. 

REF 

1 



31*6361 

0 

6367 

0 


TC 

SPATAN2 

IF POS* USE Z= (N-D) / (N+D) for PULY. 





31 *6362 


67237 

0 

ITANCO 

DEC 

-,2714556 

=-(l-K)/ (1+K) * AND K=.573 

ref 

220 

LAST 

688 

31*6363 

3 

5501 

0 


CAF 

ZERO 

This FORM OF POLY HAS BETTER BEHAVIOR 




•^1 


389B 

3B99 

3900 

3901 

3902 

3903 

390 *^ 

3905 

3906 

3907 

3908 

3909 

3910 

391 1 

3912 

3913 

391A 

3915 

3916 

3917 

3918 

3919 

3920 

3921 

3922 

3923 

3924 

3925 

3926 

3927 

3928 

3929 

3930 

3931 

3932 

3933 

3934 

3935 

3936 

3937 

3938 

3939 

:)940 

3941 

^3942 

\ A -a 
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time 

OF 

free- 
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calculations 






USER'S OWN PAGE NO. 10 

REF 

2 

last 

690 

31* 6364 

5 

007 3 

a 


T5 

SPTEM2 

NEAR ORIGIN, REPLACE PI/4 BY ZERO, 

REF- 

504 

LAST 

690 

31 *6365 

3 

0116 

1 


XCH 

MPAC +1 

SET +0 TO FIT IN WITH CALC BELOw, 

REF 

1 



31 1 6366 

0 

6371 

1 


TC 

SPATAN3 


REF 

505 

Last 

691 

31*6367 

4 

0115 

0 

SPATAN2 

C5 

mpac 

N-D AND N+D WILL NOT OVFL In AD IF LCE 












L 1.0 DUE TO NORMALIZATION BY LCE. 

REF 

506 

LAST 

691 

31 *6370 

6 

0116 

1 


A3 

MPAC +1 

NUM 

REF 

28 

LAST 

531 

31 *6371 

5 

0021 

1 

SPATAN3 

T5 

SR 


REF 

507 

LAST 

691 

31*63 U 

3 

0115 

i 


XCH 

MPAC 


REF 

508 

LAST 

691 

31*6373 

6 

0116 

1 


A3 

MPAC +1 


REF 

494 

LAST 

690 

31*6374 

5 

0000 

1 


TS 

A 

DID IT OVFL,, 

REF 

1 



31*6375 

0 

6401 

i 


TC 

5PATA7J5 

NOf GO DO DV. 

ref 

29 

LAST 

691 

31*6376 

3 

0021 

1 


XCH 

Sk 

YES* shift both NUM AND DEN Rl. 

REF 

30 

LAST 

691 

31*63^7 

3 

0021 

1 


xCh 

Sr 

(NUM-DEN)/4 in SR 

REF 

19 

LAST 

423 

31*6400 

6 

4522 

0 


A3 

HALF 

(nUM+DENI/2 in a. 

REF 

509 

LAST 

691 

31*6401 

5 

0115 

1 

SPATAN5 

TS 

MPAC 

normally* (NUM+DEN) 

REF 

31 

LAST 

691 

31*6402 

3 

0021 

1 


XCH 

SR 

NORMALLY* (NUM-OEN) /2 





31*6403 

2 

577 7 

1 


EXTEND 



REF 

510 

LAST 

691 

3 1 * 6 404 

5 

0115 

1 


DV 

MPAC 

Nu OVFL PROB. 

ref 

511 

LAST 

691 

31*6405 

5 

0115 

1 


TS 

MPAC 

2/2= (NUM-DENJ /2 (NUM+DEN) 












Z/2 = NUM/2DEM NEAR ORIGIN 





31*6406 

2 

5777 

1 


EXTEND 







31*6407 

4 

0000 

0 


SajARE 



REF 

512 

LAST 

691 

31*6410 

5 

0116 

1 


rs 

MPAC 

Z Z/4 





3l*64ii 

2 

577 7 

1 


EXTEND 



REF 

1 



31*6412 

4 

6441 

1 


MP 

ITANC7 


REF 

1 



31*6413 

6 

6440 

1 


A3 

ITANCS 






3 1 * 6 4 1 4 

2 

5777 

1 


EXTEND 



REF 

513 

LAST 

691 

31*6415 

4 

0116 

0 


v,p 

MPAC +1 


REF 

1 



31*6416 

6 

6437 

1 


A3 

ITANC3 






31*6417 

2 

57 7 7 

1 


EXTEND 



REF 

514 

LAST 

691 

31*6420 

4 

0116 

0 


MP 

MPAC +1 


REF 

1 



31*5421 

6 

6436 

0 


A3 

ITANCl 






31*6422 

6 

0000 

1 


33JBLE 







31*6423 

2 

5777 

1 


EXTEND 



REF 

515 

LAST 

691 

31*6424 

4 

0115 

0 


Vjp 

MPAC 


REF 

3 

LAST 

691 

31*6425 

6 

0073 

0 


A3 

SPTEM2 

EITHER l/4=PI/4 OR 0 

REF 

325 

LAST 

690 

3 1 * 6 4 2 6 

5 

OOOl 

0 


TS 

Q 

CtA)rTHETA/Pl .RANGE! 0 *.5) SEE NOTE 

REF 

7 

LAST 

690 

31*6427 

1 

0072 

0 


CCS 

sgnatan 


REF 

326 

LAST 

691 

31*6430 

3 

0001 

0 


XCH 

Q 

AFFIX 56N FOR POLY TO HAVE RANGE l-.5,.5 

REF 

3 

LAST 

690 

31 *6431 

0 

0071 

1 


1 C 

spatanq 


REF 

327 

LAST 

691 

31*6432 

4 

0001 

1 


cs 

Q 


REF 

20 

LAST 

691 

3 1 * 6 4 3 3 

6 

4522 

0 


A3 

HALF 


REF 

21 

LAST 

69 1 

31 *6434 

6 

4522 

0 

SPATAN4 

A3 

HALF 

go DEG CASE COME HERE 

ref 

4 

LAST 

691 

31 * 6435 

0 

0071 

1 


TC 

SPATANQ 

return with theta/ pi in a. RANGE(0*1) 












PULY GIVES theta/ PI RANGE 5 .+ . 5 ) 

NOTE 

■ retvJRn to calctff 

WITH DEL 

E/2 pi IN 

A* range (0*1). 

SINCE the output OF SpARCjAN , 
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L time of free-fall calculations USER'S OWN page no* 11 

Hj9A5 is in the range (Oil)* He +/- 90 OeG CASeS ARE IDENTICAL. FURTHeR SINCE PoR CALCTFF, THe ANGLe THeTA/PI 

rj9a7 equals Del e/2 pi* sfarctan Considers both o des and lao deg as o Deg, should programs other than calctff 

R39A9 Desire arc tangents, then sparctan can be made general, 

RJ9S0 


3951 

31 ♦6if36 

12133 

0 

itanci 

DEC 

.318060008 

/PI 

3952 

31 *6A37 

62723 

0 

ITANC3 

DEC 

-.40894149 

= 4 C3/PI 

3953 

3 1 , 6 A A 0 

27656 

1 

ITANC5 

DEC 

•7449806 

= 16 C5/PI 

395A 

31,6941 

464 50 

1 

1 TANC7 

DEC 

-.79435682 

5 64 C5 /PI 


TAW 


b ^ 7 8 A 

YUL 

SYST 

EM FOR aGCA; revision 

0 OF PR 

DORAM S 0 LRUM 55 BY 


time 

OF 

free- 

fall 

CALCULATIONS 





39SS 





31 , 6 A42 

73773 

0 

HIECCI 

a'iN 

39S6 





31 ,6443 

71405 

0 


LXC,1 

39S7 





3 1 » 6444 

45070 

1 


O'^OvE 

3957S 





31 ,6445 

76576 

1 


RTB 

39Se 





31 t6446 

00017 

1 



39S9 

REF 

1 



31 ,6447 

22457 

1 



3960 





31,6 450 

00024 

1 



396 1 





3 1 » 6 45 1 

00015 

0 



39615 





31 ,6452 

0002 7 

1 



3962 

REF 

14 

east 

684 

31 ,6453 

20255 

1 



3963 

REF 

13 

LAST 

687 

31 ,6454 

3345 7 

1 


STORE 

39635 





31 ,6455 

40576 

1 


ITC3 

396A 





31 t6456 

45175 

0 

TFFMAX 


3965 





31 ,645 f 

76576 

1 


RTB 

3966 

REF 

10 

LAST 

680 

31 »6460 

21043 

0 



3967 

REF 

15 

LAST 

693 

31 ,6461 

20265 

1 



3968 

REF 

14 

LAST 

693 

31, 6462 

33457 

1 


STORE 

3969 





31,6463 

40576 

1 


ITCQ 

AOOO 





31 ,6464 

45175 

0 

HIECC 

O'^Os/E 

AOOl 





31, 64t>5 

76576 

1 


RT3 

a002 





31 ,6 46b 

00013 

0 



A003 

REF 

16 

LAST 

693 

31 ,646r 

20265 

1 



AOOA 





31 ,6470 

32017 

0 


STORE 

A006 





31 ,64 M 

41775 

1 


y/XV 

A0062 





31,6472 

71116 

1 


ABvAL 

40064 

REF 

20 

LAST 

685 

31,6473 

00 766 

0 



40066 

REF 

24 

LAST 

685 

31 ,5474 

00774 

0 



40068 





31,6475 

00003 

1 



4007 





31,6476 

47575 

0 


NOLOO 

4008 





31,6477 

64 716 

0 


OMP 

4010 

REF 

4 

LAST 

685 

31 ,6500 

22307 

0 



40101 





31,6501 

00002 

0 



4011 





31,6502 

47575 

0 


NOLOO 

4012 





31,6503 

64776 

0 


DMP 

4013 





31 ,6504' 

OOOOi 

0 


UNIT 

401 4 





31,6505 

73174 

1 


4015 





31, 6506 

4272 2 

0 


DOT 

4016 





31,6507 

63643 

0 


TSLT 

4017 

REF 

21 

LAST 

693 

31,6510 

00 766 

0 



4018 

REF 

25 

LAST 

693 

31,6511 

00774 

0 



4019 





31,6512 

00003 

1 



4020 





31,6513 

00003 

1 


OOy 

4021 





31,6514 

62774 

1 
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3 

LODON 

TSRT* 

lAD 

TFFMAX 

19D 

12D 

1 1D» L 

FRESHpD 

Tf-F 

0 

1 

NEARONE 

FRESHPD 

TFF 

0 

1 

lOD 

FRESHPD 

14D 


1 

T5LT 

RN 

Mh 

2 

1 

TSLT 

1/MUE 

PD2f3 


B-26 pda, 5 

DMP 

D50 

RN 

VN 

2 

2 

2 


1 H/MUE B5 

1 

0 H H/MUE 


^b^t)7eA YUL SYSTEM FOR A&C4; REVISION 0 OF PROGRAM 



time 

OF 

FREE- 

fall 

CALCULATIONS 



A022 





31.6515 

66643 

0 

*t023 





31 * 6 5 1 6 

70653 

0 

A02A 





31 .65 W 

00005 

1 

A025 

REF 

10 

LAST 

684 

31 .6520 

01024 

0 

a026 

REF 

1 



31.6521 

226 ?4 

1 

A0291 





31 .6522 

47 576 

0 

A0292 

REF 

1 



31.6523 

33726 

1 

4030 





31 .6524 

47575 

0 

4031 





31.6525 

65672 

1 

4032 

REF 

2 

LAST 

694 

31 .6526 

22674 

1 

4033 





31.652 1 

00002 

0 

4034 





31 .6530 

56776 

1 

4035 





31.6531 

00005 

1 

4036 





3l .6532 

00002 

0 

4037 





31.6533 

66775 

1 

4038 





31 .6534 

61776 

0 

4039 

REF 

3 

LAST 

694 

31.6535 

22674 

1 

4040 





31 .6536 

00011 

1 

40421 





31.6537 

56775 

1 

40422 





31. 6540 

65616 

0 

40423 

REF 

1 



31 .6541 

15706 

1 

40424 





31 .6542 

00002 

0 

40425 





31. 6543 

00013 

0 

40426 

REF 

2 

LAST 

693 

31.6544 

22457 

1 

404261 





31.6545 

42775 

1 

404262 





31. 6546 

43 7 76 

0 

404263 

REF 

22 

LAST 

693 

31.654 1 

00766 

0 

404264 

REF 

26 

LAST 

693 

31 .6550 

00/74 

0 

404265 

REF 

1 



3 1 .6551 

22443 

1 

4043 





31.6552 

62774 

1 

4044 





31.6553 

66672 

1 

4045 





31 .6554 

62776 

0 

4046 





31.6555 

00005 

1 

4047 

REF 

11 

LAST 

694 

31 .6556 

01024 

0 

4048 

ref 

4 

LAST 

694 

31.655 1 

22674 

1 

4049 





31.6560 

00002 

0 

4050 





31.6561 

0000 7 

0 

hOBOI 





31.5562 

47575 

0 

4052 





31.6563 

73726 

0 

40525 

REF 

3 

LAST 

694 

31. 6564 

22457 

1 

4053 

REF 

5 

LAST 

694 

31.6565 

226 74 

1 


S0LRUMS5 BY 


05J 

DAO 


NDLOO 

store 


NOLOD 

BOSJ 


TSRT 


05 J 
BOO V 


TSRT 

BOSJ 


OOT 

B?L 


DOV 

05J 

OOV 


noloo 

asM 
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dsq 

SuRT 

4D 

RMAG 

TnO(-2) 

E B-1 PD6.7 

0 

ECC 

1 

TSRT 

Tw0(-2) 

1 

B-2 DEL PDe.9 

0 

4 

1 

1 

PulO.li b-27 

TW0(-2) 

8D 

1 

bPL 

R400K 

1 

lOD 

TFFMAX 

1 

RN 

VN 

hlECCl 

2 

TSRT 

H H/MUE(2-DEL) B-25 =HPAR PD10.11 

40 

RMAG 

TW0(-2) 

1 

6D 

1 

BD5U 

TFFMAX 

TyvO(-2) 

COSTH PD12.13 B-l 
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(MAIN) PAGE 69S 



time 

OF 

FREE- 

fall 

calculations 



AOS A 





3 1 1 6566 

7077A 

1 

aOS5 





31 »6567 

61653 

0 

A056 





31 f 6570 

A7176 

1 

A0S7 

REF 

6 

LAST 

69A 

31.6571 

2267A 

1 

A0S8 





31.6572 

00015 

0 

A060 





31.6573 

5677A 

0 

AOb 1 





31 »657A 

61732 

0 

*♦062 





31.6575 

56712 

0 

A063 

PEF 

2 

LAST 

69A 

31 .65 76 

15706 

1 

AOb A 





31.6577 

00002 

0 

A065 





31.6600 

00005 

1 

a066 

REF 

7 

LAST 

695 

31 .6601 

2267a 

1 

a067 





3 1 .6602 

00002 

0 

A0b71 





3 1.6603 

0000 7 

0 

A069 





31 » 650 A 

A7575 

0 

A070 





31.6605 

73726 

0 

a0701 

REF 

A 

LAST 

69A 

31. 6606 

22A5 7 

1 

AO /I 

REF 

8 

LAST 

695 

31.6607 

22b7A 

1 

A072 





31.6610 

7077a 

1 

a073 





31.6511 

61653 

0 

A07A 





31.6612 

A7176 

1 

a075 

REF 

9 

LAST 

695 

31.6613 

2267A 

1 

AO It 





31 .661A 

00021 

1 

A078 





31.6615 

567 75 

1 

A079 





31.6616 

70776 

0 

A080 





31.6617 

00011 

1 

AOal 





31 .6620 

00002 

0 

A0b2 

REF 

10 

LAST 

695 

31.6521 

2267A 

1 

A083 





31.6522 

66 775 

1 

A08A 





31.6523 

73722 

1 

A0b5 





31 .662A 

00023 

0 

A086 





31.6625 

0001 7 

1 

A086S 

REF 

1 



31.6526 

22665 

1 

A088 





31.6627 

51175 

a 

A089 





31.6630 

6A776 

0 

AO^O 





31.6631 

00023 

0 

A091 





31.6632 

00023 

0 

A092 





31.6633 

51175 

0 

a093 





31 .653A 

6A726 

0 

AOVA 





31.6635 

00017 

1 

A095 





31 .663b 

0001 7 

1 

A09 7 





31.6637 

5677A 

0 


USER'S OWN PAGE NO. lA 


dad 

BDDV 

CD^P 

2 

sqrt 

Two (-2) 

12D 

PD1A.L5 BO 

TAN(TH/2) 

T5RT 

BDDV 

T5RT 

2 

DSU 

UDV 

RAOOk 

1 

AD 

TW0(-2) 

1 

6D 



NDLOO 

BM\ 

1 

BDSU 

TFFMAX 

TWQ(-2) 



DAD 

BDDV 

CDMP 

2 

Sort 

TwO(-2) 

16D 

TAN(THl/2) 

PD18.19 


rSRT 1 

DAO 

8D 

1 

TwO(-2) 

D5J 1 

BMN CMP 

18D 

lAD 

TPFO (l+DEL/A) (TANTHl/2)-TAN(TH/2) ) 


D5u 1 

O^P 

IbU 

18D (1AN(TH1/2J )CUBED PD22»23 

DSD I 

DMP BbSU 

UD 

lAD PD22,23 BO 


TSRT 2 


4ti4t)78A YUL SYSTF-M FOR REVISION 0 OF PROGRAM SOLRUMS5 BY 


L 

time 

OF 

Free- 

FALL 

Calculations 





A098 





31*6640 

65 ?22 

□ 


BDSJ 

AO 9 9 





31 *6641 

70 7 ?6 

0 


dad 

5000 





31*6642 

00011 

1 



5001 





31*6643 

00002 

0 



5002 

REF 

1 



31*6644 

226 ?6 

0 



5003 





3 1 * 6645 

77777 

0 



5005 





3 1 * 6646 

00025 

0 



5006 





31*664? 

64773 

0 



5007 





31*6650 

63653 

1 


tslt 

5008 





31*6651 

64722 

1 


O'lP 

5009 





3 1*6652 

567 n 

0 


TSRT 

5010 





31 *6653 

00013 

0 



5011 

REF 

5 

last 

693 

31 * 6654 

2230 { 

0 



5012 





31 *6655 

00002 

0 



5013 





31*6656 

00013 

0 



501A 





31*6657 

00027 

1 



5015 





3 1 * 6660 

00010 

0 



5016 

REF 

17 

LAST 

693 

31 *6661 

20265 

1 



5017 

REF 

15 

LAST 

693 

3 1 * 6 662 

3345 7 

1 


STORE 

5018 





31 *6663 

40576 

1 


itcq 

5019 





31 * 6 6 6 

45175 

0 

TFFO 

dmove 

5020 





31*6665 

76576 

1 


rtb 

5021 

REF 

9 

LAST 

A73 

31 * 6 6 6 6 

05174 

0 



5022 

REF 

18 

LAST 

696 

3 1 * 666 ? 

20265 

1 



5023 

REF 

16 

LAST 

696 

31 *6670 

33457 

1 


STORE 

502A 





31*6671 

405 7 6 

1 


iTca 

50291 





31*6672 

40576 

1 


ITCO 

5032 





31*6673 

2000U 

0 

TwO(-2) 

20EC 

C5032 





31 *6674 

00000 

1 


2I)EC 

5033 





31*6575 

05252 

1 

DP1/3S 

C5033 





31*6676 

25253 

1 




i'i- t 


K 


f 
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DMP 

8D 

1 

DP1/3S 

20D 

3 

SORT 

DMP 

RTB 

lOD 

1 /MdE 

1 

lOD 

22D 

7D 

FRE5HPD 

IFF 

Ol : ■ 


1 

ZEROOP 

FRESHPD 

TFF 

0 

0 


S 


B-2 PD22»23 



3333333333 B-1 


a^578A YuL System for a6c^»{ revision o of program solrumss by 


DUMMY 501 INITIALISATION 


0001 






33,7407 


ban< 

ooou 

REF 

169 

LAST 

687 

3 3 » 7 40 7 

0 5654 

0 

BEGINNER 

t: 

00013 

REF 

4 

LAST 

619 

33^7^10 

30216 

1 

CADRMODE 

CADR 

0002 

REF 

89 

LAST 

687 

33i74ll 

0 4000 

0 

BEGIN501 

TC 

0003 





3 3 ♦ 7 1 2 

75175 

0 


VMOvE 

OOOA 





33t741J 

76776 

0 


ITC 

0005 

REF 

23 

LAST 

694 

33»7A14 

00766 

0 



0006 

REF 

6 

LAST 

610 

33t7‘»15 

21643 

0 



OOObl 





3 3 » 7 4 1 6 

77576 

0 


EXIT 

0007 

REF 

26 

LAST 

619 

33f 7<(17 

0 2276 

0 


TC 

00072 





33,7420 

00105 

0 

EXITL0C2 

OCT 

0008 





33 »7i,21 

2 0017 

0 


IMHIN 

0009 

REF 

29 

LAST 

621 

33,7422 

4 0036 

0 


C5 

0010 

REF 

1 



33,7423 

6 7440 

0 


AO 

0011 

REF 

114 

LAST 

622 

33,792^ 

0 2173 

0 


TC 

0012 

REF 

6 

LAST 

622 

33,7it25 

65152 

1 


CADR 

0013 

REF 

30 

LAST 

697 

33,7426 

4 0036 

0 


CS 

oou 

REF 

1 



33,7427 

6 7441 

1 


AO 

0015 

REF 

115 

LAST 

697 

33,7430 

0 2173 

0 


TC 

0016 

REF 

1 



33,7431 

67442 

1 


CAOR 

0017 

REF 

104 

LAST 

619 

33,7432 

0 2124 

1 


TC 

00171 

REF 

170 

last 

697 

33,7433 

0 5654 

0 

BeGINSW 

TC 

00172 

REF 

35 

LAST 

6l9 

33,7434 

30331 

0 


CAoR 

00173 





33,7435 

0 7435 

1 


TC 

00174 

REF 

105 

LAST 

697 

33,7436 

0 2124 

1 


TC 

00179 





33,7437 

00000 

1 


DEC 

0016 





33,7 440 

00310 

0 

STARTDTI 

OEC 

0019 





33,7441 

01476 

0 

5TARTDT2 

DEC 

0020 

REF 

4 

LAST 

6l5 

33,7 442 

3 2162 

0 

5TART2 

CAP 

0021 

REF 

31 

LAST 

622 

33,7 443 

0 2046 

1 


T w 

0022 

REF 

3 

LAST 

259 

33,7 441+ 

64336 

0 


CAOR 

0023 

REF 

92 

LAST 

623 

33,7445 

0 2256 

I 


TC 


NASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 697 

33 

USER'S OWN PAGE NO* 1 

BANXCALL 

IhUREENT 

INTPRET 

1 

RN 

CALCGRAV 

CHANGE IMUMODE AS REQUIRED. 

0 

PHASCHNG 

00105 

f 

TImEI 

STARTDTI 

WAITLIST 

REAOACCS 

setup SOME PHASE INFO. 

5.1 MODE GOES WITH READACCS, 

TlMEl 

51ARTDT2 

WAITLIST 

START2 

ENDOFJOB 

SPARE start ROUTINE 

BAfKCALL 

I MUSTALL 

WAIT FOR MODE Sy^ITCH IF NECESSARY. 

ENDOFJOB 

0 

200 

830 

PR1027 

FINDVAC 

S465M5EP 

HOLE FOR 2DEC PATCHING STARTDTI -1 


TA5<0VER 


^a'+:>78A YUL system F AGc^: REVISION 0 OF PRJGrAm SOLRUM55 By NA 5 A 1021108-021 


dec a, 1966 


(MAIN) page 698 


L 

0001 

H0002 

HOOO3 

ROOUA 

ROODS 

ROOO 6 

Rood? 

ROOIA 

001A3 

001A5 

00iA7 

0015 

0016 

0017 

0018 
00161 
001B2 

00188 

0019 

0020 

00202 

00205 

0022 

0023 

002A 

0026 

0027 

0028 

0035 

0036 

00362 

0036A 

00366 

0037 


OOAl 


re-entry COiMTROL 


USER'S OWN PAGE NO, I 


27*6000 SEILOC 56000 

the PIPUP SECTION IS A TASK WHICH READS T^E P1PA5 EVERY .5 

Seconds, acceleration history over the last two seconds (four readings) 
IS maintained in the XPIPBUF, YPIPBJF* and ZPIPBJF ReCISteRS. each pipa 
reading is summed into the xpipsum etc, registers, ano every fourth read 
ing average g is called to use tHe summed Readings to update position 

AND velocity and SET THE PIPSUM REGISTERS TO ZERO, 


GOES ■ 

THRU ( 

■^IPUP 

ONLY EVERT 

2 SEC, 

(ELSEWHERE 

MORE often,) 


REF 

3 

LAST 

580 

27,6000 

61364 

1 


CAOR 

REPIPASR 






27,6001 

3 6000 

1 

REPIPUP 

caf 

-1 


REF 

2 

LAST 

579 

27,6002 

0 6005 

1 


TC 

PIPUP + 1 

REREAD PIPAS IF NECESSARY, 

REF 

4 

LAST 

622 

27*6003 

61313 

1 


cadr 

PIPASR 






27,6004 

3 6003 

1 

PIPUP 

caf 

-1 


ref 

4 

LAST 

620 

27,6005 

0 5750 

0 


TC 

ISWCALL 

GO TO piparead subroutine. 

REF 

2 

LAST 

626 

27,6006 

3 3535 

1 


caf 

THIRTN 

Pick up at redos. 13 

REF 

66 

LAST 

623 

27,6007 

0 2312 

0 


rc 

NEWPHA5E 






2 ?,6D10 

00005 

1 


OCT 

5 

5,13 RESTART. (NO TIME CALL.) 

REF 

1 



27,6011 

3 7200 

1 

RED05.13 

caf 

DT 


REF 

116 

LAST 

697 

27,6012 

0 2173 

0 


TC 

WAITLIST 


REF 

3 

LAST 

698 

27,6013 

5600h 

0 


CADR 

PIPUP 


REF 

11 

LAST 

623 

27,6014 

4 146 5 

0 


C5 

PIPTIME ♦ 1 


ref 

8 

LAST 

621 

27,6015 

5 066 7 

0 


T5 

T BASES 

Save new TIME. 

REF 

1 



27,6016 

3 6032 

0 


CAF 

IPIPDT 


REF 

117 

LAST 

698 

27,6017 

0 2173 

0 


TC 

WAITLIST 


ref 

1 



27,6020 

57147 

I 


CAOR 

INTEHPIP 

read acceleration more often. 

REF 

2 

LAST 

579 

27,6021 

3 2152 

0 


caf 

PRI016 


ref 

32 

LAST 

697 

27,6022 

0 2046 

1 


TC 

F INDVAC 


REF 

2 

LAST 

132 

27,6023 

56033 

1 


cadr 

ENTRYTOP 


REF 

92 

LAST 

684 

27,6024 

3 5503 

1 


CAF 

TWO 


REF 

1 



27,6025 

5 1414 

1 


T5 

PIPCTR 


ref 

2 

LAST 

573 

27,6026 

3 353b 

1 


CAF 

POURTN 

THIS will pick up at ENTRYTOP + 

REF 

67 

LAST 

698 

27,6027 

0 2312 

0 


TC 

NEWPHA5E 






27,6030 

00005 

1 


QCT 

5 

5.14 RESTART, 

REF 

93 

LAST 

697 

27,6031 

0 2256 

1 


TC 

TASKOVER 






27,6032 

00062 

0 

IPIPDT 

DEC 

50 



I 

• • i 


1 ■ 









. t ki 


JJL. 


^b'fi)78A YUl- System for AGC^; revision O of program SOLRuMSS by NABA 1021108-021 


DEC A» 1966 


{MAIN) page 699 


L re-entry control USER'S OwN PAGE NO. 2 


P00A2 



JOB 

WHICH 

processes 

PIPA Readings to update 

POSll lON AND 

veLoci 


OOm-3 

REF 

1 



27t6033 

3 1 350 

0 

entrytop 

XCH 

TLNTRY 

update entry time. 


00 A A 

REF 

93 

LAST 

698 

27 * 603A 

6 5503 

1 


AD 

T wO 



00A5 

ref 

2 

LAST 

699 

27*6035 

3 1350 

0 


XCH 

TENTRY 

IN SECS SINCE Start of entry. 


00‘+6 

REF 

220 

LAST 

622 

27*603o 

3 4516 

1 


CAP 

ONE 



00 A 7 

REF 

3 

LAST 

579 

27*603 t 

5 1035 

0 


T5 

PIpAGt 



OOhB 

REF 

13 

LAST 

A56 

27*60^0 

4 1001 

0 


C5 

DELVX 



00A9 

REF 

1 



27 *60Al 

5 1403 

1 


rs 

XPIPBUF + 

3 


OObO 

REF 

10 

LAST 

3A6 

27*6042 

4 1003 

1 


cs 

DLLVY 



0051 

REF 

1 



27*6043 

5 140? 

0 


TS 

YPIPBUF + 

3 


0052 

REF 

0 

LAST 

346 

27 * 6044 

4 1005 

1 


cs 

DLLVZ 

save pip COUNTS. 


0053 

REF 

1 



27*6045 

5 1413 

0 


T5 

ZPIPBUF + 

3 


00581 

REF 

27 

LAST 

697 

27*6046 

0 2276 

0 


TC 

PHASCHNG 



00582 





27*6047 

01705 

1 


DCT 

01705 

5.15 RESTART PICKS UP AT REFAZE4, 


00506 

REF 

171 

LAST 

697 

27*6050 

0 5654 

0 


TC 

BANKCALL 

compensate the PIPA DATA 


00587 

REF 

A 

LAST 

581 

27,6051 

31Q17 

0 


CADR 

1/PlPA 



0059 

ref 

90 

LAST 

697 

27,6052 

0 4000 

0 

REFAZE4 

TC 

INTPRET 



0060 





27*6053 

76 ?76 

0 


ITC 

0 

Go TO AVERAGE G INTEGRATION ROUTINES 

TO 

0061 

REF 

2 

LAST 

581 

27*6054 

2 1 5 5 1 

0 



CALCRVG 

USE PiPA readings TO UPDATE POSITION 

and 

A0062 











Velocity, 


00622 

REF 

28 

LAST 

699 

27*6055 

0 2276 

0 


TC 

PhASChNo 



00623 





27*6056 

02105 

1 


DCT 

02105 

5.17 restart at REFAZE8, 


00625 

REF 

91 

LAST 

699 

27*6057 

0 4000 

0 

REFAZE8 

TC 

INTPRET 





^b^b7aA yul System koh agca: rev i sun o ot program solrumss by 


L RE-ENTRY CONTROL 


P0063 

PROCESS 

AVERAGE G 

OUTPUT... SCALE H 

AND GET INPUT DATA 

006A 





27t6060 

75/76 

0 SCALEPOP 

VXSC 

006S 

REF 

1 



27*6061 

00774 

0 


0066 

REF 

1 



27.6062 

21132 

1 


0067 

REF 

1 



27*6063 

333 15 

0 

STORE 

0068 





27 * 6064 

43574 

0 

TEST 

0069 





27*6065 

41766 

0 

V Xv 

0070 





2 7 *6066 

50776 

1 

VAO 

0071 

REF 

1 



27 *6067 

00010 

0 


0072 

REF 

1 



27*6070 

16077 

0 


0073 

REF 

16 

LAST 

652 

27*6071 

01016 

1 


007A 

REF 

4 

LAST 

654 

27*6072 

01044 

0 


0075 

REF 

1 



27*60/3 

21154 

1 


0076 

REF 

2 

LAST 

700 

27*6074 

01315 

1 


0077 

ref 

3 

LAST 

700 

27*60/5 

33315 

0 

STORE 

0078 





27.6076 

47575 

0 GETUNITV 

NOLOO 

0079 





27*6077 

73176 

0 

UNIT 

0080 

REF 

1 



27*6100 

33570 

0 

STORE 

0061 





27*6101 

63 ?76 

I 

islt 

0082 





27.6102 

00035 

1 


0083 





27*6103 

00003 

1 


006A 

REF 

1 



27*6104 

33343 

0 

STORE 

0065 





27*6105 

66776 

1 

DSJ 

0086 

REF 

2 

LAST 

700 

27*6106 

01343 

1 


0087 

ref 

2 

LAST 

384 

27*6107 

21055 

1 


008 8 

REF 

1 



27*6110 

33432 

1 

STORE 

0089 





27*6111 

63776 

1 

1 slt 

0090 





27*6112 

0003 7 

0 


0091 





27*6113 

00002 

0 


0092 

REF 

2 

LAST 

546 

27*6114 

33620 

0 

STORE 

0093 





27.6115 

42775 

1 

DOT 

0094 





27*6116 

63776 

1 

tslt 

0095 

REF 

4 

LAST 

700 

27.6117 

01315 

1 


0096 

REF 

17 

LAST 

700 

27*6120 

01016 

1 


0097 





27.6121 

00002 

0 


0098 

REF 

1 



27*6122 

3334 / 

1 

STORE 


jl 
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NASA 1021106-021 


DEC A* 1966 


(MAIN) PAgE 700 


US£R*S Own page no, 3 


0 

VPIP NVSCALE s ( U800/, 30^8)0(25766,1973 X2) 

KVSCALE NVSCALE = ,alA9l9AA 

(V) V VECTOR 

2 

VXSC (VRF.L) = (V) + KWE UNITR#UNITW 

RELVELSW SWITCH NUMBER. 

GETJNITV 

UNITR 

UKITW 

KWL 

(V) 

(V> NEW V VECTOR 15 RELATIVE. 


1 


UNITV 

half MAX, OF COURSE. 

0 

2BD 

2 

VSQUARE 

rescale MAGNITUDE SQUARED, 

SHIFT COUNT. (2 BECAUSE HALF-LEN 5QRD 
VELOCITT squared, (normal SCALING) 

0 

VSQ JARE 
FOURTH 

LEQ 

leu = VSQUARE-1 

4 G-S FULL scale 

0 

30D 



I 

V 


1 

(V) ROOT = V, UNITR 

UMTR 

1 and scale BACK UPi UNITS ARE 1/2. 

ROOT 



4b4i>7aA YUL system f^OR AGC^ ; REVI SION Q 0^ PRjGKAM S0LRUM55 BY 


L RE-ENTRY COiUROL 


00V9 





27*6123 

A5176 

0 

DMOVE 

0100 

REF 

1 



27,612a 

01363 

0 


0101 

REF 

1 



27*612D 

3 3 A 1 6 

1 

STORE 

0102 





27*6126 

7117A 

0 

AB VAL 

0103 





27*6127 

63 722 

0 

TSLT 

OlUA 





27*6130 

A7776 

1 

BZE 

0105 

REF 

19 

LAST 

6AA 

27,6131 

01002 

1 


0106 





27*6132 

OOOO3 

1 


0107 

REF 

1 



27*6133 

21 13A 

1 


0108 

REF 

1 



27*61JA 

2102a 

1 


0109 

ref 

2 

LAST 

701 

27*613S 

33363 

1 

STORE 

0110 





2 7 * 6 1 36 

A177S 

1 6ETUNI 

VXV 

0111 





27*6137 

73176 

0 

UNIT 

0112 

REF 

5 

LAST 

700 

27*61A0 

0131S 

1 


0113 

REF 

18 

LAST 

700 

27*61A1 

01016 

1 


OllA 

ref 

1 



27,61A2 

33S62 

0 

STORE 

Rons 

SOME 

OF the FOLLOWING TARGeTTInG 

might Be done 

: Less 

0116 





27*61A3 

A3S7S 

i 

test 

0117 





27*61AA 

A5176 

0 

OMOVE 

0118 

REF 

2 

LAST 

700 

27*61AS 

00010 

0 


0119 

REF 

1 



27 ,61A6 

20773 

0 


0120 

REF 

12 

LAST 

698 

27*61h7 

0lA6b 

1 


0121 

REF 

6 

LAST 

65A 

2 7 , 6 1 S 0 

331A5 

i 

STORE 


NASA 1021108-021 


OeG 4* 1966 (MAIN) PAGE ?01 


0 

D 

DOLL) 

2 

DMP 

DELV 

2 

KASLALE 
SET MIND 
D 

I 

(V) 

unitr 

UM 

Of - ten than 
1 

RELVELSrt 

GETETA 

PIPTIME 

DTEAROT 


USER'S Own page no, a 

^AVE OLD DRAG VALUE. 


KA5CALEs 5.8S l638A/(A ,30A8 80S 
2 FOR 2 SEC» 3 FOR I SEC* A FOR 
5 3# /A 

acceleration (DRAG, ALMOST) 

UNi = UNIT(V*R) 

COULD USE UNiTV. 

INERTIAL OR RELATIVE AS IS (V). 


above. 

THIS TEST MIGHT BE COMBINED wITH 
PREVIOUS ONE IF ALL CALCULATIONS 

done EVERY CYCLE. 


100 ) 

.5 — 
/25 


the 

ARE 


4B457hA YUL system FOR AGC<»; REVISION 0 OF PROGRAM SOLRUM 55 BY NASA 1021108-021 


DEC 4* 1S66 


(MAIN) PAGE 702 


L RE-ENTRY CONTROL USER'S OWN PAGE NO, 5 


0122 





27i6151 

76776 

0 

updatert 

ITC 

0 

UPDATE predicted TARGET VECTOR RT 

0123 

REF 

3 

LAST 

655 

27»6152 

13463 

1 



EARR0T2 


012A 





27»&153 

47575 

0 


NOLOD 

1 


0125 





27,6154 

42771 

0 


DDT 

RT6 

SINCE (RT) UNIT VEC, THIS IS 1/4 MAX. 

0126 

REF 

2 

LASi 

701 

27,6155 

01562 

1 



UNI 

LATANG = RT.UNl 

0127 

REF 

19 

LAST 

696 

27,6156 

20^65 

1 



FKESHPD 


0128 

REF 

1 



2 / , 6 1 5 ^ 

33113 

1 


STORE 

LATANG 

LATANG = MAC LATANGLE/4 (NO 2 PD 

A0129 











unusual scaling For latang. ( = asin l. 

0130 





27,6160 

42773 

1 

getangle 

DOT 

3 

IHETA = ARCC05(RT.UN1TH) 

0131 





27,6161 

666 1 6 

0 


DSJ 

bPL 

RT IS UNIT vector 

0132 





27 ,6162 

70716 

0 


dad 

TSLT 


0133 





27,6163 

611^6 

0 


ACOS 



0134 

REF 

2 

LAST 

65 a 

27,61 64 

01215 

0 



RT 


0135 

REF 

19 

LAST 

701 

27 ,6165 

01016 

1 



UNITR 


0136 

ref 

1 



27,61 66 

21064 

0 



NEARI/4 

TO IMPROVE accuracy, CALC RANGE BY 

0137 

REF 

1 



27,616 / 

21031 

0 



T INYTHET 

TINYTHET if high ORDER PART OF 

0138 

REF 

2 

LAST 

702 

27,6170 

21064 

0 



NEARl/4 

ARCCOS ARGUMENT IS ZERO 

0139 





27,6171 

00002 

0 



1 


0140 

REF 

2 

LAST 

5Ab 

27,6U2 

33111 

0 


STORE 

thetah 


01402 





27,6173 

77576 

0 


EXIT 

0 


01404 

REF 

29 

LAST 

699 

27,6174 

0 2276 

0 

refazeio 

TC 

PHASCHNG 

5,18 restart at REFAZEIO 

01405 




27,6175 

02205 

1 


OCT 

02205 

01407 

REF 

92 

LAST 

699 

27,6176 

0 4000 

0 


TC 

INTPRET 







4tt4ij78A YUL SYSTEM FQR AGC^; REVISION 0 Ol- PROGRAM 30LRUM55 BY NASA 1021108-021 


OeG 1966 


(MAIN) PAGE 703 


L 

POUl 

0142 

0U3 


R 0 1 4 A 

H0145 

R0146 

R0147 

R0148 

R0149 

Roiso 

ROISI 

R01S2 

R01S3 

ROISA 

R01S5 

R01S6 

R01S7 

R01S8 

R0159 

R0160 

R0161 

R0163 

ROI6A 

R0165 

R0166 

R0167 

ROI68 

R0169 


RE-ENTRY CONTROL USER'S O^N PAGE NO. 6 

JUMP TO PARTICULAR RE-ENTRY PHASE. 

27»6177 44S76 0 SEQUENCE I TCI 0 BRANCHES TO VARIOUS CONTROL PHASES. 

REF 1 27t62U0 01375 1 GOTOAddR ADDRESS Op PHASE EQ5 STORED HERE, 

gotoaddr Contains iHe address of the roll command equations 
appropriate to the current phase uf Re-entRy, seqjencing is as Follows; 

INITRoLL set here initially, holds initial roll attitude until <at ex- 
ceeded, then holds New Roll attitude until vRThkesh exceeded, 
then branches to 

huntest this Section check^s to see if the predicted range at nominal 

L/D from present cjnditIons IS Less than the Desired range 

IF not — A ROLL command IS GENERATED BY THE CONSTANT DRAG 

controller. 

if So— control and gotoador are Set to jpcontrl 
usually no iteration is involved except if the range Desired is 
too long on the first pass thru huntest. 

upcontRL controls Roll during the super-circular phase. upcontRL is term 

INATeD either (A) when the drag (AS measured by the PIPAS) 
falls below Q7 or (B) if rdot is negative and reference vl 

exceeds V. IN CASE (A), GOTOAODR IS SET TO <EP2 AND IN (B) TO 

predicts, skipping the Kepler phase of entry. 

KeP2 gotoador is set here during the kepleR phase to monitor drag. 

spacecraft 15 instantaneously trimmed in pitch and yaw to the 
computed Relative velocity vector, the last computed roll 
angle is Maintained, when the measured orag exceeds 07+,5» 

GOTOADDR IS SET TO 

predicts thjs Controls the final sub-orbital phase, roll commands cease 

when V IS LESS THAN VOUIT. AN EXIT IS MADE TO TbRMALT WHEN 

terminal altitude is reached. 


<4U<»i57BA YUL SY5TtM FOR AGC4: RtVIbljN 0 Oh PROGRAM SoLRUMi>5 &Y 


L RE-tNTRY control 


PoibO 

OUT 

OF 

sequence 

SUBSECTION 

TO COMPUTE 

ETA. 


01803 






30*6772 


ban< 

Oltil 





30»6772 

43575 

1 

GETETA 

TEST 

0162 





30»67 /3 

64 776 

0 


OMP 

0l83 

REF 

1 



30i677A 

00011 

1 



OlbA 

REF 

1 



30 » 6775 

21010 

0 



0185 

REF 

3 

LAST 

702 

30i677b 

on 1 1 

1 



0186 

REF 

1 



30ibf f f 

21136 

0 



0187 

REF 

1 



30»73OO 

33357 

0 


STORE 

018P 





30f 7001 

4 7575 

0 

GETETA2 

NOLOO 

0189 





30*7002 

70 776 

0 


DAO 

0190 

REF 

13 

LAST 

701 

30*70U3 

0 1 <* 65 

1 



0191 

REF 

9 

LAST 

701 

30» 7004 

331A5 

I 


STORE 

0192 





30*7005 

76776 

0 


I TC 

0193 

REF 

1 



30*7006 

16152 

0 



019A 





30*7007 

66775 

1 

SUBLTA 

osu 

0195 





30*7010 

43611 

0 


BPL 

0196 

REF 

3 

LAST 

700 

30*7011 

01620 

1 



0197 

REF 

3 

LAST 

700 

30*7012 

21055 

1 



0198 

REF 

1 



30*7013 

21016 

0 



0199 

ref 

3 

LAST 

701 

30.7014 

00010 

0 



0200 





30*7015 

64775 

0 

5UBETA2 

O^P 

0201 





30 1 7 0 1 6 

62 772 

1 


00 V 

0202 

REF 

4 

LAST 

704 

30*701 f 

0 U 1 1 

1 



0203 

REF 

1 



30.7020 

21140 

1 



0204 

REF 

4 

LAST 

704 

30,7021 

01620 

1 



0205 

REF 

1 



30*7022 
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1 

IF V5AT - VL NEGt GO TO CONSTD. 

HALVE 

VSAT = *5 

VL 

BtCONSTO 

DVL 

GOTOAODR MAY BE SIDETRACKED. 

OVL = VSAT - VL 

0 

HALVE 

VS 

VS s VSAT 

2 

bmn 

IF VI greater than VSAT, 60 UN. 


VI 

GETUHOO< 


YUL SYSTEM FOM AGC<t I^LVlSIJN 0 OF PROGRAM SOLRUMS5 By 


U RE-ENTRY CONTROL 


03A6 

REF 

2 

LAST 

710 

31 * ?201 

01440 

0 


03A7 

REF 

3 

LAST 

711 

31^7202 

33440 

1 

STORE 

03h8 





31 »7203 

45176 

0 

O'lOVE 

0 3 A9 

REF 

10 

LAST 

710 

31 »72U4 

01365 

D 


03S0 

REF 

2 

LAST 

710 

31 f 7205 

33612 

1 

STORE 

U3S1 





31 f 7206 

56773 

1 

GETDHOOK 1 SRT 

03S2 





31*720? 

62726 

0 

DOY 

0353 





31*7210 

63643 

0 

tslt 

035A 





31*7211 

66712 

0 

USJ 

0355 

REF 

3 

LAST 

711 

31*7212 

01612 

0 


03552 





31*7213 

00002 

0 


0356 

REF 

3 

LAST 

710 

31*7214 

01632 

1 


0357 

REF 

5 

LAST 

710 

31*7215 

21174 

0 


0358 





31*7216 

00002 

0 


0359 

REF 

5 

LAST 

710 

31*7217 

01630 

0 


0360 

REF 

3 

LAST 

710 

31*7220 

01331 

1 


0361 

REF 

1 



31*7221 

33434 

1 

STORE 

0362 





31*7222 

56775 

1 

TSRT 

0363 





31*7223 

62732 

0 

ooy 

0364 

REF 

2 

LAST 

711 

31*7224 

01434 

0 


0365 





31*7225 

00006 

1 


03655 

REF 

3 

LAST 

710 

31*7226 

01327 

0 


0366 

REF 

1 



31*7227 

21160 

0 


0367 

REF 

1 



31*7230 

33436 

0 

STORE 

0368 





31*7231 

47572 

1 

NOLDO 

0369 





31*7232 

70722 

1 

DAO 

0370 





31*7233 

64722 

1 

OMP 

0371 





31 *723^ 

62 712 

1 

DOY 

0372 





31*7235 

65756 

0 

B05J 

0373 

REF 

1 



31*7236 

21162 

1 


0374 

REF 

1 



31 *723 ? 

21164 

1 


0375 

REF 

4 

LAST 

711 

31*7240 

01440 

0 


0376 

REF 

5 

LAST 

711 

31 * 7 24 1 

01440 

0 


0377 

REF 

3 

LAST 

711 

31*7242 

01434 

0 


0378 

REF 

2 

LAST 

710 

31*7243 

0 1604 

1 


0379 

REF 

2 

LAST 

710 

31 * 7 2 4 4 

0002 7 

1 


0380 

REF 

1 



31*7245 

23450 

1 

STORE 

0381 

REF 

1 



31*7246 

33610 

0 


NASA 1021108-021 
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1966 


IMAIN) page 711 



USER'S OWN PAGE NO. 14 

DVL 

DVL 

DVL = DVL - tVSAT-Vl) = VI - VL 

0 

Y1 

VS 

YS = VI 

3 

bDSU 

DSQ 

DDV 

VS 

1 

FACTl 

HALVE 

1 

alp 

FACT2 

DHOOK 

DHOOK = ( (1-VS/FACtUSO - ALPJ/FACT2 

1 

DSU 

DHOOK 

5 

07 

ChOOK 

AHOOKDV 

RLSCALE BY 32. 

4 

DMP 

DMP 

uAMMAL = GAMMALI-ChI DVLSQ ( 1 + AHoOK DVL 

/DHOOK VBARS 

DDV 

BMN 

1/8TH 

CHI 

DVL 

DVL 

DHOOK 

VbARS 

GAMMALl 

r4LGAMA 

gammal 

FIND CONDITIONS FOR GAMMAL = 0. 


YUL SYSTEM FOR AGC^: REVISION 0 OF PROGRAM 50LRUM55 3Y 


L re-lntry control 

P03b2 ... PREDICT RANGES FOR EACH PHASE OF TRAJECTORY... 


0383 31 

03dA 31 


0385 

REF 

2 

LAST 

711 

31 

0386 





31 

0387 

REF 

6 

LAST 

711 

31 

0388 

REF 

1 



31 

0389 





31 

0390 





31 

0391 





31 

0392 





31 

0393 

REF 

3 

LAST 

711 

31 

039A 

ref 

7 

LAST 

712 

31 

0395 

REF 

4 

LAST 

712 

31 

0396 

REF 

2 

LAST 

712 

31 

0397 

REF 

3 

LAST 

712 

31 

0398 





31 

0399 

REF 

1 



31 

OAOO 





31 

OAOl 





31 

0AQ2 





31 

0A03 

REF 

5 

LAST 

712 

31 

OAOA 

REF 

4 

LAST 

712 

31 

0405 

REF 

3 

LAST 

712 

31 

0406 





31 

0407 





31 

0408 





31 

0409 





31 

0410 

REF 

6 

LAST 

710 

31 

0411 

REF 

1 



31 

0412 

REF 

1 



31 

041202 





31 

041204 

REF 

3 

LAST 

711 

31 

041206 

REF 

1 



31 

041200 





31 

04121 





31 

041212 

REF 

4 

LAST 

712 

31 

041214 

REF 

1 



31 

Q41216 

REF 

4 

LAST 

712 

31 

0413 





31 

0414 





31 

0415 





31 

0416 





31 

0417 

REF 

11 

LAST 

711 

31 


724 ? 

51175 

0 RANGER 

JSj 

7250 

56726 

i 

TSRT 

7251 

01610 

1 


7252 

00003 

1 


7253 

21174 

0 


7254 

33606 

1 

store 

7255 

66773 

1 

DSJ 

7250 

64722 

1 

DMP 

7257 

64716 

0 

DMP 

7260 

70653 

0 

DAD 

7261 

01604 

1 


7262 

2117^ 

0 


7263 

01604 

1 


7264 

0 1 606 

0 


7265 

01606 

0 


7266 

00003 

1 


7267 

21072 

1 


7270 

6477h 

1 

D^P 

7271 

64712 

1 

DMP 

7272 

6311b 

1 

A5IN 

7273 

01604 

1 


7 27‘t 

01606 

0 


7275 

01610 

1 


7276 

7 7777 

0 


7277 

00002 

0 


7300 

64775 

0 

DMP 

7301 

70742 

1 

dad 

7302 

01616 

1 


7303 

21076 

0 


7304 

21074 

1 


7305 

64 776 

0 

DMP 

7306 

00027 

1 


7307 

21234 

1 


7310 

64775 

Q 

DMP 

7311 

70776 

0 

dad 

7312 

01610 

1 


7313 

21236 

0 


731<+ 

32027 

0 

STDRE 

7315 

51173 

0 

DSj 

7316 

64712 

1 

DMP 

7317 

62 771 

1 

DDY 

7320 

64712 

1 

DMP 

7321 

0136 5 

0 
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USER'S Ov;N PAGE NO. 15 


1 

DLiSj 

GAMMAL 

2 

halve 

C U S G / 2 

lOSg = UgAMMAl 5Q/2 ♦ TRUNCATED SERIES 

3 

DMP 

TSLl 

SORT 

VBARS 

HALVE 

VBARS 

COSG/2 

E5SQRT(1+VBARS-2) VBARS COSG CoSG) 

COSG/2 

2 

Cl/16 

MULT BY 4 

t {E/4 REALLY) INTO PD. 

2 

DDV 

TSLT 

VBARS 

COSG/2 

ASKEP/2 s ARC5IN(VBAR5 COSG SING/E) 

GAMMAL 

1 

t FROM PD. 

ASKEP into PD. 

1 

DAD 

VL 

A5P1 = Q2 + 03<VL-U4) = 02* + U3 VL 

Q3 

Q2 

ASPl + ASKEP INTO PD. 

0 

GAMMAL 1 \ 

POINTe \ ^ 

GAMMAL / 

HOI NT 2 / 
GAMMAL 1 / 

Modify gammali 

3 

DDV 

KTB 

DDV 

VI 

ASPUP = -C12 LOG(Vl VI Q7/VBARS D)/GAMM 

ALl 


ASPUP 


YUL SYSTEM FOR A&C<H REViSluN 0 OF PROGRAM SOLRUMSS BY 


L RE-ENTRY CONTROL 


OAie 

REF 

4 

LAST 

711 

31 

,7322 

0132 7 

0 


0A19 

REF 

6 

LAST 

712 

31 

*7323 

0 1604 

1 


0420 

REF 

5 

LAST 

710 

31 

,732^ 

01602 

1 


0421 

REF 

1 



31 

7325 

2043 J 

0 


0422 

REF 

1 



31 

732b 

21110 

1 


0423 

REF 

5 

LAST 

712 

31 

732 1 

0002 1 

1 


0424 





31 

7 3 30 

64/75 

0 

D^P 

Q42S 





31 

7331 

64/12 

1 

D^P 

0426 

REF 

1 



31 

7332 

21166 

0 


0427 

REF 

8 

LAST 

709 

31 

7333 

01347 

0 


0428 

REF 

9 

LAST 

708 

31 

733h 

01620 

1 


0429 

REF 

6 

LAST 

713 

31 

7335 

01602 

1 


0430 





31 

7336 

66774 

D 

DSJ 

0431 





31 

7 337 

64742 

1 

OMP 

0432 





31 

7340 

70742 

1 

dad 

0433 

REF 

1 



31 

7341 

21102 

1 


0434 

REF 

5 

LAST 

712 

31 

7342 

OlblO 

1 


0435 

REF 

1 



31 

73'+3 

21100 

0 


0436 





31 

7344 

47575 

0 

NDLDD 

0437 





31 

7 345 

65672 

1 

BDSJ 

0438 

REF 

6 

LAST 

704 

31 

7346 

01111 

1 


0439 





31 

7347 

00005 

1 


0440 

REF 

1 



31 

7350 

33225 

1 

STORE 

0441 





31 

7351 

47572 

1 

ndlod 

0442 





31 

7352 

65132 

1 

A3S 

0443 





31 

7353 

73615 

1 

BMN 

0444 





31 

73 54 

41556 

1 

LDDON 

044 5 





31 

7355 

41532 

0 

LODON 

0446 

REF 

1 



31 

7356 

21124 

0 


04‘t7 

REF 

1 



31 

7357 

16203 

L 


0448 

REF 

1 



31 

7360 

00013 

0 


0449 

REF 

1 



31 

7361 

23370 

1 


0450 

REF 

2 

LAST 

713 

31 

7362 

01225 

0 


0451 

REF 

1 



31 

7363 

1637 7 

0 


0452 

REF 

12 

LAST 

712 

31 

7 364 

01365 

0 


0453 

REF 

2 

LAST 

709 

31 

7365 

01371 

0 


0454 

REF 

1 



31 

7366 

33600 

1 

STDRE 

0455 

0456 





31 

31 

7367 

7370 

66774 

56/12 

0 

0 

GETVCOR DSJ 

TSRT 

0457 





31 

7371 

61672 

0 

bDDV 

0460 

REF 

2 

LAST 

709 

31 

7372 

01325 

1 


0461 

REF 

3 

LAST 

713 

31 

7373 

01225 

0 


04615 





31 

7374 

00003 

1 


0462 

REF 

2 

LAST 

713 

31 

,7375 

01600 

0 



NASA lO2llO0-Oai 


1966 


(MAIN) PAGE 713 




USER*S OWN PAGE NO. 16 


07 

VBARS 

AO 

LOG 

C12 

GAMMALl aSPUP UNTO PD 

1 ASPDWN = KC3 ROOT V / AO 

DDV 


ROOT 

V 

AO ASPDWN INTO PD, 


2 

DAD 

DAD 

06 

GAMMAL 

Q5 


m5P3 = US (Q6-GAMMAL) 


ASP = ASP1+ASKEP+ASPUP+ASP3 
ASP INTO PD 


I 

TSRT 

THETAH 

A 

DIFF 


A 

DSU 

TEST 

BMN 

DSU 

25NM 

GOTOUPSY 

HIND 

GETVCOR 

DIFF 

DCONSTD 

Vi 

VIOLD 

VCORR 



UIFF = (ASP-THETA) /16 

end of test 


IF ABS( (THETAH-ASP) - 25NM NEGfGOTOUPSY 
IF HIND SET, GO TO GET LV THE REPeATWAY 
if DIFF NEG, GO TO CONSTD 
VCORR = VI - VIOLD 


getting up DIFFOLD ON THE wAY 


vCORR = VI - VIOLD 



484578A YUL SYSTEM FOR AGC4; REVISION 0 OE PROGRAM SOLRUMSS ST 


L re-entry control 


0463 

REF 

4 

LAST 

713 

31 W376 

01225 

0 



0463s 





31 ♦ 737 7 

00003 

1 



0464 

REF 

3 

LAST 

713 

31 *7400 

33600 

1 


STORE 

04641 





31*7401 

77576 

0 


EXIT 

04 642 

REF 

30 

LAST 

702 

31*7402 

0 2276 

0 


TC 

04643 





31 * 7 403 

02003 

0 


OCT 

04644 

ref 

1 



31 *7 40h 

3 7514 

0 


CAF 

04645 

ref 

4 

LAST 

707 

31*7405 

5 1374 

0 


T5 

04646 

REF 

221 

LAST 

690 

3 1 * 7406 

3 5501 

0 


caf 

04647 

REF 

23 

LAST 

654 

31*7407 

5 0122 

0 


TS 

04649 

REF 

96 

LAST 

708 

31*7410 

0 4000 

0 


TC 

046S 





31*7411 

47574 

1 


NOLOO 

0466 





31*7412 

65616 

0 


0OSJ 

0467 





31 * 74 1 3 

70776 

0 


OAO 

0468 

REF 

1 



31 *7414 

21120 

1 



0469 

REF 

1 



31*7415 

23421 

1 



0470 

ref 

4 

LAST 

714 

31*7416 

01600 

□ 



0471 

REF 

5 

Last 

714 

31*741 7 

33600 

1 


STORE 

0472 





31*7420 

70774 

1 

CHKVL 

DAD 

0473 





31*7421 

66 756 

0 


DSJ 

0474 





31*7422 

41472 

0 


LODON 

0475 

REF 

6 

LAST 

714 

31*7423 

01600 

0 



0476 

REF 

7 

LAST 

712 

31*7424 

0l6lo 

1 



0477 

REF 

8 

LAST 

712 

31*7425 

21174 

0 



0478 

REF 

1 



31*7426 

23433 

1 



0479 

REF 

7 

LAST 

714 

31*7427 

01600 

0 



0460 





31 * 7 430 

00002 

0 



04B1 

REF 

8 

LAST 

714 

31*7431 

33600 

1 


STORE 

0482 





31*7432 

70776 

0 

GETNUVl 

OAO 

0483 

REF 

13 

LAST 

713 

3 1 * 74 33 

01365 

0 



0484 

REF 

9 

LASF 

714 

31 * 7 434 

0l600 

0 



0485 

REF 

14 

LAST 

714 

31 * 7 43 5 

33365 

1 


STORE 

0486 





31 * 7 436 

45176 

0 


D'^OVE 

0487 

REF 

5 

last 

7l4 

31*7437 

01225 

0 



0488 

REF 

3 

LAST 

713 

31 *7440 

33325 

0 


STORE 

0489 





31 *7 44 1 

43575 

1 


TEST 

0490 





31*7442 

42572 

1 


SWITC 

0491 

REF 

2 

LAST 

713 

31*7443 

00013 

0 



0492 

REF 

2 

LAST 

709 

31*7 *+4^ 

23106 

1 



0493 

REF 

3 

LAST 

714 

3 1 * 7 4 4 5 

00013 

0 
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DEC 4t 1966 


(MAIN) 


PAGE 714 


USER'S OWN page NO. W 


DIFE 

2 

VCQRR / 
/ 

0 


PhASCHNG Have GROUP 3 PICK UP AT PRFHUNT. 

02003 3.16 RESlART, 


adendext sidetrack next pass until this one done, 

gotoaldr only after restart is left after Detour. 


ZERO 

OVFIND 



ZERO OVFIND TO GUARD AGAINST FUTURE BOV 


InTPRET 


2 

bPL IS VCORR - 1000 POS. 

VCORR = 1000 

VCORLlM 

CHKVL 

VCORR leaving VCoRLIM IN MPAC 

VCORR 

2 

bMN iF VL + VCORR - VSAT P03» VC0RR=VC0RR/ 

TSRT 

VCORR 

VL 

HALVE 

GETNUVl 

VCORR 

I 

VCORR 


0 

VI 

VCORR 

VI 

0 SAVE OLD VALUE OF ASP 
DIFF 

DIFFOLD 

1 SET HIND AND GO TO HUNTESTl 

rrc 

HIND 

HUNTESTl 

HIND 


ft O'* 


« 




YUL SYSTEM FOR AGC^: REVISION 0 01 PROGRAM S0LRUMS5 BY 


L RE-ENTRY CONTROL 


UA9A 

REF 

3 

LAST 

714 

3 1 ♦ 7 44b 

23106 

1 


0A95 





3 1 * 7447 

47575 

0 NEGAMA 

NDLOO 

0A96 





31»7450 

64722 

L 

OMP 

0A97 

REF 

8 

LAST 

714 

31*7451 

01616 

1 


QA98 

REF 

1 



31*7452 

21045 

0 


0A982 





31*7453 

64776 

0 

O ' A ? 

0498A 

REF 

6 

LAST 

710 

31 * 7 4 5 4 

01341 

0 


0A986 

REF 

2 

LAST 

715 

31*7455 

21045 

0 


0A99 





31*7456 

70 ^73 

0 

DAO 

0500 





31*7457 

64722 

1 

D'^P 

0501 





31*7 4 bU 

62712 

1 

ODV 

0502 





31*7 46 1 

65706 

0 

BDbJ 

0503 

REF 

2 

LAST 

711 

31*7462 

0 1 4 3 6 

1 


050A 

REF 

1 



31 * 7 463 

21047 

1 


0505 

REF 

6 

LAST 

711 

31 * 7464 

01440 

0 


0506 

REF 

2 

LAST 

711 

31*7465 

21164 

1 


0507 

REF 

4 

LAST 

711 

31*7 466 

0 1 a34 

0 


0508 

REF 

9 

LAST 

715 

31*7467 

01616 

1 


0510 





31*7470 

70776 

0 

DAD 

0511 

REF 

10 

LAST 

715 

31*7471 

01616 

1 


0512 

REF 

11 

LAST 

715 

31*7472 

33616 

0 

STDRE 

0513 





31*7473 

47573 

0 

NDLDD 

0514 





31 *7474 

62726 

0 

DDv 

0515 





31*7475 

51132 

0 

OSD 

0516 





31*7476 

62 776 

0 

DDV 

0517 

REF 

4 

LAST 

711 

31 * 7477 

Olb32 

1 


0518 

REF 

14 

LAST 

710 

31*7500 

21043 

0 


0519 

REF 

6 

LAST 

711 

31*7501 

OlbBO 

0 


0520 

REF 

4 

LAST 

711 

31*7502 

01331 

1 

store 

0521 

REF 

5 

LAST 

713 

31*7503 

3332 7 

1 

05212 





31 * 7 504 

51176 

0 

DSD 

05213 

REF 

12 

LAST 

715 

31 *7505 

01616 

1 

STORE 

05214 

REF 

7 

LAST 

713 

31*7506 

33604 

0 

0522 





31*750 f 

45176 

0 

D^OVE 

0523 

REF 

3 

LAST 

709 

31*7510 

21057 

0 

STORE 

0524 

REF 

6 

LAST 

713 

31*7511 

33610 

0 

0525 





31*7512 

76 776 

0 

ITC 

0526 

REF 

1 



31*7513 

2325D 

1 
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HUNTESTl 

USER'S OWN page no. IB 

1 

DMP 

lnteR with gammal in mpac 

FIND gammal VL / 3 

VL 

1/3RD 

.. AND PUSH DOWN PARTIAL RESULT.. 

3 

1/3RD / 

PUSH LEWD/3 ALSO 

3 

DMP 

DDV 

EiDDV 

AHOO<Dv 

1/12TH 

DVL 

uEL VL = GAMMAL VL/3) /( LEWD/3 - DVL(2/3 
♦ AHOOiCDV) (CHI GS/DHOOK VL) ) 

CHI 

OHOO< j 

VL ' / 

/ 

2 OUT OF *1 INTO PUSH 

0 

VL 

VL 

vL = VL *■ DEL VL 

3 

bDSU 

DSU 

FACTI 

NEAR ONE 

ALP 

FACT2 

Q7 

VL IS IN MPAC 

07 = ( ( 1-VL/FACTl ) SQ - ALp)/ FACT2 

0 

VL 

VbARS 

GET NEW VbARS* 

0 

32EROS 

gammal 

0 

ranger 

uAMMAL = 0 


*+B^tb78A YUL SYSTEM FOR AGCA: REVISION 0 OF PROGRAM SoLRUMbS BY 


L RE-ENTRY CONTROL 


0S262 

REF 

1 



3 1 * 7 5 1 A 

56513 

0 

adendext 

CAOR 

0b2622 

REF 

A 

LAST 

621 

3 1 1 7 5 1 b 

0 3 A6 2 

1 

PREHUNT 

1 C 

0b262A 





31*7516 

OOIAO 

1 


OCT 

052626 

REF 

2 

LAST 

706 

31*7517 

0 7006 

0 


TC 

0526A 






27.6201 


bank 

0527 

REF 

1 



27*6201 

56216 

1 

UPCADR 

CAOR 

052B 





27*6202 

77576 

0 

G0T0UP5Y 

EXIT 

0529 

REF 

1 



27.6203 

3 6201 

1 

HUNTDUMP 

caf 

05292 

REF 

5 

LAST 

7lA 

27 *620 A 

5 137A 

0 


T5 

05295 

ref 

AO 

Last 

706 

27*6205 

0 2362 

1 


IC 

05297 





27*6206 

00065 

1 


OCT 

05298 

REF 

221 

LAST 

699 

27.6207 

A Ab 1 6 

0 


CS 

052965 

REF 

68 

LAST 

698 

27 .6210 

0 2312 

0 


TC 

05299 
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1 



C18 


0697 

REF 

1 



27*6530 

16233 

1 



CONTI 


0698 





27*6531 

A2575 

0 

PREF INAL 

SWITCH 

1 

CHANGE GOTOADDR TO PREDICTS AND FALL 

0699 





27*6532 

77576 

0 


EXIT 


INTO PREDICTS 

06995 

REF 

2 

LAST 

70A 

27*6533 

00011 

1 



EGSW 


06997 

REF 

222 

LAST 

7l6 

27*653A 

A A5l6 

0 


cs 

ONE 


06998 

REF 

69 

LAST 

716 

27*6535 

0 2312 

0 


TC 

NLWPHASE 


06999 





27*6536 

00003 

1 


DCT 

3 


0700 

REF 

1 



27*6537 

3 6522 

1 


CAP 

P3CADR 

Set to predicts phase. 

07005 

ref 

a 

LAST 

721 

27*65A0 

5 137A 

0 


T5 

GOTOADDR 

0701 

REF 

A2 

LAST 

721 

27*65A1 

0 2362 

1 


TC 

NE WMODE 


07015 





27*6592 

00067 

0 


OCT 

00067 


0702 

ref 

100 

LAST 

721 

27*6593 

0 AOOO 

0 


T C 

I NT PR FT 

,,, AiviD Fall into predicts... 


0703 

0704 

0705 

0706 

0707 

0 r08 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716 

0717 

0718 

0719 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

0727 

0728 

0729 

0730 

0731 

0732 

0733 

0734 

0735 

0736 

0737 

0738 

0739 

0740 

0741 

0742 

0743 

0744 

0745 

0^46 


YUL system for A0C4: REVISION 0 OF PROGRAM SOLRUM55 BY NASA 1021106-021 


DEC 4» 1966 


(Main) page 723 


RE-ENTRY CONTROL USER *5 QwN PAGE NO. 26 


Suborbital 

CONTROL 

(REFERENCE TRAJECTOORY BY 

TA3LE LOOK-JP.) 







27 * 6 5 44 

66772 

0 

PREDICTS 

D5J 

4 







27 1 6545 

73605 

0 


BM'M 

LODON 

t 

> 

VOUlT NEG* STOP STEERING 





27»654fa 

4357b 

1 


TEST 








27 * 6 5 4 7 

41612 

1 


vxv 

DDT 

IF (HT) i^UNITk.UNl NEG, SET GONEPAST 





27 *6550 

73775 

0 


B'IN 

EXIT 



REF 

16 

LAST 

722 

27t6551 

01620 

I 



V 



REF 

1 



27 » 6552 

21120 

i 



VGUIT 



REF 

1 



27t6553 

17006 

1 



STEER 



REF 

1 



27*6554 

00007 

0 



GONEPAST 



REF 

1 



27*6555 

16700 

1 



GONEGLAD 



REF 

3 

LAST 

702 

27*6556 

01215 

0 



RT 



REF 

20 

LAST 

702 

27*6557 

OlO 1 6 

1 



UN I T R 



REF 

3 

LAST 

702 

2 7 * 6 560 

01562 

1 



UNI 

(MIGHT 

SAVE THIS FROM EARLIER.. 

REF 

1 



27.6561 

16676 

1 



SETGPAST 



REF 

1 



27*6562 

4 5642 

0 


CS 

NEG 1 A 



REF 

1 



27*6563 

5 1107 

0 

BACK 

T5 

JJ 



REF 

17 

LAST 

723 

27*6564 

4 1617 

1 


C5 

V 



REF 

2 

LAST 

723 

27*6565 

2 1107 

1 


INjEx 

JJ 



REF 

1 



27*6566 

6 7203 

1 


AD 

VREFER 

VREF - 

V, HIGHEST VREF AT END OF TABLE 

REF 

495 

LAST 

691 

27*6567 

1 0000 

0 


CCS 

A 

IF VREF 

-V POS LOOP BACK 

REF 

3 

LAST 

723 

27.6570 

1 1107 

1 


r- r* C. 
w □ 

JJ 

decrement JJ , JJ CANNOT BE ZERO 

REF 

1 



27*6571 

0 6563 

1 


TC 

BACK 



REF 

223 

LAST 

722 

27*6572 

6 4 5 1 6 

1 


AD 

ONE 



REF 

5 

LAST 

708 

27*6573 

5 1420 

0 


T5 

TEMLB 

V-VREF 

IN TEMitj (Must be positive num) 

REF 

4 

LAST 

723 

27*65/4 

2 1107 

1 


INDEX 

JJ 



REF 

2 

LAST 

723 

27*6575 

4 7203 

0 


CS 

VREFER 



REF 

5 

LAST 

723 

27*6576 

2 1107 

1 


INDEX 

JJ 



REF 

3 

LAST 

723 

27*6677 

6 7204 

0 


AD 

VRF_FER + 1 

V (K+ 1 ) 

- V(K) (POS NUM) 

REF 

6 

LAST 

723 

27*6600 

3 1420 

0 


XC4 

TEMIB 







27*6601 

2 577^ 

1 


EXTEND 




REF 

7 

LAST 

723 

27*6602 

5 1420 

0 


DV 

TLMIB 



REF 

1 



27.6603 

5 1422 

1 


TS 

GRAD 

GR AD “ 

(V-VREF) / (VK+1 - VK) (POS NUM 

REF 

14 

LAST 

576 

27 * 6 6 0 4 

3 4477 

1 


CAF 

FIVE 



REF 

1 



27*6605 

5 1421 

1 

eACK2 

TS 

Ml 



REF 

1 



27*6606 

3 7201 

0 


CAF 

DEC15 



REF 

6 

LAST 

723 

27*660 7 

6 1107 

0 


AD 

JJ 



REF 

7 

LAST 

723 

27*6610 

5 1107 

0 


TS 

JJ 



REF 

496 

LAST 

723 

27.6611 

2 0000 

0 


INDEX 

A 



REF 

4 

LAST 

723 

27*6612 

4 7203 

0 


CS 

VREFER 



REF 

6 

LAST 

723 

27.6613 

2 1107 

1 


INDEX 

JJ 



REF 

5 

LAST 

723 

27*6614 

6 7204 

0 


AD 

VREFER + 1 

X (K* 1 ) 

- X(K) 





27*6615 

2 5777 

1 


EXTEND 




REF 

2 

LAST 

723 

27*6616 

4 1422 

0 



GRAD 




YUL SYSTEM FOR AGc<»: HtVlSljN 0 Oh PROGRAM SOLRUMSS BY 


L re-entry control 


U7A7 

PEF 

9 

LAST 

723 

27.6617 

2 110? 

1 

I MOEX 

07aB 

REF 

6 

LAST 

723 

27,6620 

6 7203 

1 

AO 

0 

REF 

2 

LAST 

723 

27.6621 

2 1421 

0 

INDEX 

U7S0 

REF 

1 



27 . 662 2 

5 1100 

1 

T5 

07S1 

REF 

3 

LAST 

72a 

27.6623 

1 1421 

0 

CCS 

07S2 

REF 

1 



27t662A 

0 6605 

1 

TC 

07S3 

ref 

2 

LAST 

72A 

27 .6525 

4 1101 

1 

C5 

0 7SA 





27.6620 

4 0000 

0 

COv| 

U / S 5 

REF 

18 

LAST 

721 

2 7 » 6 6 2 ? 

6 1362 

i 

AO 

U7S 6 





27 .6630 

2 577? 

i 

EXTEND 

0757 

REF 

3 

LAST 

72A 

27.6631 

4 1105 

0 

v^? 

0758 

REF 

8 

LAST 

723 

27.6532 

5 1420 

0 

T5 

0759 

REF 

13 

LAST 

720 

27 . 6 6 3 3 

A 13A6 

0 

CS 

07o 0 





27 » 66 3 A 

6 0000 

1 

OOJBLt 

0761 





27.6635 

6 0000 

1 

DDjBLt 

0762 





27.6636 

6 0000 

1 

OOJBLt 

0763 

REF 

A 

LAST 

72a 

27.6637 

6 1103 

1 

AO 

076A 





27.66A0 

2 5777 

1 

EXTEND 

0765 

REF 

5 

LAST 

72A 

27 t66A 1 

4 1 104 

1 

MP 

0766 

REF 

9 

LAST 

72a 

27.66A2 

6 1420 

0 

AO 

07o7 

REF 

6 

LAST 

72A 

27 .66A3 

6 1102 

0 

AO 

0768 

REF 

1 



2 ? .6644 

3 1106 

1 

XCH 

0769 

REF 

101 

LAST 

722 

27 .6545 

0 AOOO 

0 

TC 

0 770 





27 » 6 5 A 0 

A3i 75 

0 

SYOVE 

0771 





27 .654 f 

56726 

1 

TSRT 

0772 

REF 

2 

LAST 

72a 

27.6650 

01107 

0 


07 73 





27.6651 

00004 

0 


077A 

REF 

7 

Last 

713 

27.6652 

0111 1 

1 


0 7 75 





27.6653 

43173 

0 

SYOVE 

0776 





27.6654 

61716 

0 

900V 

0777 





27.6655 

71742 

0 

BOV 

0778 





27 .6656 

71776 

1 

30 V 

07762 

REF 

7 

LAST 

72A 

27.665 f 

01101 

0 


07Y6A 





27.6 660 

7777 7 

0 


07 79 





27.6661 

OOuOb 

1 


0780 

REF 

1 



27.6662 

16705 

1 


0781 

REF 

1 



27. 6663 

21170 

1 


0782 

REF 

2 

LAST 

72A 

27.6664 

16705 

1 

store 

0783 

ref 

7 

LAST 

7 19 

27 .6665 

33223 

1 

078A 





2 7 * 6666 

76776 

0 

ITC 

0785 

REF 

1 



27.6667 

16712 

1 


0786 





27.6670 

45176 

0 

GOPDSLAD OYOVE 

0787 

REF 

8 

LAST 

720 

27 .6671 

21144 

0 

STORE 

0788 

REF 

8 

LAST 

72A 

27.6672 

33223 

1 


JASA 1021108-021 


DEC A, 1966 (MAIN) PAGE 72A 


USER'S OWN page NO. 27 


JJ 

VREI-ER 

Ml 

FX 

Ml 

DAC<2 
FX +1 
D 



FX = AK + GRAD (AK+l - AK) 


7^ 


oun;t destroy fx +i 


Fx + 5 
TLMIB 

ROOT 


F1 

TEMlb= FKD-DREF) 

form RDOTREF - ROOT 

SCALE UP BY 8 FOR THIS PHASE 


FX + 3 


KDOTREF 


F X + A 
TEMIB 

FX + 2 

preoang 

INTPRET 


F2 

add F2 (DADVI-DADVR) 
KTOGO 

HO OVERFLOW SKIP PLEASE 


1 

bUSJ 

PREDANG 

3 

The t Ah 


ThETAH - PRED ANGLE 


3 

TSLT 

DAD 

FX 


gomaxl/d 


GOMAXL/D 

L/D 

0 

GLIMITER 


\ 


FX = DRANGE/D L/D = Y 


0 

LAO 

L/D 




T 


II Ji.- ^ 



^d^b78A YUL SYSTEM FOR AGC4; REVISION 0 OF PROGRAM SOLRUMS5 BY 


L RE-ENTRY CONTROL 


U /89 





27,66/3 

767 76 

0 


ITC 

U790 

REF 

10 

LAST 

719 

27 ,6674 

16740 

0 



07 91 





27,66 /5 

42 5 76 

0 

SETGPA5T 

SWITCH 

0792 

REF 

2 

LAST 

723 

27,6676 

00007 

0 



U793 





27,66 fl 

47176 

1 

GONEGLAD 

COMP 

079A 

REF 

9 

LAST 

724 

27,6700 

21144 

0 



0795 

REF 

9 

LAST 

724 

27,6701 

33223 

L 


STORE 

0796 





27,6702 

76776 

0 


ITC 

0797 

REF 

2 

LAST 

724 

27,6703 

16712 

1 



079B 





27*67 04 

765 75 

1 

GOMAXL/D 

RTB 

0799 





27,5705 

64776 

0 


OMP 

0800 

REF 

2 

LAST 

719 

27,6706 

20607 

1 



0801 

REF 

10 

LAST 

725 

27 ,6707 

21144 

0 



0802 

REF 

10 

LAST 

725 

27,6710 

33223 

1 


STORE 

0803 





27,6711 

66774 

0 

GLIMITER 

OSJ 

0604 





27,6712 

43742 

1 


apL 

0805 





27,6713 

73722 

1 


BMN 

0806 

REF 

1 



27,6714 

21202 

1 



0807 

REF 

19 

LAST 

724 

27,6715 

01363 

0 



0808 

REF 

11 

LAST 

725 

27,6716 

16740 

D 



0809 

REF 

2 

LAST 

725 

27,6717 

21202 

1 



0810 

REF 

2 

LAST 

717 

27 ,6 720 

16671 

0 



0811 

REF 

2 

LAST 

720 

27,6721 

21206 

0 



0812 





27,6722 

64 775 

0 


OMP 

0013 





27,6723 

70722 

1 


OAO 

0814 

REF 

3 

LAST 

720 

27,6 724 

01432 

0 



0015 

REF 

1 



27,6725 

21204 

1 



0816 

REF 

11 

LAST 

725 

27,672t> 

21144 

a 



0817 





27,6727 

62 774 

1 


DOV 

0818 





27,6730 

70653 

0 


DAO 

0819 





27,6731 

70 756 

1 


DAD 

0821 

REF 

1 



27,6732 

2l2l0 

1 



0822 

REF 

5 

LAST 

721 

27,6733 

01343 

1 



0023 





2 7,6 7 3*, 

7777 7 

0 



0824 

REF 

14 

LAST 

724 

27,6735 

0134 7 

0 



0825 

REF 

3 

LAST 

725 

27,6736 

16671 

0 




1021108-021 


DEC A * 1966 


(MAIN) PAGE 725 


0 

LIMITL/D 

USER'S O^N PAGE NO. 28 

0 

GONEPAST 

SHOULD bE BY TARGET IF HERE. 

0 

LAD 

L/D 

0 

GLIMITER 

L/D = - LAD 

1 

L/D = LAO SIG(MPAC) 

SIGNMPAC 

LAD 

L/D 

and FALLS INTO UMilL/D SECTION, 

2 

DAD 

DMP 

&MAX/2 

D 

LIMITL/D 

GMAX/2 

IF GMAX/2-D POS, GO TO UMITL/D 

IF GMAX-D NEG, 00 TO GOPOSLAD 

GOPOSLAO 

2H5 

4H5(gmax-d) into pd 

1 

DMP 

LEQ 

1/GMAX 

LAD 

2HS(GMAX-D) (LEQ/GMAX+LAD) INTO PD 

2 'N 

SORT \ 

BMN \ 

2HSGMXS0 \ 
VSOUARE ' 

ALIM = SORT (PD+ (2HSGMAX/V) SO) 

IF RDOT+XLIM NEg, L/psLAD 

1 

ROOT 

1 

1 KGLIM25S -5 SCALED 

GOPOSLAD y 


/ 

A 

f r 

.V 

1 y 


'♦a^5>78A YUL system FOR AGC4: REVISION 0 □*- PROGRAM SoLRUMSS BY NASA 1021108-021 


OEC a » 1966 


(Main) page izt 


L re-entry control USER'S OWN PAGE NO. 29 


PU836 

comes 

HERE TO 

computl 

ROLL COMMAND, C 

HECK lateral 

ERRORS 

, AND steer 


0836 





27,6737 

4 3575 

1 

LIMITL/D 

TEST 

1 

1^0 lateral control if past target 

u839 





27,6740 

64/42 

1 


O'lP 

DAD 

Y = KLAT VSQUARE + LAT0IAS 

03A0 

REF 

3 

LAST 

725 

27,6741 

0000 7 

0 



GONEPAST 


08A1 

REF 

1 



27,6742 

16776 

0 



L355 


08A2 

REF 

6 

LAST 

725 

27,6743 

01343 

1 



VSQOARE 


08A3 

REF 

1 



27 ,6 744 

21150 

0 



KLAT 


08AA 

REF 

1 



27,6745 

21152 

1 



LATBIA5 


0845 

REF 

1 



2 7 , 6 7‘,6 

32u25 

1 


STORE 

Y 


0846 





27,6/47 

65172 

0 

L350 

A35 

4 

aF ADS(L/D)-L/DCMInR NEG, go to L353 

0847 





27»6750 

66 756 

0 


05J 

BMN 


0846 





27,6751 

4 1 45t> 

0 


LOOON 

SIGN 

IF K2R0LL LATANG NEG, GO TO L357 

0049 





27,6752 

73605 

0 


3HN 

LODOIM 


0050 





2 /tb ?53 

56776 

1 


TSRT 


Y = Y/2 

0851 

REF 

11 

LAST 

725 

27,6754 

01223 

0 



U/D 


0052 

REF 

1 



27,6 755 

21176 

1 



L/DCMINR 


0853 

REF 

1 



27,6756 

16766 

1 



L353 


0854 

REF 

2 

LAST 

702 

27,675 f 

01113 

0 



latang 


0855 

REF 

1 



27,6 ?60 

01373 

1 



K2R0LL 


0856 

REF 

L 



27,6761 

17070 

0 



L35? 


0857 

REF 

2 

LAST 

726 

27,6762 

00025 

0 



Y 


0858 





27,6 763 

00002 

0 



1 


0859 

REF 

3 

LAST 

726 

27,6764 

32025 

1 


STORE 

Y 


08b0 





27,6765 

53774 

0 

L353 

SIGN 

2 

AF latang SIGNIK2R0LL) - Y POS, SWITCH 

08bl 





27,6766 

66 75b 

0 


OSJ 

bHN 

IF POS, GO TO BL361 IN BASIC. 

08o2 





27,6767 

76576 

1 


RTa 



0063 

REF 

3 

LAST 

726 

27,6770 

01113 

0 



LATANG 


0864 

REF 

2 

LAST 

726 

27,6771 

01373 

1 



K2R0LL 


0865 

REF 

4 

LAST 

726 

27,6772 

00025 

0 



y 


0866 

REF 

2 

LAST 

726 

27,6773 

16776 

0 



L355 


0869 

REF 

1 



27,6774 

17045 

0 



BL3bl 


0870 





27,6775 

627 74 

1 

L355 

oov 

2 

KOLLC = ACOSt (L/D) /LAD) 

0871 





27,6776 

56703 

0 


TSRT 

ACD5 


0872 





27,6777 

53776 

1 


SIGN 


KOLLC s ROLLC SIGN(K2R0LLy 

0873 

REF 

12 

LAST 

726 

27,7000 

01223 

0 



L/D 


0874 

REF 

12 

LAST 

725 

27,7001 

21144 

0 



Lad 


0875 





27,7002 

00002 

0 



1 


0876 

REF 

3 

LAST 

726 

27,7003 

01373 

1 



K2R0LL 


0877 

ref 

3 

LAST 

620 

27,7004 

33473 

1 


STORE 

ROLLC 



^a'f.t)78A YUL system FQR A&Cffl 


REVISION 0 OK RRoQRAM S0LRUM55 BY 


L re-entry control 


0878 





27t7005 

77576 

0 

STEER 

EXIT 

0882 

REF 

23 

LAST 

6l4 

27^7006 

3 

4503 

0 

STEER2 

CAF 

0863 





27»7C)U7 

2 

5777 

i 


EXTEND 

0864 

ref 

4 

LAST 

726 

27*7010 

4 

1472 

0 


MP 

08841 

REF 

516 

LAST 

691 

27»7011 

5 

0115 

1 


T5 

08842 

REF 

29 

LAST 

6l8 

27*7012 

3 

4504 

1 


CAF 

086A3 





27*7013 

2 

5777 

1 


EXTEND 

086A4 

REF 

1 



27 *701^* 

4 

13 52 

0 


M? 

08845 

REF 

517 

LAST 

727 

27*7015 

6 

0115 

1 


AD 

08b5 

REF 

8 

LAST 

618 

27*7016 

6 

1A50 

1 


AD 

0 8 86 

ref 

518 

LAST 

727 

27*701/ 

5 

Oils 

1 


TS 

0887 





27*7020 

0 

7024 

0 


TC 

088P 

REF 

497 

LAST 

72 3 

27*7021 

2 

0000 

0 


index 

0889 

ref 

8 

LAST 

390 

27*7022 

3 

4477 

1 


CAF 

0890 

REF 

519 

LAST 

727 

27,7023 

6 

0115 

1 


AD 

08908 





27 * 7 024 

2 

0017 

0 


INRINT 

0891 

REF 

32 

LAST 

628 

27*7025 

5 

0700 

0 


TS 

08912 

REF 

16 

LAST 

580 

27*7026 

4 

4514 

1 


cs 

08913 

ref 

5 

LAST 

154 

27*702/ 

7 

0675 

1 


MASK 

08914 

ref 

17 

LAST 

727 

27,7030 

6 

4514 

0 


AD 

08915 

REF 

6 

LAST 

727 

27*7031 

5 

0675 

0 


TS 

0892 

REF 

31 

LAST 

714 

27*7032 

0 

22 76 

0 

OVERNOUT 

TC 

08922 





27*7033 

01405 

1 


DCT 

08923 

REF 

24 

LAST 

592 

27*7034 

0 

3302 

0 


TC 

08924 

REF 

1 



27*7035 

0 

7042 

0 


TC 

08925 

REF 

1 



27*7036 

3 

7043 

1 


CAF 

08926 

REF 

42 

LAST 

592 

27*7037 

0 

3100 

0 


TC 

08927 

REF 

4 

LAST 

592 

27*7040 

0 

3250 

0 


TC 

08928 

REF 

28 

LAST 

592 

27*7041 

0 

3362 

0 


TC 

08929 

REF 

106 

LAST 

697 

27*70^2 

0 

2124 

1 

endentry 

TC 

089295 





27*7043 


00662 

0 

V06N62 

OCT 


102U08-021 


OeC 1966 


(MAIN) PAGE 727 


USER'S OWN page no, 30 


1/8 TH, 

SCALE ROLL OUTPUT FOR 16 SPEEU. 


1/16 TH. 

BIAS AOG FROM LIFT UP ORIENTATION 
Roll 5 ROLLC/8 + ROLLfllAS/16 ♦ KIROLL 

mFRAID to STORE POSS BAD NUM IN THETAD 
SKIPS ON OVERFLOW 

mLLOW overflow (GO TO NEGMAX FROM POSMX 
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DE 


n n n n n n n ri ri n ri r> n 


NASA 1021108-02L 


1966 


(MAIN) PAGE 73S 


DEC A, 



USER'S OV^N PAGE NO. 38 

•000371 

.000371 

.004770 

.008081 

.016030 

.035815 

.069422 

.104519 

.122 

.172407 

.252852 

.363148 

.512963 

URANGE/U L/0 SCALED Y/2700 

.558519 

.558519 

END OF stored reference 


YUL SYSTEM FOR AGc4; REVISION Q Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4, 1966 


{MAIN) PAGE 736 


L Re-entry control useR'S o^n page no. 39 


P1073 

continuation of re-entry SE'CTION In 

2ND BANK. 

(CONSTANTS AND M923=8 


10?4 


30,7042 


BANK 

30 


lOfiO 

30*7042 

37777 

1 

NEAkONE 

20tC 

.999999999 


C1080 

30*7343 

37 777 

1 





1081 

30*7344 

12525 

0 

1/3RD 

20EC 

.333333333 

ONE THIRU 

CiObl 

30 * 734S 

12525 

0 





1082 

30.734b 

0252 5 

1 

1/12TH 

20EC 

.0833333333 

UNE twelfth 

C1082 

30*7047 

12625 

0 





R1063 

VSAl = 

25766,1973 FT/SEC 

« 



R1084 




RE = 

21*202*900 FEET 


108S 

30*70SQ 

03146 

1 

LEWDI 

2 DEC 

#1 ^ 

n 

C1085 

30*7061 

146 32 

0 





1066 

30*7062 

06314 

1 

LEWD2 

20EC 

.2 1 


C1086 

30*7063 

31463 

1 





1087 

30*7054 

10000 

0 

FOURTH 

20EC 

.25 


C1087 

30*7055 

00000 

1 





1088 

30*735b 

00000 

1 

3ZER0S 

20EC 

0 


C1088 

30*7057 

00000 

1 





1089 

30*7 OfaO 

00000 

1 

IBl TDP 

20CT 

00000 00001 

double PREC 1 BIT 

C1089 

30*7061 

00001 

0 





1090 

30*7062 

00000 

1 


DEC 

0 


1091 

30*7063 

07777 

1 

NEARI/4 

20CT 

07777 00000 

1/4 LESS 1 BIT IN UPPER PART. 

C1091 

30 * 7 064 

00000 

1 





1092 

30 * 7065 

00236 

0 

cia 

20EC 

.0097026346 

500/2V5 

C1092 

30 * 7 066 

36763 

0 





1093 

30,7067 

00012 

1 

KDMIN 

20EC 

.00062111801 

.5/805 

CIO 93 

30*7070 

05512 

1 




■7 

1094 

30*7071 

02000 

0 

Cl/16 

20EC 

.0625 

i/16 ^ ^ 

C1094 

30*70 U 

00000 

1 





1096 

30,70 73 

764 O 7 

0 

Q2 

20EC 

-.046388889 

-1002/21600 = (643/21600-02 (23500/2VS) ) 

C1096 

30*7074 

76670 

1 





1097 

30*7075 

05260 

0 

Q3 

20EC 

.167003132 

.07 2VS/21600 

Cl 097 

30,7076 

05572 

1 





1098 

30*7077 

12343 

0 

Q5 

20EC 

.326388889 

,3 23500/21600 

C1098 

30,7100 

21616 

0 





1099 

30,7101 

01073 

1 

06 

20EC 

,034893617 

820/23500 

C1099 

30,7102 

26234 

0 





1100 

30,7103 

00172 

0 

Q7F 

20EC 

.0074534161 

6/805 (VALUE OF 07 IN FIXED MEM.) 

Cl 100 

30*7104 

03571 

1 





1102 

30,7105 

13132 

0 

VMIN 

20EC 

,34929485 

18000/2V5 

Cl 102 

30*7106 

33062 

0 





1103 

30,7107 

00 i6U 

0 

C12 

20EC 

,00684572901 

32 28500/(21102900 2 PI) 

Cl 103 

30*7110 

05104 

1 




/ ^ 

1105 

30*7111 

11322 

1 

KBl 

20EC 

.29411765 

1/3.4 

C1105 

30*7112 

32265 

1 





1106 

30*7113 

75047 

0 

KB2 

20EC 

-.0057074322 B4 

-16/(.0034 2 VS) 

C1106 

30*7114 

72454 

1 









^b^578A YUL SYSTEM FOR AGC^t; REVISION 0 QF PROGRAM 50LRUMS5 BY 


L RE-ENTRY CONTROL 


1107 


30t71 15 

05125 

1 

C19 

23EC 

Clio? 


30,7116 

33500 

1 



1108 


30,7117 

00475 

1 

VCORLIM 

23EC 

C1108 


30,7120 

35746 

1 



1109 REF 

2 LAST 7lA 


30,7117 

VOU I T 

E3JAL5 

nil 


30,7121 

06751 

1 

C20 

2:)EC 

Cllll 


30,7122 

27515 

0 



1112 


30,7123 

00001 

0 

2 5NM 

20EC 

C1112 


30 , 7 1 2 H 

05732 

1 



1113 


30,7125 

01003 

0 

KID 

2DEC 

C1113 


30,712b 

06315 

0 



11135 


30,712 1 

71435 

0 

K2D 

23EC 

C11135 


30,7130 

75516 

1 



11 U 


30,7131 

32047 

0 

KVSCALE 

23EC 

Cl llA 


30,7132 

24367 

0 



1115 


30,7133 

37200 

1 

KASCALE 

2DEC 

C1115 


30,713A 

0563b 

1 



1116 


30,7135 

00046 

a 

KTETA 

2DEC# 

C1116 


30,7136 

1313 7 

0 



1 117 


30,7137 

00017 

1 

KT 

2DEC)t 

C1117 


30,7lA0 

30730 

0 



11175 


30,71 A1 

00040 

0 

• 05G 

23EC 

Cil 175 


30,7142 

30447 

0 



1 1 18 


30,7143 

11463 

0 

LAD 

23EC 

Cil le 


30,7144 

06315 

0 



1119 


30 , 7 l‘,5 

00023 

0 

LAD/256 

20EC 

Cl 119 


30 , 7 1<,6 

06315 

0 



1120 


30, 71*t7 

00314 

1 

klat 

2:)EC 

C1120 


30,7150 

3l463 

1 



1121 


30,7151 

00000 

1 

LATBIAS 

2DEC 

cmi 


30,7152 

17565 

1 



1122 


30,7153 

03657 

0 

KWE 

23EC 

C112? 


30,715h 

00206 

0 



1123 


30,7155 

00121 

0 

KACOS 

2DEC 

Cl 123 


30,7156 

17460 

0 



1 126 


30,715 ^ 

01000 

0 

CHOOK 

2DEC 

C1126 


30,7160 

OOOOO 

1 



1127 


30 , 7 1 6 1 

04O00 

0 

1/8TH 

2D£C 

C1127 


30,7162 

OOOOO 

1 



1128 


30 ,7163 

07534 

1 

CHl 

2 DEC 

Cl 128 


30,7 164 

05075 

0 



1129 


30,7165 

75267 

0 

KC3 

2DEC 

C1129 


30,71 66 

64700 

1 



1130 


30,7167 

05605 

1 

LOD 

2DEC 

Cl 130 


30,7170 

0365b 

1 



1131 


30,7171 

00336 

1 

VRCONT 

2 DEC 

Cl 131 


30,71 72 

21610 

0 



1132 


30,7173 

20000 

0 

HALVE 

2 DEC 

cn32 


30,7174 

OOOOO 

1 




ASA 1021108-021 

DEC 4, 1966 (MAIN) PAGE 737 


OSER'5 own page no, AO 


.16149068 

130/805 

*019405269 

1000/2VS \ 

VCORLIM 

oOTH ARE 1000 FT/SEC 

.21739130 

(175 FPSS) LIFT UP IF ABOVE C 2 O 

.0011574074 B-4 

25/(21600 16) (25 NAUT MILES) 

.0314453125 

.01 805/256 

-.201298418 

-.001 2V5/256 2—'^" 

.81491944 

12800/(2 VS .3048) 

,97657358 

5,85 16384/(4 .3048 100 805) 

,383495203 E2 B- 

.14» 1000 2PI/16384(163.84) 

.157788327 E2 B- 

.14« RE(2PI) /2V5( 16384) 163.84 

,002 

.3 

.05/25 

.001171875 

.0125 ^ 

.3/256 

.00003 

•120056652 

MPPRX .5 NM/ 4(21600/2 PI) 

.004973592 

1/32(2P1) 

1 B-5 

• 125 

.25/8 

.24 

Cl CHI/ 25 (CHI = .75) 

-.082540747 

KC3 (2VS)S(J /2PI 25 32,2 LAD R 

• 18 

,0135836886 

700/2 VSAT 


.5 


<»y^578A YUL SYSTEM FOR AGC4; REVISION 0 OF PROGRAM SOLRUM55 BY 


L RE-ENTRY CONTROL 


1133 

ref 

3 LAST 728 


27,7202 

NEGl/B 

EOJA 

1134 



30»7175 

11207 

1 

L/DCMINR 

20EC 

cn34 



30 ♦7176 

05301 

0 



1135 



30.717 ? 

77700 

0 

C/DO 

2DEC 

Cil35 



30f 7200 

62716 

0 



1138 



30i7201 

06314 

1 

GMAX/2 

2 DEC 

Cll3e 



30,7202 

31463 

1 



1139 



30,7203 

14631 

0 

1/GMAX 

2oec 

Cil39 



30,7204 

2 3146 

0 



1140 



30,7205 

00433 

0 

2H5 

20EC 

C114Q 



30,7206 

02775 

0 



ll4l 



30,7207 

00000 

1 

2H5GMXSU 

20EC 

C1141 



30,7210 

3102 7 

0 



1142 



30,7211 

04555 

0 

KW I EM 

2 DEC 

C1142 



30,7212 

27667 

Q 



1 143 



30,7213 

37173 

0 

COS (13) 

20EC 

C1143 



30,7214 

26300 

0 



1144 



30,7215 

71045 

0 

-5IN(13) 

20EC 

Cil44 



30,7216 

73065 

0 




1145 

30,7217 

00541 

1 

2C1HS 

2DEC 

C1145 

30,7220 

33575 

0 



1 146 

30,7221 

02233 

1 

2C1HSLAD 

2DEC 

Cl 146 

30,7222 

21637 

0 



1147 

30,7223 

03146 

1 

POINTl 

2DEC 

C1147 

30,7224 

14632 

0 



1148 

30,7225 

00034 

0 

K44 

2DEC 

C1148 

30,7226 

30623 

0 



1149 

30,7227 

17414 

0 

VFINAL 

2DEC 

Cll‘+9 

30,7230 

14575 

0 



i 150 

30,7231 

02436 

1 

KAT 

2 DEC 

C1150 

30,7232 

27024 

1 



11502 

30,7233 

31463 

1 

POINTS 

2DEC 

Cil502 

30,7234 

06315 

0 



11504 

30,7235 

06314 

1 

P0INT2 

2DEC 

C11504 

30,7236 

31463 

1 



11506 

30,7237 

01310 

1 

Q7M1N 

2DEC 

C11506 

30,7240 

13103 

L 



11508 

30,7241 

00 146 

1 

PTI/16 

2DEC 

C11508 

30,7242 

14632 

0 




R1151 ••• END OF RE-ENTRY COr4STANTS ... 
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NASA 1021106-021 


DEC A, 1966 


(MAIN) PAGE 738 


K3R0LL 

.2895 

-.00387019231 

• 2 
a 4 

,0172786611 

.000047768341 

.147323336 

.9763 

-.21644 

,0215983264 

.071994421 

. 1 

,00175626224 

.48513173 

.08 

.8 

.2 

.043478261 


USER'S Own page no. 4i 

UNLY A single PRECISION NUMBER, 

LAD cost 15 DEG) 

5/25 

2 28500 25 32.2/ (4 VS VS) 

((2 28500 322/(4VS V5))SQ 

result In meters over 12800 

REAL COS OF 12.5 DEG. NOT 1/2 COSINE. 
REAL SIN OF 12.5 DEG, NO FACTOR OF 1/2 

2 1.25 28500 805/<2 VSlSQ 
2 1.25 28500 805/(,3 4 VS VS) 

2 VS/(156 57.3 57.3 57.3) 

25000/2 VS 
2 G-S (2/25) 




35/805 


00625 


484b7BA YUL SYSTEM FOR AGC'*: REVIblON 0 OF Pf?0GRAM SOLRUMbS 3Y 


L re-entry control 


P1169 



closed Subroutine to 

COMPUTE 

desired nav base 

Rll 70 



needed During entry 

phase. 



RH7l 



enter with 

VN» JNITR 

* UN I T * 

and ROLLC 

R1172 



COMPUTES JXNB» JYNB» 

AND UZN3. 

(NAV BASE UNIT 

1173 




30 , 7243 

76573 

1 

getunb rtb 

1174 




30*7244 

41766 

0 

vxv 

1175 




30*7245 

50753 

0 

VAD 

1176 




30*7246 

75776 

0 

VXSC 

1177 

REF 

22 

LAST 720 

30.7247 

20265 

1 


1178 

REF 

21 

LAST 723 

30*7250 

01016 

1 


1179 

ref 

5 

LAST 700 

30*7251 

01044 

0 


IIBO 

REF 

1 


30*7252 

21212 

0 


lldl 

REF 

27 

LAST 694 

30*7253 

00774 

0 


1182 

REF 

1 


30*7254 

21214 

0 


1183 




30*7255 

47575 

0 

NOLOD 

1184 




30*7256 

41753 

0 

VXV 

1185 

REF 

22 

LAST 739 

30*7257 

01016 

i 


1186 




30.7260 

32021 

0 

STORE 

1187 




30*7261 

45176 

0 

f ^OVE 

1188 

REF 

5 

LAST 727 

30*7262 

01473 

0 

1 

1 

1189 

ref 

2 

LAST 729 

30*7263 

32017 

0 

STORE 

1190 




30*7264 

475 fb 

0 

NOLOD 

\ 

1191 




30*7265 

55 166 

0 

, COS 

1192 




30*7 2b6 

00021 

1 

1 

i 

11924 




30*7267 

57176 

0 



SIN 

11926 

ref 

3 

LAST 739 

30*7270 

00017 

1 


1193 




30*7271 

41774 

0 

vxv 

1194 




30*7272 

73166 

1 

JNIT 

1195 




30*7273 

50753 

0 

VAO 

1196 




30*7274 

0002 1 

1 


1197 




30*7275 

00001 

0 


1198 

REF 

1 


30*7276 

33505 

1 

STORE 

1199 




30*727/ 

47574 

1 

NOlOO 

1200 




30*7300 

41753 

0 

VXV 

1201 




30*7301 

75762 

0 

VXSC 

1202 




30*7302 

00001 

0 


1203 

ref 

1 


30*7303 

21216 

1 


1204 

REF 

1 


30*7304 

3347 r 

0 

STORE 

1205 




30*7305 

47575 

0 

NOuOD 


{MAIN) Page 739 


NASA 1021108-021 


DEC 1966 


USER'S OWN page no. A2 


orientation 


VECTORS) 


3 

vxsc 

UNIT 

FkESHPD 
UNITR 
UN I T W 
KWIEM 

VN 

COS (13) 


kESET PUSH COUNTER, 

get velocity of atmosphere 
get UVA.t relative velocity 
resolve by cos of 13 DEG. 


NEG OF Real vel. 

earth rate const In meters x a, 

UVA C0S(13) into PD. 


1 

UNIT 

UNIIK 

160 


0 

rollc 

ROLLCTEM 



uYA = UNlT(VA*kN) 

UYA INTO LOC 16 OF VAC AREA, 

SAVE ROLLC SO THAT IT CANNOT CHANGE 
DURING THIS SUBROUTINE 
IiJTO LOC lA OF rush LIST 


1 

VXSC 

16D 


CUS (ROLLC) 

UYA COS (ROLLC). PUSH INTO LOC 6. 


Q 

ROLLCTEM 5iN(R0LLC} INTO PD AT LOC 12, 


2 

VXSC 
UN I T 

16D 

0 

UYNB 


UNA = UNIT (UYA»UVA) 

UNB = UYA CoS(ROLL) + UNA SIN(ROLL) 
UNIT COULD BE REPLACED BY VSLT 1 
UYA STORED AT LOC 16 
UVA first ITEM INTO PUSH LIST 

1 scAL And l vec from pd. 


2 

unit 

VSU 

0 

-SIN(13) 

UXNB 


UN = UNIT (UYNb*UVA) 

UXNB = -UN SIN(13) - UVA 005(13) 

PULLS UVA COS (13) FRON PD, 


I 


4b^i>78A YUL SYSTEM HOr AGc't: REVlsjOf^ g Of PROGRAM 50LRUM55 BY ^AsA 1021108-021 


DEC A* 1966 


(MAiM) page 7 ^Q 



RE- 

entry control 




1206 



30 » 7 306 

41622 

1 

1207 

REF 

2 LAST 739 

30W307 

01505 

0 

1208 



30*7310 

00U02 

0 

1209 

REF 

1 

30.7311 

33513 

0 

1210 



30*7312 

40576 

1 


USER’S OlwN page no, 43 


YXV 

vslt 

UYNB 

1 

UZNB 

UZNB = UXNBitUYNB 

store 


1 Tea 

0 

AND RETURN, 


12105 


0016 ROLLCTEM EOJALS 14D 




P1300 

W1301 

«1302 

P1303 


13U4 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 


1324 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

13392 

13393 

13394 


YUL system for AGC4: REVISION 0 OF PROGRAM SOLRUM55 


re-entry Control 

SUBROUTINE TO READ PI PA COUNTERS, TRYING TO BE VE 
IT WILL BE RESTARTABLE, 


(ARRIVE IN INTERRUPTED STATE OR INHIBITED 
(EXIT IS THRU ISWRETRN) 


REF 

222 

LAST 

714 

30 » 7 3 1 3 

b 

5501 

1 

PIPASR 

C5 

REF 

1 



3 0 ♦ 7 3 i ^ 

5 

1031 

1 


rs 

REF 

1 



30 » 7315 

5 

1032 

1 


TS 

REF 

1 



30» 7316 

5 

1033 

D 


TS 

REF 

223 

LAST 

741 

30t7317 

3 

5501 

0 


CAP 

REF 

14 

LAST 

699 

30,7320 

5 

1002 

I 


TS 

REF 

11 

LAST 

699 

30,7321 

5 

100b 

1 


T5 

REF 

9 

LAST 

699 

30,7322 

5 

1006 

0 


T5 

ref 

4 

LAST 

699 

30,7323 

5 

1035 

0 


TS 

REF 

12 

last 

571 

30,732b 

0 

2677 

0 

REPIPI 

TC 

REF 

40 

LAST 

560 

30,7325 

4 

0573 

1 



REF 

14 

LAST 

704 

30,7326 

5 

lb65 

1 


TS 

ref 

41 

LAST 

741 

30,7327 

4 

0572 

0 


C5 

REF 

15 

LAST 

741 

30,7330 

5 

1 b6b 

0 


TS 

REF 

16 

LAST 

731 

30,7331 

4 

O044 

0 


cs 

REF 

1 



30,7332 

5 

1034 

1 


TS 

REF 

2 

LAST 

741 

30,7333 

3 

1031 

1 


XCH 

REF 

17 

LAST 

741 

30,733<t 

3 

004*, 

1 


XC4 

REF 

15 

LAST 

741 

30,7335 

5 

1001 

1 

REPIPIB 

T5 

REF 

1 6 

LAST 

741 

30,733b 

5 

1002 

1 


TS 

ref 

13 

LAST 

731 

30,7337 

4 

0045 

1 

REPIP2 

C5 

REF 

2 

LAST 

741 

3 0 , 7 3 bO 

5 

1034 

1 


TS 

REF 

2 

LAST 

741 

30,73bl 

3 

1032 

1 


XCH 

REF 

14 

LAST 

741 

30,73b2 

3 

0045 

0 


XCH 

REF 

12 

LAST 

741 

30,73b3 

5 

1003 

0 

REPIP2B 

T5 

REF 

13 

LAST 

741 

30,7 3b b 

5 

1004 

1 


TS 

REF 

9 

LAST 

731 

30 , 7 3b5 

4 

0046 

1 

REPIP3 

CS 

REF 

3 

LAST 

741 

30,73bb 

5 

1034 

1 


TS 

ref 

2 

LAST 

741 

30,734 f 

3 

1033 

0 


XCH 

REF 

10 

last 

741 

30,7350 

3 

0046 

0 


XCH 

REF 

10 

LAST 

741 

30,7351 

5 

1005 

0 

REPIP3B 

T5 

REF 

11 

LAST 

741 

30,7352 

5 

1006 

0 


T5 

ref 

224 

LAST 

741 

30,7353 

4 

5501 

1 

REP1P4 

CS 

ref 

17 

LAST 

741 

30,735b 

5 

1002 

1 


TS 

ref 

14 

LAST 

741 

30,7355 

5 

100b 

1 


TS 

ref 

12 

LAST 

741 

30,7356 

5 

100b 

0 


T 5 

ref 

30 

LAST 

688 

30,7357 

4 

45 1 6 

0 


CS 

ref 

7 

LAST 

727 

30,7360 

7 

0675 

1 


MAS 

ref 

31 

LAST 

741 

30,7361 

6 

45 1 6 

1 


AD 


NASA 1021108-021 


OEC 4, l966 


(MAINJ page 741 


Y CAREFUL SO THAT 

after Restart,) 

USER *5 OWN PAGE NO, 44 

zero 

TEMX 

TEMY 

TEMZ 

ZERO 

PUT these into the impossible state 

POR THEIR INITIAL VALUES, 

OELVX + 1 

DELVY + 1 

PIP COUNTERS MAY NOT HAVE POS ZERO IN 

DELVZ ♦ 1 

PIPAGE 

ZERO THIS TO INDICATE IN PlPA READING, 

readtime + 1 

RUPTSTOR + 1 
PIPTIME + 1 
RUPTSTOR 

PIPTIME 

probably not needed since NOT MUCH 

chance Of TIMEI overflowing now. (BUT 

JUST POSSIBLE IF MANY RESTARTS. 

PIPAX 

TEMXY 

TEMX 

PIPAX 

PUT negzero into pipactrs as read. 

DELVX 

DELVX + 1 

PlPAY 

TEMXY 

TEMY 

PIPAY 

DELVY 

DELVY + 1 

UOUBLE SAVE. 

PiPAZ 

TEMXY 

temz 

PIPAZ 

DELVZ 

DELVZ + 1 

REPEAT PROCESS FOR Z PlPA. 

SAVE NEC OF PIPA READ 

jave here as pick up negzero 

resetting PlPA AS READ OUT) 

AND STORE IN Z. 

5H0WS THAT IT really MADE IT, 

zero 

DELVX + 1 

DELVY + 1 

DELVZ + 1 

leave these at negzero 

BlTl 

TMMARKER 

bill 

SET bIT 1 IN TM MARKER. 
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TMMARKER 

is^retrn 


USER'S OWN PAGE NO. 45 

AND EXIT, SHOULD HAVE COME THRU ICALL 


^b^bVBA YUL SVSIEK' FOR AGCA; HEVISIOM 0 0|- M^DGRAM SOLRUMt>5 bY 


P13h1 

13A6 

13A7 

i3A8 

13A9 

1350 

1351 

1352 

1353 
135A 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

136A 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

13 75 

1376 

1377 
13 78 

1379 

1380 

1381 


re-entry control 




ROUT 

‘INe TO 

RE3TA;(T IF 

RErtDIN 

G 

PIPA COUNTERS 

REF 

5 

LAST 

741 

30 1 7 Bo't 

1 

1035 

1 

REPIPASR 

W W ^ 

REF 

5 

LAST 

698 

30^7365 

0 

7313 

1 


TC 

ref 

13 

LAST 

741 

30,7366 

1 

1006 

1 


CCS 

REF 

1 



30 , 73 6 7 

0 

7353 

0 


TC 





30,7370 

0 

7373 

1 


TC 

REF 

2 

LAST 

743 

30,7371 

0 

7353 

0 


TC 

REF 

3 

LAST 

743 

30,7372 

0 

7353 

0 


TC 

REF 

15 

LAST 

741 

30,7373 

1 

1004 

0 


CCS 





30,737*+ 

0 

7377 

0 


TC 

REF 

1 



30, ?375 

0 

7406 

1 


TC 





30,7376 

0 

7377 

0 


TC 

REF 

3 

LAST 

741 

30,7377 

1 

1033 

1 


CCS 





30,7 400 

0 

7404 

0 


TC 





30,7AUi 

0 

7 404 

0 


TC 





30,7402 

0 

7404 

0 


TC 

REF 

1 



30 , 7 403 

0 

7345 

1 


TC 

REF 

4 

LAST 

741 

30,7 40h 

4 

1034 

0 


CS 

ref 

1 



30,7405 

0 

7351 

1 


TC 

REF 

18 

LAST 

741 

30+7406 

I 

1002 

0 

CHKDELVX 

f- r- 

w ^ ^ 





30,740/ 

0 

7412 

1 


TC 

REF 

1 



30,7410 

0 

7421 

1 


TC 





30,7A11 

0 

7412 

1 


TC 

REF 

3 

LAST 

741 

30,7412 

1 

1032 

0 


CCS 





30,7413 

0 

741 r 

1 


TC 





30,7414 

0 

741 7 

1 


TC 





30,7415 

0 

7417 

1 


TC 

REF 

1 



30,7416 

0 

7337 

1 


TC 

REF 

5 

LAST 

743 

30,7417 

4 

1034 

0 


C5 

REF 

1 



30,7«t20 

0 

7343 

1 


TC 

REF 

3 

LAST 

741 

30,7421 

1 

1031 

D 

CHKTEMX 

CCS 





30,7422 

0 

7426 

0 


TC 





30,7423 

0 

7426 

0 


TC 





30,742*, 

0 

7426 

0 


TC 

REF 

1 



30,7 425 

0 

7324 

0 


TC 

REF 

6 

LAST 

743 

30 , 7 426 

4 

1034 

0 


CS 

REF 

1 



30,7a2/ 

0 

7335 

0 


TC 
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PIPAGE 

PIPASR 

DELYZ + 1 
REPIP4 

+ 3 

REPiP4 

WAS I READING PIPS, 

Nu,, PIPAGE = PLUS CONST, 

PIPAGE =0 <1 WAS READING PIPS.) 

L WAS READ OK. 

L NOT DONE, CHECK Y. 

REP1P4 

DEEvY + 1 

+ 3 

CHKDELVX 

♦ 1 

TEM2 
+ 4 

+ 3 

HAS IT Changed from its ♦zero init valu 

YES, Y DONE. TRY TO REDO Z. 

NO, GO LOOK AT X. 

YES. 

does TEMZ STILL = -0. 

NO TRY To RESTORE 

+ 2 

REP1P3 

temxy 

REPIP38 

YES, GO BACK AND READ Z AGAIN. 

MUCH MOKE LOGIC COULD BE INCORPORATED 

10 CHECK PIPA CTR FOR SIZE. 

DELVX + 1 
+ 3 

CHKTEMX 
+ l 

TEMY 

+ 3 
+ 2 

REPIP2 

TEMXY 

REP1P2B 

HAS THIS CHANGED. 

yes 

(^0. 

YES 

TEMX 

♦ 4 
+ 3 
+ 2 

REPIP 1 

TEMXY 

REPIPIB 

MAS THIS CHANGED. 

YES 

YES 

YES 

NO 
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P3OU0 ENTRY INI Ti ALIZATION RUJl I JE 


R30UI 

3002 

REF 

32 

LA 51 

72 7 

30 

3004 





30 

3006 

REF 

33 

LAST 

744 

30 

3008 





30 

3010 





30 

3012 

REF 

4 

LAST 

729 

30 

3015 

REF 

34 

LAST 

729 

30 

3020 

REF 

3 

LAST 

729 

30 

3025 





30 

3030 

REF 

43 

LAST 

722 

30 

3035 





30 

3040 

REF 

1 



30 

3045 

REF 

9 

LAST 

722 

30 

3050 

REF 

1 



30 

3055 

REF 

1 



30 

3060 

REF 

225 

LAST 

7A1 

30 

3065 

REF 

3 

LAST 

699 

30 

3066 

REF 

5 

LAST 

729 

30 

3070 

REF 

1 



30 

3075 

REF 

12 

LAST 

645 

30 

3080 

REF 

1 



30 

3085 

REF 

7 

LAST 

594 

30 

3086 

REF 

1 



30 

30865 





30 

3007 

REF 

36 

LAST 

625 

30 

3088 

REF 

1 



30 

3089 

REF 

37 

LAST 

744 

30 

30895 





30 

3125 

REF 

103 

LAST 

729 

30 

3130 





30 

3135 





30 

3140 





30 

3145 

REF 

2 

LAST 

630 

30 

3150 

REF 

28 

LAST 

739 

30 

3155 

REF 

23 

LAST 

739 

30 

3160 

REF 

6 

last 

654 

30 

1 65 

REF 

3 

LAST 

725 

30 

31 7C 

REF 

7 

LAST 

728 

30 

31 75 





30 

3100 





30 

3185 

REF 

24 

LAST 

744 

30 

3190 

REF 

7 

LAST 

7A4 

30 


7 4 J 0 

0 22 76 

0 

startent tc 

7431 

03204 

1 


OCT 

7432 

0 2276 

0 


TC 

7433 

02305 

0 


OCT 

7434 

2 001 / 

0 


I NHINT 

7435 

3 2150 

1 


CAF 

743b 

0 204b 

1 


TC 

7437 

57101 

0 


CAOR 

744u 

2 Oo 1 £) 

1 


RELI NT 

7 441 

0 2362 

1 

NUMODE63 TC 

7442 

00063 

1 


OCT 

7 44 3 

3 7516 

1 


CAF 

7 444 

5 1374 

0 


T5 

7 445 

3 7517 

0 


CAP 

7 446 

5 1042 

0 


TS 

7447 

3 5501 

0 


CAP 

74 50 

5 1350 

0 


TS 

7451 

5 1352 

1 


T5 

7452 

3 7520 

1 


CAP 

7453 

5 1027 

0 


T5 

7454 

3 7521 

0 


CAP 

7455 

5 0/55 

0 


TS 

7456 

4 7522 

1 


C5 

745/ 

2 0017 

0 

1 

INHINT 

7460 

7 0645 

1 

1 

viAS< 

7 461 

6 7523 

1 


AD 

7462 

5 0645 

0 



7463 

2 0016 

1 


Lf^EulNl 

7 4 64 

0 4000 

0 


TC 

7465 

76574 

0 


RT3 

/ 466 

41612 

1 


V'XV 

746 / 

47171 

0 


COviP 

7470 

20721 

1 



74/1 

00774 

0 



7472 

01016 

1 



7473 

01115 

0 



7474 

20607 

1 



747 5 

33373 

0 


STORE 

7476 

42775 

1 


DOT 

747 / 

63703 

0 


ISlT 

750P 

01016 

1 



7501 

01115 

0 
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PHASChNG 

03204 

Keep uptheta running in case of restart 

4.26 RESTART. 

PHASCHNG 

02305 

Pick up current string at newmoue63. 

5.19 restart. RESYnCING PIPUP ALSO. 

PRIOU 

F INUVAC 

establish uptheta For ist time. 

UPTHETAl 

start uptheta job. 

NEwMOdE 

00063 

EiURY phase = MODE 63 

INITCADR 

GOTOADDR 

EARGCADR 

CALCG 

ZERO 

TLNTRY 

R0LLBIA5 

NUOELTAT 

DELTAT 

NU/PIPDT 

1/PlPADT 

ENTMA5K 

STATE ^ 

ENTRY5W 

STATE 

INTPRET 

5^ Initialize switches (bits 6 : 10,15 in 

STATE) 6 = G0NEPAST,7 = RELVELSvj,8 = E6SW 
95HUNT5WI, 10=H1NDi 15s1NRL5W 

all but RELVELSw set to non-branch (1) 

2 

DDT 

RTb 

CDUXFIX 

VN 

Set cdux again just in case. 

UNUR 

RTINIT 

SIGNMPAC 

X2R0LL 

1 

ACOS 

UNITR 

RTINIT 

THIS gives latang. 
gets sign of MPAC 

K 2 ROLL = - SIGN(LATANG) 
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30»7502 

00002 

0 


3200 

REF 

8 

LAST 

72A 

30,7503 

33111 

0 

STORE 

3205 





30»750a 

75176 

0 

v^oye 

3210 

REF 

A 

LAST 

723 

30,7505 

01215 

0 


3215 

REF 

B 

LAST 

74A 

30,7506 

33115 

1 

STORE 

3220 





30,7507 

47176 

1 

COMP 

3225 

REF 

10 

LAST 

70A 

30,7510 

01145 

0 


3230 

REF 

11 

LAST 

745 

30,7511 

331A5 

1 

STORE 

3235 





30,7512 

767 76 

0 

ITC 

32A0 

REF 

A 

LAST 

582 

30,7513 

13450 

1 


32A5 





30,751*, 

76576 

1 

RFB 

3250 

REF 

2 

LAST 

721 

30,7515 

17033 

1 



3255 

REF 1 

30,7516 

62701 

0 

INITCADR 

CAOR 

3260 

REF 1 

30,7517 

61664 

1 

EARGCADR 

CAOR 

3261 


30,7520 

14400 

0 

•NUDELTAT 

OEC 

3262 


30,7521 

31000 

0 

NU/PIPDT 

DEC 

3264 


30, 7522 

01741 

1 

ENTMASK 

OCT 

3265 


30,7523 

01341 

0 

entrysw 

OCT 
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I 

thetah 

0 

RT 

RTKMIT 

0 

DTEARCT 

D7EAR0T 

0 

EARROTl 

0 

UVERNOUT EAlT SETTING RESTART BITS TO S.12 FOR EN 


INITROLL 
CALCGEAR 
200 B5 
200 B6 

017A1 

013A1 
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AVERAGE G integrator 


USER’S OWN PAGb NO, 1 


ROOOl 

W0003 

Rqooa 
R0006 
R0007 
R0009 
ROOll 
R0012 
ROD 13 
R0015 

R0016 

R0017 


routine CALCRVG integrates the equations of motion by averaging IHe thrust AND gravitational accelera- 
tions OVER A time interval* PlLTAT 

FOR the e^Rth-centlRed gravitational fiel.^ he Perturbation due io oblateNeSs is computeI^ to the first 
HARMONIC coefficient J 

routine NORMLISE must be CaLLEO prior to the first entry into CALCRVG, It requires RN scaled to 2(*29)N 
IT Leaves rn normalised, so that tHe scaled magnitude of the vector contains one leading zeRo, by shifting the 
vector left n binary places 

routine CALCRVG RLvjUIRES 

1) thpust acceleration increments in oelv scaled same as pipax,y,z 

VN SCAlEo at 2(+?) M/CS 
address of CALCGLJN or CALCGEAR in CaLCG 
OELTAT scaled at 2 (+9) CS 


2 ) 

3) 

A) 


R0018 




5) 

push-ddwn 

COUNTER 

SET 

TO ZERO 



R0019 

IT LEAVES updated 

RN, SCALED 

AT 2(29- 

N) 

M, VN, AND GRaVI 

TY SCALED AT 

2(-5) M/CS/CS 

R0021 

continue on 

In bank 30, 






0022 





30,7529 

71173 

1 

NORMLISE ABvAL 

3 

Count number of leading zeros 

0023 





30,7525 

57715 

0 

T5lC 

INCR,1 

AbVAL (RN) and STORE -N(-2-My 

002^ 





30,7526 

67515 

1 

SXA,1 

INCR, 1 

RN MUST BE SCALED AT 2(+29)M 

0025 





30,752 / 

67925 

0 

SXA.l 

ITA 


0026 

REF 

29 

LAST 

69^ 

30,7530 

00766 

0 


KN 


0027 

REF 

19 

LAST 

669 

30,7531 

00097 

1 


XI 


0026 





30,7532 

00003 

1 


2 


0029 

REF 

1 



30,7533 

01091 

0 


N5H1FT 

Save c(x1)=-n 

0030 





30,7539 

00017 

1 


19D 


0031 

REF 

2 

LAST 

639 

30,7535 

01092 

0 


XSHIFT 

SAVE C(X1) =19-N 

0032 

REF 

26 

LAST 

696 

30,7536 

00052 

0 


S2 


0033 





30,753 ? 

75175 

0 

VMDvE 

1 


003A 





30,7590 

99376 

0 

vslt* 



0035 

REF 

25 

LAST 

796 

30,7591 

00766 

0 


RN 


0036 





30,7592 

00035 

1 


1 90 , 1 

RN scaled at 2 (29-N) metres 

0037 

REF 

26 

LAST 

796 

30,7593 

32766 

1 

5TDRE 

RN 

0038 





30 , 7 5 9‘t 

76776 

0 

ITC 

0 


0039 

REF 

1 



30,7595 

21695 

0 


calcgrvi 


OOAO 





30,7596 

99576 

0 

ITCl 

0 


0091 

REF 

27 

LAST 

796 

30,7597 

00052 

0 


&2 



ft . » rtk 




'll, . 


• < 


/ 1 • j-r 
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L 

AVERAGE 

G integrator 











30 » 7550 

75776 

0 

CALCRVG 

VX5C 

00^3 

REE 

20 

LAST 

701 

30i 7551 

01002 

1 



OOAA 

REF 

3 

LAST 

645 

30 W552 

21742 

0 



OO^tS 





30*7553 

75775 

0 


VX5C 

0046 





30*7554 

73432 

0 


LXAtl 

0047 

REF 

2 

LAST 

639 

30*7555 

OlOlO 

1 



0048 

REF 

13 

LAST 

744 

30*7556 

01030 

0 



0049 

REF 

3 

LAST 

746 

30*755 I 

01042 

0 



OObO 





30*7560 

OOOOi 

0 



OObl 





30*7561 

47573 

0 


NOLOD 

0052 





30*7562 

45642 

0 


VSRT 

0053 





30*7563 

75620 

1 


vxsc 

0054 





30 * 7 564 

50b25 

D 


VAO 

0055 





30*7565 

00005 

1 



0056 

REF 

29 

LAST 

744 

30 * T 566 

00774 

0 



0057 

REF 

14 

LAST 

747 

30,7567 

01030 

0 



005B 





30*7570 

00001 

0 



0059 

REF 

27 

LAST 

746 

30*7571 

00766 

0 



0060 

REF 

28 

LAST 

746 

30*7572 

00052 

0 



0061 

ref 

1 



30,7573 

33300 

1 


STORE 

0062 





30 * 7 574 

76776 

0 


irc 

0063 

REF 

2 

LAST 

746 

30,7575 

21645 

0 



0064 





30,7576 

47573 

0 


NiDLOO 

0065 





30*7577 

75632 

1 


VXSC 

0066 





30*7600 

50626 

0 


VAD 

0067 





30*7601 

50776 

1 


VAO 

0068 

REF 

15 

LAST 

747 

30,7602 

01030 

0 



0069 





30*7603 

7777 ? 

0 



0070 





30*7 604 

77777 

0 



0071 





30*7605 

00005 

1 



0072 

REF 

30 

LAST 

747 

30 * 7606 

00774 

0 



00T3 

REF 

1 



30*760T 

33306 

1 


STORE 

R0074 

IN 

average 

G, UP THE phase I 

SITS BY 

2 1 

OF ACTIVE 

PROG B 

0075 





30*7610 

77576 

0 


EXIT 

0076 

REF 

49 

LAST 

716 

30*7611 

2 0067 

1 


INDEX 

0077 

REF 

29 

LAST 

747 

30*7612 

4 005 1 

1 


V 5 

0078 

REF 

1 



30*7613 

5 1313 

1 

CALCRVG2 

TS 

00 r9 

REF 

4 

LAST 

146 

30*7614 

4 0662 

1 


cs 

0080 

REF 

224 

LAST 

723 

30*7615 

6 4516 

1 


AD 

0061 

REF 

70 

LAST 

722 

30,7616 

0 2312 

0 


TC 

0062 





30*7617 

00005 

1 


OCT 
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0 

BELY 

KPIP 

Dv TO PD SCALED AT 2(+4)M/CS 

1 

bvsj 

GRAVITY 

DELTAT 

xshift 

0 

3 

VAD 

VSLI* 

ITA 

4 

VN 

DELTAT 

0*1 

tv Kii 

(UV-(OLD GUT))/2 TO PD SCALED 2(+3}M/CS 

sz 

RNl 

0 

calcgrvi 

3 

6 V S J 

VSRT 

Sealed at 2{29-n) meters 

DELTAT 

4 

(UV-(ULD GDT) )/2 

DV/2 

VN 

VNl 

ORE COPY CYCLE* 

0 

Sealed at 2 (+7) met/cs 

F IXLOC 

S2 

AVGRETRN 

Save neg return address in non-vac area 
SAVE negative of return address. 

-PHASE 1 + 4 

ONE 

NEWPHA5E 

00005 

PICK UP PHASES, 

ukrement by i- 

AiMD CALL routine TO CHANGE PHASE. 
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0083 





30.7620 

2 

0017 

0 

REFAZE6 

I ^HINl 

0084 

REF 

1 



30»7621 

3 

7641 

0 


CAF 

008S 

REF 

525 

LAST 

729 

30.7622 

5 

0115 

1 


T5 

0086 

REF 

526 

LAST 

748 

30.7623 

2 

0115 

0 


INDEX 

0087 

REF 

2 

LAST 

747 

30.7524 

4 

1277 

0 


cs 

0088 





30*7625 

4 

0000 

0 


COM 

0089 

REF 

527 

LAST 

748 

30*7626 

2 

0115 

0 


INDEX 

0090 

REF 

2 8 

LAST 

747 

30*7627 

5 

0765 

0 


T5 

0091 

REF 

528 

LAST 

748 

30 * 7 6 3 0 

1 

0115 

0 


CCS 

0092 

REF 

5 

LAST 

134 

30.7631 

0 

7622 

0 


TC 

0093 

REF 

17 

LAST 

688 

30*7632 

4 

4515 

0 


CS 

0094 

REF 

9 

LAST 

742 

30*7633 

7 

0675 

1 


mask 

0095 

REF 

18 

LAST 

748 

30.7634 

6 

451 5 

1 


AD 

0096 

REF 

10 

LAST 

748 

30.7635 

5 

0675 

0 


T5 

A0097 











0098 





30 * 7 536 

2 

0016 

I 


relint 

0099 

REF 

2 

LAST 

747 

30*7637 

4 

1313 

0 


cs 

0100 

REF 

20 

LAST 

551 

30*7640 

0 

5723 

1 


TC 

0101 





30*7641 


00013 

0 

ElEvEnD 

DEC 


0102 





30*7642 

73576 

1 

calcgray 

LXA.l 

0103 

REF 

4 

LAST 

747 

30.7643 

01042 

0 



0104 





30 * 7644 

47575 

0 

CALCGRVl 

NDLOO 

0105 





30.7645 

73176 

0 


UNIT 

0106 

REF 

25 

LAST 

744 

30*7646 

33016 

0 


STDRE 

0107 





30*7647 

45175 

0 


DMDVE 

0108 





30*7650 

63776 

1 


tslt 

01081 





30*7551 

00037 

0 



01082 





30*7652 

00002 

3 


STORE 

0109 

REF 

12 

Last 

694 

30*7653 

33024 

1 


0110 





30*7654 

63 776 

1 


TSuT 

0111 





30*7655 

00035 

1 



0112 





30*7656 

00003 

1 


STDRE 

0113 

REF 

2 

LAST 

640 

30,7657 

33026 

0 


0114 





30*7 660 

4 5575 

1 


ita 

0115 





30*7 66 1 

61576 

1 


XAD*1 

0116 





30*7662 

00034 

3 



0117 

REF 

2 

LAST 

7A6 

30*7663 

OlOAl 

0 





SA 1021108-021 


DEC At 1986 


(MAIN! PAGE 748 


USER'S OWN PAGE NO. 3 


ELEYEND 

MPAC USE MPAC FOR LOOP COUNTER. 

MpAC 

RM Rhl AND VNl MUST BE IN ORDER. 

LlAVE RNl alone in CASE OF RESTARTS, 
MPAC SELECT THE RIGHT TERM. 

RN ...AND GO thru COPY CYCLE. 


MPAC ARE WE DONE.. 

REFAZE 6 + 2 NU, NOT YET, 

B1T2 YESi MPAU = 0. 

TMMARKER 

B1T2 SlT BIT 2 TO ONE IN TMMARKER. 

TMMARKER 


WhAT about gravity FOR RESTART.. 

AVGRETRN NEG OF ADDRESS WAS STORED. 

BANKJUMP 



liO (LLEVEn DECIMAL* OF COURSE.) 


0 

XSHIFT 

1 

UMTR 



28D 





SCALED AT 


SCALED Al 


2 (30-N)M 


2 (+50)M(+2) 


4b‘+57aA YUL SYSTEM FOR AGC<+; REVISION 0 OF PROGRAM SOLRUMSS BY 


L AVERAGE G INTEGRATOR 


0119 





30.7 66 A 

A2776 

1 

calcgear 

DDl 

0120 

REF 

26 

LAST 

7A8 

30.7665 

01O16 

1 



0121 

REF 

6 

LAST 

739 

30 » 7 666 

DlOAA 

0 



0122 





30.7667 

32032 

1 


STORE 

0123 





30.7670 

A757A 

1 


\olod 

012A 





30.7671 

51122 

1 


050 

0125 





30,7672 

63726 

1 


ISLT 

0126 

REF 

1 



30.7673 

217A6 

1 



0127 





30. 767'+ 

00005 

1 



0128 

REF 

1 



30.7675 

21 7AA 

0 



0129 





30.7676 

62775 

0 


DOV 

0130 





30.7677 

63376 

0 


TSLT*t 

0131 

REF 

1 



30.7700 

2175A 

1 



0132 

REF 

3 

LAST 

7AB 

30.7701 

01026 

1 



0133 





30,7702 

00001 

0 



013A 





30,7703 

32030 

0 


STORE 

0135 





30 t770A 

a7 57 A 

1 


noloo 

0136 





30.7705 

6A ?66 

1 


DMP 

0137 





30.7706 

50776 

1 


VAO 

0138 





30,7707 

7777 7 

D 



0139 

REF 

27 

LAST 

7A9 

30.7710 

01016 

1 



OlAO 

REF 

28 

LAST 

7A9 

30,7711 

01016 

1 



OlAl 





30.7712 

6A775 

0 


DMP 

U1A2 





30,7713 

756A2 

0 


VXSC 

01A3 





30,77iA 

00030 

1 



OlAA 





30,7715 

O0O32 

0 



0lA5 

REF 

7 

LAST 

7A9 

30,7716 

OlOAA 

0 



01A6 





30.7717 

A5175 

0 


OMOVE 

01A7 





30,7720 

76776 

0 


ITC 

01A8 

REF 

1 



30.7721 

21750 

0 



U1A9 

ref 

1 



30,7^22 

21732 

1 



0150 





30 »7 723 

75176 

0 

CALCGLUN 

VMOVE 

0151 

REF 

29 

LAST 

7A9 

30.772*t 

01016 

1 



0152 





30,7725 

A5175 

0 


OMOVE 

0153 





30,7726 

63576 

0 


I NCR. 

015A 

REF 

1 



30,7727 

21752 

1 



0155 





30.7730 

00007 

a 



0156 





30.7731 

A757A 

i 

MU/R5Q 

NOLOD 

0157 





30.7732 

6271A 

1 


DOV 

0158 





30.7733 

75776 

0 


VXSC 

0159 

REF 

A 

LAST 

7A9 

30.773A 

01026 

1 



0160 





30,7735 

00013 

0 




NASA 1021L08-021 


(MAIN) 


PAGE 7^9 


DEC A f 1966 

USER'S OWN PAGE NO. A 


0 

UNITR 

UNITW 

2SD 

2 

DMP 

BDSU 

DP(5/8) 

A 

DP2 (-3) 

1 

J(RE)SQ sealed AT 2(+A0) M(+2) 

RMAG5Q 
0 1 1 

23D J(RE/HN) 50 SCALED AT 2(-3) 

2 

vxsc 


UNITR 

UNITR 


1 

VAD 
2 3D 
2SD 
UNITW 


1 

MU earth 
MU/R5Q 

0 

UNITR 


1 

MUMOON 

6 

2 

}SL1* 


(EARTH) 

(MOON) 


RMtAGSQ C ( X I ) ” I A’* 2N 

S,l 520-2N 


4ti457BA YUL SYSTEM FOR AGC^tt REVISION 0 OF PROGRAM SoLRUMSS BY 


L average G IfjTEGRATOR 


Olbl 

REF 

3 LAST 747 

30.7736 

33010 

0 


STORE 

0162 



30.7737 

44576 

0 


ITCI 

0163 



30.7740 

00034 

0 



0164 



30.7741 

23126 

0 

KPIP 

20EC. 

C0164 



30.7742 

25370 

1 



0165 



30.7743 

04000 

0 

DP2 (-3) 

2DEC 

C0165 



30.7744 

00000 

1 



0166 



30.7745 

24000 

1 

OP (5/8) 

20EC 

C0166 



30*7746 

00000 

1 



0167 



30.7747 

00022 

1 

muearth 

20EC 

C0167 



30.7750 

21756 

0 



0168 



30.7751 

00164 

1 

MUMOON 

20EC 

C0168 



30.7752 

34414 

1 



Ul69 



30.7753 

00173 

1 

J(RE)SQ 

20EC 

C0169 



30.7754 

00416 

1 




* 


NASA 1021108-021 


DEC 4, 1966 


(MAIN) PAGE 750 


U5ER»S OWN PAGE NO. 5 
GRAVITY SLALEO AT 2 (-5) M/CS/CS 

0 

2 70 

0,59904 

0.125 

0.625 

,009063188 B-3 SCALED AT 2 ( +45) M ( *3) /CS ( +2 ) 

0.007134481 4.90277800 E12 2 ( +36 ) M ( +3 ) /C5 ( +2 ) 

,06006663 B-3 SCALED AT 2t+43)Ml+2) 


I 


; k 


* 






C) 


t V . 

■ ^ *. 


« * 

t 








■* 


. .. .»* t‘ . ' ** 

,4 i 


Ab^S7BA YUL SYSTEM FOR AGC^»; REVISION 0 OF PROGRAM 50LRUM55 BY 


L AVERAGE G INTEGRATOR 


P02U0 



routine FOR 

flights 

501 62 TO 

incorporate 5TA 

R0202 

servicer 

COMES here 

TO SEE IF 

AN update 

IS ready. 


0203 






26*7711 


BAN< 

020A 





26t771i 

66774 

0 

501UPCHK 

OSJ 

0205 





26t7712 

73615 

1 


0MN 

02055 





26*7713 

66616 

0 


35J 

0206 

ref 

1 6 

LAST 

741 

26*77iH 

01465 

1 



0207 

REF 

3 

LAST 

263 

26 1 7715 

01672 

0 



0208 

REF 

1 



26*7 ?16 

25302 

1 



0209 

REF 

3 

LAST 

609 

26*771? 

00023 

0 



0210 

REF 

2 

LAST 

751 

26*7720 

25302 

1 



02104 

REF 

1 



26*7721 

15770 

0 



02108 

REF 

1 



26*7722 

15755 

1 



0211 





26*7723 

52775 

0 


MXv 

0212 





26*7724 

44776 

1 


\/5LT 

0213 

REF 

23 

LAST 

609 

26*7725 

01107 

0 



0214 

REF 

14 

LAST 

610 

26 * 7 72 6 

01052 

1 



0215 





26*7727 

00002 

0 



0216 

REF 

2 

LAST 

7A7 

26*7730 

33306 

1 


STORE 

0217 





26* 7731 

52775 

0 


'AK\j 

02175 





26*7732 

44776 

1 


VSLT 

0218 

REF 

24 

LAST 

751 

26,7733 

01101 

0 



0219 

REF 

15 

LAST 

751 

26*7734 

01052 

I 



0220 





26*7735 

00003 

1 



0221 

ref 

3 

LAST 

748 

26*7736 

33300 

1 


STORE 

0222 





26,7737 

76776 

0 


ITC 

0223 

REF 

7 

LAST 

697 

26*7740 

2 1643 

0 



0224 





26*7741 

77576 

0 


EXIT 

0225 

REF 

34 

LAST 

7A4 

26*7742 

0 2276 

0 


1 c 

0226 





26*7743 

03005 

1 


Owl 

0227 

ref 

18 

LAST 

613 

26 * 7744 

0 3430 

0 

REDOS. 24 

TC 

0228 





26*7745 

20000 

0 


OCT 

0229 

REF 

28 

LAST 

687 

26*7746 

3 44 7 6 

0 


CAF 

0230 

REF 

4 

LAST 

751 

26,7747 

5 1671 

0 


T 5 

0231 

ref 

5 

LAST 

751 

26*7750 

5 1672 

0 


TS 

0233 

REF 

1 



26*7751 

4 7771 

0 


C5 

0234 

REF 

29 

LAST 

623 

26,7 ?52 

0 5720 

1 


T 

02345 

ref 

1 



26*7753 

6 1 6 1 3 

1 


CAOR 

02346 





26,7754 

77576 

0 

BADUPT IM 

EXIT 


NASA 1021108-021 


DEC 


1966 


(MAIN) Page tsi 



USER'S Own page no. 6 

Tt veltor update 

DUKINg average G. each PASS through 

26 

2 

TEST 

faPL 

P 1 P T I M E 

UPTIME 

kegstep 

updatflg 

REGSTEP 

It- piptime IS greater than OR E'DUAL TO 

UPTIME* AND uptime I5 NOT TOO OLD, AND 
updatflg is set* DO THE UPDATE, UPTIME 
IS NORMALLY SET TO POSMAX 

POSMAX. 

2.5SEC26 

BADJPTIM 

1 

TRANSFORM DATA IN STBUFF TO SM COORDS, 

STBUFF +6 

REFSMMAT 

i 

VNl 

1 

This ASSUMES that UPDATE SCALED 2(7)M/CS 

STBUFF 

REFSMMAT 

2 

RNl 

This ASSUMES THAT UPDATE SCALED 2 ( 26 )M 

0 

calcgray 

Calculate the associated gravity vector 
Fur the next time step. 

0 

PHASCHNg 

03005 

update restart point before setting 
uptime to show that the data has been 

flagidwn 

20000 

POSMAX 

UPTIME 

UPTIME +1 

Incorporated, also, indicate this to the 

GROUND BY resetting UPDATFLG. 

soiAvex 

POSTJUMP 

CALCRV62 

SET UP FOR average G TO RETURN TO USUAL 
Pul NT IN servicer 

0 

cuME here if uptime represents past time 


YUL SYSTEM FOR AGCA; REVISION 0 OF PROGRAM SOLRUMSS BY NASA 1021108-021 


UEC A, 1966 


(MAIN) PAGE 752 


L AVERAGE G INTEGRATOR USER»S OWN PAGE NO* 7 


023A7 

REF 

26 

LAST 

647 

26t7755 

0 3007 

0 

TC 

ALARM 


02 3 A Q 





26*7756 

01411 

1 

OCT 

0141 1 


023Ag 

REF 

29 

LAST 

751 

26*775? 

3 4A76 

0 

CAF 

PUSMAX 


0235 

REF 

6 

last 

751 

26*7760 

5 1671 

0 

TS 

UPTIME 


02351 

REF 

7 

LAST 

752 

26*7761 

5 1672 

0 

T5 

UPTIME +1 


02352 

REF 

19 

LAST 

751 

26*7762 

0 3430 

0 

TC 

FLAGIDWN 

RESET UPUAT flag 

02353 





26*7763 

20000 

0 

OCT 

20000 


02354 

REF 

104 

LAST 

744 

26*7764 

0 4000 

0 

1 C 

INTPRET 


02355 





26*7765 

76 776 

0 

ITC 

0 


02356 

REF 

3 

LAST 

751 

26*7766 

25302 

1 


KEGSTEP 


02357 





26*7767 

00000 

1 

2,5SEC26 20EC 

250 


C02357 





26.7/70 

00372 

1 




02358 

REF 

1 



26*7771 

65303 

1 

501AVEX CAOR 

AVGRET 



7(0 





YUL SYSTEM FOR AGCA; REViSIoM 0 OH PROGRAM SOLRUMS5 BY 


L AVERAGE G INTEGRATOR 

P0500 SIM flight SPECIAL 


0501 






31*7520 

8AN< 

0502 

REF 

105 

LAST 

752 

31*7520 

0 4000 

0 MALSjOB 

TC 

0503 





31*7521 

51776 

0 

VXM 

050A 

REF 

25 

LAST 

751 

31*7522 

01 101 

0 


0505 

REF 

16 

LAST 

/751 

31*7523 

01052 

1 


0506 

REF 

26 

LAST 

,753 

31 *752A 

33101 

1 

STORE 

0507 



i 


31*7525 

51775 

0 

V>tvi 

0508 



1 


31*7526 

44776 

1 

vslt 

05085 

REF 

27 

last/ 

753 

31*7527 

01107 

0 


0509 

REF 

17 

last 

753 

31*7530 

01052 

1 


05095 





31*7531 

00002 

0 


0510 

REF 

28 

LAST 

75^ 

31*7532 

33107 

1 

STORE 

0511 



1 

i 


31*7533 

77576 

0 

EXIT 

0512 

REF 

109, 

^ST 

731 

31 *753A 

0 2124 

1 

TC 


/ 




NASA 1021108-021 


PAGE 7b3 


DEC A > 1966 

u5er*s own PAGl N0» 


31 

INTPRET 

0 

STBUFF 

REFSMMAT 

STBOFF 

I 

STBUFF +6 
REFSMMAT 
1 

STBUFF +6 

0 

endofjob 


( MA i N ) 

8 


VUL system FOR AGC<^; REVISION 0 Ol- PROGRAM SGLRUMS5 BY NASA 1021108-021 


DEC 4, 1966 


(MAIN) page 754 


L verification assistance PRo<3RAM3 USER’S OWN page no. 1 


Room 



WAITLIST 

exercise program, times ARe 

given in 

cr 

o 

LiJ 

X 

1 — 

+ NN/32 + YY, where THE NS ReFeR TO 

time 


R00U3 

SINCE the BE&INNIN 

G OF the test* and 

Y5 

additional MCT 

• 




0004 






13.7205 


0AN< 

13 




0005 

REF 

13 

LAST 

337 

1 3 » 7 2(J 5 

3 0006 

1 

wltest 

XCH 

IN2 




0006 

REF 

14 

LAST 

754 

13*7206 

1 0006 

0 


CCS 

IN2 

Get in phase with tb increments 

• 


0007 





13*720/ 

0 7211 

1 


TC 

+ 2 




0006 





13*7210 

0 7206 

1 


TC 

-2 




0009 

REF 

15 

LAST 

754 

13*7211 

1 0006 

0 


C: 

IN2 




0010 





13*7212 

0 721 1 

1 


TC 

-1 




0011 

REF 

3 

LAST 

175 

13*7213 

5 0042 

1 


T5 

OUTCRl 

TO initialize. 



R0012 



the 

first 

task is entered into 

SLOT 1 

with a 

T3 increment 

betwee*'* the two t3 References, call 

at 


R0014 

10 + 

00/32 -25 

. SPECIFY wAIT ' 

TO 30/32. 








0015 

REF 

1 



1 3 * /2 1 4 

0 7310 

1 


TC 

OUTCRlWT 




0016 





13.7215 

00035 

1 


DEC 

29 




0017 

REF 

2 

LAST 

754 

13*7216 

0 7310 

1 


TC 

OUTCRlWT 

Gu wait For this and specify reSet 

TO 

0018 





13*7217 

00052 

0 


DEC 

42 

20 *8/32. 



R0019 



AT 30/32 

+16* WAIT 

12 MCT BEFORE ENTERING TASK 1. 




0020 

REF 

226 

LAST 

744 

13.7220 

3 5501 

D 


CAF 

ZERO 

TUNING CONSTANT, 



0021 

REF 

501 

LAST 

729 

13*7221 

1 0000 

0 


CCS 

A 




0022 





13.7222 

0 7221 

1 


TC 

-1 




0023 

REF 

225 

LAST 

747 

13.7223 

3 45 1 6 

1 


CAF 

ONE 

TASK ENTRY WITH T3 INC BETWEEN 

TWO 

T3 

0024 

REF 

120 

LAST 

731 

13.7224 

0 2173 

0 


TC 

waitlist 

REFERENCES, 



0025 

REF 

3 

LAST 

338 

13*7225 

42240 

1 


CADR 

NOPLWAIT +2 

: TASK IN HIGH SWITCHED BANK, 



0026 

REF 

3 

LAST 

754 

13*7226 

0 7310 

1 


TC 

OUTCRlWT 

Wait for 20 +6/32. CALL FOR RESET TO 

0027 





13*7227 

00027 

1 


DEc 

23 

20 +31/32, 



0028 

REF 

226 

LAST 

754 

13.7230 

3 4516 

1 


CAF 

ONE 

A1 20 +8/32 + l6» enter TASK 2 

DUE 

AT 

0029 

REF 

121 

LAST 

754 

13*7231 

0 2173 

0 


TC 

WA I TLI ST 

30, 



0030 

REF 

1 



13.7232 

27332 

0 


cadr 

QTS<2 





\ 


Y * 


Vi 


*'<’ •• 


■A, 


* ' Hr -;. 


V 




V- 






•.r 

I'l 


I 


1 

* •>, •' 
mkr.:. il*: 


j 





•> 







s: k 



YUL SYSTEM FJR AGC^; RLViSIuN 0 Of PRoGKAM SOLRUM5S BY NASA 1021106-021 


1966 


(MAIN) PAGE 755 


DEC A, 


L 

VERIFICATION ASSISTANCE PROGRAMS 





USER'S OWN page no. 2 

P0031 



rtAiT For 20 

+31/32 +16 and at 

THAT TIME WAIT FOR T3 TO OyERFLOW 

bEFORE entering TASk 3. REqUIReS RESeT 

RU033 

TO 30 +10/32. 








003-+ 

REF 

4 

LAST 754 

13.7233 

0 7310 

1 


TC 

OUTCRIWT 


0035 




13*7234 

00013 

0 


DEC 

11 


0036 

REF 

9 

LAST 613 

13*7235 

1 0037 

1 


CCS 

TIMES 


0037 




13.7236 

0 72 35 

1 


TC 

-1 


0036 

REF 

227 

LAST 754 

13.7237 

3 45l6 

1 


caf 

ONE 

ENTER TASK 3 AFTER T3 OVF, 

0039 

REF 

122 

LAST 754 

13. 72^*0 

0 2173 

0 


TC 

WAITLIST 


00*+0 

REF 

1 


13*7241 

27333 

1 


CAJR 

QTSK3 


OOAl 

ref 

5 

LAST 755 

13*7242 

0 7310 

L 


1C 

OUTCRIWT 

TASK 3 IS DUE at 40. WAIT FOR 30 +10/32 

00h2 




1 3 * 7 243 

00065 

1 


dEc 

53 

calling for RESET TO 40 +31/32. 

R00<(t3 



AT 30 +10/32 

+16, ENTER TAS<S 

4 

AND 5 DUE same 

RUPT AT 50. they 

WILL BE inhibited FOR 6 MS SO THAT T3 

R00A5 

WILL 

TICK WHILE IT IB 

B E I G 1 

reset IN 

THE 

DISPATCH DF 5. 



00A6 

ref 

95 

LAST 731 

13,7244 

3 5503 

1 


CAP 

Two 

EmERED INTO SLOTS 2 AND 3. 

0047 

REF 

123 

LAST 755 

13.7245 

0 2173 

0 


TC 

WAITLIST 


0048 

REF 

1 


13.7 246 

2733‘+ 

0 


CAOR 

QTSK4 


0049 

REF 

96 

LAST 755 

13,72<.r 

3 5503 

1 


CAP 

Two 


0050 

REF 

124 

LAST 755 

13.7250 

0 2173 

0 


TC 

WAITLIST 


0051 

ref 

1 


13.7251 

03225 

1 


cadr 

TCTSKOVR 

TASK IN FIXED-FIXED. 

0052 

ref 

6 

LAST 755 

13.7252 

0 7310 

1 


TC 

OUTCRIWT 

WAIT FOR 40 +31/32 +16* CALLING FOR 

0053 




13*7253 

00023 

0 


DEc 

19 

RESET TO 50 +18/32. 

0054 

ref 

7 

LAST 755 

13,7254 

0 7311 

0 


TC 

OUTCRIWT +1 

AT 40 +31/32 +16* INHIBIT UNTIL 

0055 




13.7255 

00030 

1 


DEC 

24 

50 +18/32 +16 AND RESET TO 60 ♦10/32. 

0056 

REF 

8 

LAST 755 

13*7256 

0 7310 

1 


1C 

OUTCRIWT 

A1 50 +16/32 +16* WAIT UNTIL 60 10/32. 

0057 




13,725 r 

00O25 

0 


DEC 

21 

RESETTING TO 60 +31/32. 


'♦O^^TbA YUL 5YSTtM FOR AGC't; REVISION Q OF PROGRAM SOLRUM55 By NASA 1021108-021 


DEC A ^ 1 966 


(MAIN) page 756 


L verification ASSISTANCE PROGRAMS 


USER'S OWN PAGE NO. 3 


P0058 AT 60 +10/32 +16, ENTER TAS<5 6 AND 7 DUE AT 70 AND g DUE AT 80 

R0060 DISPATCH, MAKING TASK 8 DJE THAT INTERRUPT. 


0061 

REF 

228 

LAST 

755 

1 3 ♦ 7260 

3 4516 

1 

CAF 

ONE 

0062 

REF 

125 

LAST 

755 

13.7261 

0 2173 

0 

TC 

Waitlist 

0063 

REF 

1 



13.7262 

27340 

0 

CADR 

UTSK6 

006A 

REF 

229 

LAST 

756 

13.7263 

3 4516 

1 

caf 

ONE 

0065 

REF 

126 

LAST 

756 

13. 7264 

0 2173 

0 

TC 

WAITLIST 

0066 

REF 

1 



13.7265 

27342 

1 

CA3R 

0TS<7 

0067 

ref 

97 

LAST 

755 

13.7266 

3 5503 

1 

CAF 

T WO 

0068 

REF 

127 

LAST 

756 

13.7267 

0 2173 

0 

TC 

waitlist 

0069 

REF 

1 



13.7270 

27343 

0 

CADR 

(^TSK8 

0070 

REP 

9 

LAST 

755 

13i72 ;i 

0 7310 

1 

TC 

OUT CRiWT 

0071 





13,72/2 

00023 

0 

dEc 

19 

0072 

REF 

10 

LAST 

756 

13.7273 

0 731 1 

0 

TC 

OUTCRIWT +l 

0073 





13.7274 

00001 

0 

DEC 

1 

00 /A 

REF 

15 

LAST 

723 

13.7275 

3 447 7 

1 

CAF 

FIVE 

0075 

REF 

529 

LAST 

7A8 

13,7276 

5 0115 

1 

TS 

MPAC 

0076 





13.7277 

2 0016 

I 

QTSKLOOP RElINT 


0077 





13.7300 

2 0017 

0 

INIHINT 


0078 

REF 

530 

LAST 

756 

13.7301 

4 0115 

0 

cs 

MPAC 

0079 

REF 

16 

LAST 

6 O 9 

13.7302 

6 5362 

0 

AD 

SEVEN 

0080 

REF 

128 

LAST 

756 

13.7303 

0 2173 

[) 

TC 

WAITLIST 

OObl 

REF 

1 



13. /304 

27344 

1 

cadr 

QTSKIO 

0082 

REF 

531 

LAST 

756 

13.7305 

1 0115 

0 

CCS 

MPAC 

0063 

REF 

1 



13.7306 

0 7276 

0 

TC 

QTSKLOOP -1 


, 73 WILL increment DURING TASK 7 


ENTER TWO TASKS DUE SAME T 3 RUPT AND 

Another due the following rupt. 


A T3 INC WILL OCCUR WHILE TASK 7 IS 

Setting T3 for this task and cause it to 
Bl the third task Due that RUPT. 

WrtIT UNTIL 60 +31/32 +I6f INHINTING 
7U +16/32 +16. 


SYSTEMMAT ICALLY ENTER TASKS IN ALL 6 

Slot s . 


13»730/ 0 7307 1 QENDTEST TC 


008A 


yul System for agc'*; revision o ok program solRumss by naba losuoa-ozi 


DEC A, 1966 (MAINJ PAgE 757 


L VeRIUCATION assistance programs USER’S OWN page no. a 


POOb5 



THE 

following subroutine uses 

OUTCRl AS 

A fine 

T 1 MER D JR I NG 

THE waitlist 

test. 

0067 





13»7310 

2 0016 

1 

OUTCRIWT 

RElI NT 




OObB 

REF 

328 

LAST 

691 

13f 7311 

3 0001 

0 


XCR 

Q 



0069 

REF 

532 

LAST 

756 

13t7312 

5 Oils 

1 


TS 

MPAC 



0090 

REF 

502 

LAST 

75A 

13»7313 

2 0000 

0 


INOEX 

A 



0091 





13t73U 

A OOOO 

0 


C5 

0 

NUMBER OF 

THIRTY-SECONDS OF lOMS TO WAIT 

0092 

REF 

22 

LAST 

691 

13i7315 

6 A522 

0 


AD 

HALF 



0093 

REF 

23 

LAST 

757 

I3f73l6 

6 Ab22 

0 


AD 

HALF 



009A 

REF 

533 

LAST 

757 

I3t73l 7 

5 0116 

1 


TS 

MpAC *l 

NEW OUTER 

SETTING. 

0095 

REF 

A 

LAST 

75A 

13,7320 

1 00A2 

0 


CCS 

OUTCRl 



0096 





13*7321 

0 7320 

1 


TC 

-1 



0097 

REF 

53A 

LAST 

757 

13,7322 

3 0116 

1 

0UTCR1W2 

XCH 

MPAC +1 



0098 

REF 

5 

LAST 

75r 

13,7323 

5 0UA2 

1 


TS 

OUTCRl 



0099 

REF 

1 



1 3 ♦ 732 A 

3 7331 

1 


CAP 

IWTCODE 



0100 

REF 

11 

LAST 

187 

13,7325 

5 0012 

1 


TS 

0UT2 



0101 





13*7326 

2 0017 

0 


INHINT 




0102 

REF 

535 

LAST 

757 

13,7327 

2 0115 

0 


INDEX 

f‘i P A C 



0103 





13,7330 

0 0001 

0 


TC 

1 



OlOA 





13,7331 

26000 

0 

IwTCOoE 

OCT 

26000 




^faA^)78A YUL system FOR mGca; KEVJblON 0 OF PROGRAM 50LRUM53 BY 


L vehification assistance PRu<»KAMS 


P0105 



TASKS FOR 

VJA1TL15T ■ 

tester. 




0106 

REF 

98 

LAST 

731 

13f 7332 

0 

2256 

1 

QTSK2 

I C 

0107 

REF 

99 

LAST 

758 

I3i7333 

0 

2256 

1 

QT5K3 

TC 

0108 

REF 

1 



13*733*+ 

3 

73A5 

1 

QTSK4 

CAP 

0109 

REF 

503 

LAST 

757 

13*7335 

1 

0000 

0 


CCS 

0110 





13*7336 

0 

7335 

0 


TC 

0111 

REF 

100 

LAST 

758 

13(7337 

0 

2256 

1 


TC 

0112 

REF 

1 



13*7 3 Au 

3 

73A6 

1 

0TSK6 

CAP 

0113 

REF 

2 

LAST 

755 

13 *73A1 

0 

7335 

0 


TC 

OllA 

REF 

101 

LAST 

758 

13*73A2 

0 

2256 

1 

0TSK7 

1 C 

Oils 

REF 

102 

LAST 

756 

13*73A3 

0 

2256 

1 

0TSK8 

TC 

0116 

REF 

103 

LAST 

758 

13t73AA 

0 

2256 

1 

QTSKIO 

TC 

0117 





13 ♦73A5 


00115 

1 

OTSKADEL 

DEC 

0118 





1 3 * 7 3Ab 


00116 

1 

QTSK6DEL 

dec 


NASA 1021108-021 


DEC A, 1966 


IMAIN) page 758 



USER'S ONN page NO. 5 

TASKOVER 

taskover 

otskadel 

A 

-1 

1 askover 

GT 5< 6DEL 
OTSKA +1 

TASKOVER 

TASkOvER 

TASKOVER 

WAIT SO THAT T3 WILL TICK DURING DISPtCH 

77 

7fa 

Tuning constants. 


4b4b78A yul System for agc<»; revision o of program solrumss by nasa 1021108-021 


DEC 1966 (MAIN) PA&E 759 


L OUO SUM-CHECK EiMD OF RECORD MARKS USER’S OWN PAGE NO. 1 

ROOOl EACH VALID BANK MUST HAVE AN EOR CONSISTING OF TWO jC SeLF WORDS jO 


R0002 

SIGNIFY THE END Op GOOD PARITY 

data. 



OOOA 


357a 

0A\< 

1 

0005 

357A 

0 357a 1 

TC 


0006 

3575 

0 3575 0 

TC 


0008 


5765 

bank 

2 

0009 

5^65 

0 5765 Q 

TC 


0010 

5766 

0 5766 0 

TC 


0012 


03,7A65 

BANK 

3 

0013 

03» 7A65 

0 7A65 1 

TC 


OOIA 

03 ♦ 7 A66 

0 7*t66 1 

TC 


0016 


0A,75l6 

BANK 

A 

0017 

OA t 7 5 1 6 

0 7516 1 

TC 


0018 

0A,7517 

0 7517 0 

TC 


0020 


05,7605 

bank 

5 

0021 

05*7605 

0 7605 0 

TC 


0022 

05*7606 

0 7606 0 

TC 


002A 


06,7632 

BANK 

6 

0025 

06 *7632 

0 7632 1 

TC 


0026 

06*7633 

0 7633 0 

TC 


0028 


07,7530 

bank 

7 

0029 

07*7530 

0 7530 0 

TC 


0030 

07*7531 

0 7531 1 

TC 


0032 


1 0 * 7 7 A 1 

BANK 

10 

0033 

10*77^1 

0 77A1 1 

TC 


003A 

10*77A2 

0 77A2 1 

TC 


0036 


11,773A 

bank 

11 

0037 

11 *7 73A 

0 773A 0 

TC 


0036 

11*7735 

0 7 735 1 

TC 


OOAO 


12*7760 

bank 

12 

OOhI 

12 *7 76U 

0 7^60 1 

TC 



4e^t»7HA YUL SYSTEM FOR AGC^; REVISION 0 Oh PROGRAM SOLRUM6S By 


L OUO 

sum-check end of record marks 


0042 

12»7761 0 776i 0 

TC 

0044 

13*7347 

8A\i< 

0045 

13*7347 0 7347 0 

TC 

0046 

13*7350 0 7350 0 

TC 

0048 

14*7573 

BAN< 

0049 

14*7573 0 7573 1 

TC 

0050 

14*7574 0 7574 0 

TC 

0052 

21*7565 

BANK 

0053 

21*7565 0 7565 0 

TC 

0054 

21 *7566 0 7566 0 

TC 

0056 

22*7203 

BANK 

0057 

22*7203 0 7203 1 

TC 

0058 

22*7204 0 7204 0 

TC 

0060 

23*7476 

bank 

0061 

23*7476 0 7476 0 

TC 

0062 

23*7477 0 7477 1 

TC 

0064 

24,6512 

BANK 

0065 

24*6512 0 6512 1 

rc 

0066 

24*6513 0 6513 0 

TC 

0068 

25*7543 

bank 

0069 

25*7543 0 7543 1 

TC 

0070 

25*7544 0 7544 0 

TC 

0072 

26,7772 

BANK 

0073 

26*7772 0 7772 1 

TC 

0074 

26*7773 0 7773 0 

TC 

0076 

27,7354 

bank 

0077 

27*7354 0 7354 1 

TC 

0070 

27*7355 0 7355 0 

TC 

OObO 

30.7755 

bank 

0081 

30,7755 0 7755 1 

TC 


NASA 1021108-021 


DEC 4, 1966 


(MAIN) PAGE 760 


USER'S OWN page NO. 2 











30 


YUL SYSTEM FOR AGC^^; RtVlSIorM 0 OF PROGRAM 50LRUM55 BY 


L 000 sum-check eno of record yarks 


0082 

30»7756 

0 7756 1 

TC 

OObA 


31*7535 

8AN< 

0085 

31*7535 

0 7535 0 

TC 

0086 

31*7536 

0 7536 0 

TC 

0086 


32*7793 

6Am< 

0089 

32*7793 

0 7793 0 

IC 

0090 

32*7799 

0 7799 1 

TC 

0092 


33 *7996 

3AN< 

0093 

33*7996 

0 7996 0 

TC 

009A 

33*7997 

0 7997 1 

TC 

0096 


39*7770 

bank 

0097 

39*7 7 70 

0 7770 0 

TC 

0098 

39*7771 

0 7771 1 

TC 


EMD of revision 0 OF PROGRAM SOLRUM 55 BY NASA 102110B-021 


NASA 1021108-021 


DEC A, 1966 


(MAIN) PAGE 761 


USER'S OWN page NO. 3 






LAST ASSEMBLED ON NOV 26 » 1966 
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SYMboL table LIJjTING, INCLUDING PAGp NUMBpR DF DEFINITION, AND NUMBeR OF ReFeRe^JClS WItH FIRST AND LAST PAGe NUMBeRS 



SYMBOL H 

Definition 


ReFeReNCeS 

F 

symbol h 

Definition 

References f 

■1 

symbol h 

Definition 

ReFeRlnle^ 


O.OISEC 


A5l6 

601 


c 

598 

599 

~ 

1/PIPA 

14,7017 

214 

4 

215 

699 

P 

• 

2R0UND 

06,7224 

519 

4 

51 f 

518 


0,2sS33 

33 

,7220 

6l6 


1 

6l5 



1/PIPADT 

0755 

21 

7 

21 

744 

■ 

2/3 

23,7230 

325 

1 

312 



0.2S5EC 

32 

,6676 

570 


3 

567 

5 r4 


1/RLLHTE 

1700 

33 

1 

557 



2SCUM2 

10,7423 

188 

1 

l8B 



O.SSEC 

33 

,6557 

602 


1 

602 



1/TAN33 

26,7550 

678 

1 

660 


• 

2SC0MDIF 

10, 7410 

188 

3 

162 

397 


0.755EC 

32 

,7146 

575 


1 

573 



1/v^IE 

25,7517 

655 

3 

654 

655 

m 

2SEC21 

21,7014 

351 

1 

338 



0,995 

33 

^ 6 1 62 

592 


1 

591 



ISEC32 

32,6677 

57O 

1 

560 


m 

2SEC24 

24,6453 

622 

2 

621 

622 











ISEC 

32,7147 

575 

- 


«- 

m 

2SEC33 

33,6712 

6O5 

2 

605 

615 


lUOOOEC 


3572 

627 


- 

- 

* 


1STD2S 

30,6324 

378 

7 

332 

475 


2SEC 

32,7567 

586 

4 

553 

580 


lOODEC 


3564 

626 



— 



iwTcode 

13,7331 

757 

1 

757 


m 

25ECS 

14,6102 

194 

1 

I94 



lOSSEC 

2A 

,6353 

611 


1 

611 









u 

2V5CALE 

0014 

296 

1 

316 



lUDEGS 

30 

♦ 6414 

380 


1 

300 



2000DEC 

3573 

627 

* 


- 









10.5SEC 

32 

,6507 

566 


1 

572 



200DEC 

3565 

6 26 

2 

553 

554 

m 

300DEC 

3566 

627 


* 

- 


1USEC24 

2A 

,6352 

611 


1 

609 



203IA5 

06,6742 

509 

2 

508 


m 

30DEC 

3556 

626 


* 

* 


lOSEC 

2A 

♦ 6l75 

577 


1 

576 



200EGS 

2675 

160 

1 

160 


m 

30DEG 

26,7556 

678 


660 

680 


1USECS75 

05 

,7142 

260 


1 

260 



20MANU 

26,6777 

670 

1 

670 


m 

30MANU 

26,7105 

671 

1 

67O 



lOSECS 

U 

,6101 

194 


1 

193 



20M5RUPT 

10,7125 

leo 

1 

173 



30SEC 

12,7744 

425 

1 

394 



IIDEC 


3533 

626 


1 

426 


z 

205ECS 

14,6100 

l94 

1 

194 


m 

31 ,5DEG 

26,7554 

678 

2 

666 



1 IDSPIN 

06 

,7A26 

527 


7 

49l 

531 


2i/22REG 

0106 

15 

2 

486 

492 s 

m 

31,8DEG 

32,7654 

588 

1 

587 



11.55EC 

32 

,7151 

575 


1 

567 



22MANU 

26,6767 

669 

1 

670 


m 

31MANU 

26,7060 

671 

1 

670 



llMANU 

26 

, 6665 

668 


1 

668 



23MANU 

26,6773 

670 

1 

670 


m 

320ms 

14,6103 

194 

7 

I93 

213 


12BIT50K 

04 

,6033 

99 


1 

101 



23M1N 

32,7570 

586 

1 

583 


m 

32K 

2165 

291 

1 

291 



12M56S 

30 

f 6 2 4 1 

331 


1 

330 



25NM 

30,7123 

737 

1 

7I3 


m 

333MANU 

26,7065 

671 

1 

67 1 



12MANU 

26 

,6705 

668 


1 

668 



289.5SEC 

24,6141 

576 

2 

576 


m 

33MANU 

26,7077 

671 

1 

671 



15/16 

23 

,7A32 

325 


1 

312 



2blG 

30,6546 

383 

1 

363 


• 

3 5DEg 

32,7655 

588 

2 

565 

588 


15/16TH 

33 

,7353 

619 


1 

6l8 



2BLANK 

06,6621 

495 

5 

49O 

529 

■ 

35MANU 

26,7130 

672 

1 

67l 



155EC 

32 

♦ 6705 

570 






2CHS 

30,7217 

738 

2 

706 

709 

m 

35SCNDS 

10,7501 

189 

1 

185 



IbOCASE 

26 

,7350 

675 


1 

658 



2CHSLAD 

30,7221 

738 

1 

721 


m 

355ECS 

1 4 1 5 0 7 7 

194 

1 

193 



isodeg 

26 

,7572 

680 


* 

a, 



2d El 

0004 

296 

2 

298 

300 = 

1 

360DEG 

26,7572 

680 

3 

670 

673 


180/ZERO 

26 

,6101 

658 


1 

657 



2DEL+E 

0004 

296 

5 

297 

306 = 

m 

366MANU 

26,7175 

673 

1 

672 



18SEC2A 

24 

,6476 

623 


1 

622 



2H5 

30,7205 

738 

2 

720 

725 

■ 

368MANU 

26,7155 

672 

1 

673 



IblTDP 

30 

,7060 

736 


2 

704 



2H53MXSQ 

30,7207 

738 

1 

725 


m 

36MANU 

26,7150 

672 

1 

672 



ICHECk 

04 

,6670 

124 


1 

124 



2. 1 SPOT 

13 1 6 0 0 4 

125 

1 

134 


m 

37DEC 

30,6302 

376 

1 

376 



1 ,25S1A 

14 

,7572 

578 


1 

577 



2.2bPOT 

13,6010 

125 

- 


- 

m 

37MANU 

26,7167 

672 

1 

672 



1.523 

33 

f 6 1 60 

592 






2,35P0T 

13,6014 

125 

- 

- 

- 

m 

38MANU 

26,7117 

672 

2 

672 

673 


1.5DEG 

26 

,7552 

678 


3 

666 

676 


2.45P0T 

13,6020 

125 

- 

- 

- 

m 

3CHECK 

21 ,6726 

349 

1 

349 



1 .7SEC 

32 

,6505 

566 


1 

563 



2,55EC26 

26,7767 

752 

I 

751 


m 

3UEG 

26,7560 

676 

1 

661 



1/12TH 

30 

,7046 

736 


1 

715 



2,55EC32 

32 * T 2& 3 

580 

3 

580 


m 

3.12SP0T 

13*6 104 

126 

- 

- 

- 


1/20PTN 

11 

,7102 

278 


1 

277 



2,5SEC 

32,6 700 

57O 

1 

565 


m 

3.1 55P0T 

13,6120 

127 

- 

" 

- 


1/3RD 

30 

,7044 

736 


2 

715 



2,55POT 

13,6024 

125 

- 

- 

- 

m 

3.165P0T 

1 3 f 6 1 24 

127 

- 


- 


1/8TH 

30 

,7161 

737 


2 

711 

718 


2J3RE/J2 

23,7440 

326 

2 

313 

3l4 

m 

3,17SP0T 

13,6130 

127 

- 

- 

- 


1/GMAX 

30 

,7203 

738 


1 

725 



2M I N 

32,7572 

586 

i 

583 


m 

3, ISPOT 

1 3 f 60 3O 

125 

1 

134 



l/GYRO 

lA 

,7237 

221 


2 

217 

223 


2UPTIQNS 

1761 

34 

4 

275 

277 = 

m 

3.235P0T 

1 3 # 6 1 60 

128 

-- 

— 

— 


1/MUE 

31 

,6306 

688 


5 

684 

6y 6 


2RN0END 

06,7234 

519 

- 



m 

3,24SP0T 

13,6164 

128 




KeY: symbols DeFINeD BY 

equals ARc flagged others are normally defined except 

those flagged: 





u 

iJi-jnrFTNFD 




E 

failed 

LFFTOVfR erase M 

MULTIPLY defined 



t 

ftRONG memory type 

MM 

multiple ER 

N 

nearly defined by 

= 

u 

failed 

leftover word 0 

oversize- dr 

ILL 

-defined 

c 

CONFLICT 

IN memory 

X 

MISC. TROUB 
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symbol Table listing* INCLJDInC^ PAOL NUMBlR df definition* and number of references with first and last page numbers 


SYMBOL H 

Definition 

ReFeRen 

CeS 

F 

m 

SYMBOL H 

Definition 

References 

F 

■ 

SYMBOL H 

Definition 

References f 

3.2SPOT 

13«6034 

125 

•P 




s 

• 

501LSTB2 

10,6006 

15 7 

1 

157 



m 

74K 

1 4 f 667 6 

210 

i 

208 


3.55EC33 

33*7221 

6l6 

2 

615 



m 

5015P51 

25,6454 

640 

2 

564 

622 



75FN1 

05,7066 

259 

1 

258 


3.5sEC 

32*6702 

570 

1 

574 



m 

501SP52 

25,6461 

640 

1 

607 



m 

75FN2 

05,7075 

259 

1 

258 


3,8SEC 

32,6510 

566 

1 

564 



m 

501JPCHK 

26,7711 

751 

1 

581 



m 

75FN3 

05,7104 

260 

2 

258 

260 

30RATE5T 

32,6620 

568 



•• 


m 

50DEC 

3562 

626 

i 

456 




75FN4 

05,7052 

259 

1 

258 


3 / A 

23,7434 

325 

2 

312 

32*, 


m 

50MANU 

26,730? 

674 

1 

6 74 



m 

75 FN 5 

05,7124 

260 

1 

258 


3/8 

23,6301 

303 

1 

312 


5 


5BLANKI 

06,6576 

495 


- 

- 


m 

75HU2 

05,7141 

260 

1 

258 


3SEC 

32,6701 

570 

1 

569 



m 

SbLANk 

06,6554 

494 

3 

494 

532 


m 

75MASK 

05,7140 

260 

3 

259 

260 

3ZER05 

30,7056 

736 

4 

384 

719 



5,125POT 

13,6464 

132 

- 

- 

- 


m 

75PEL0AD 

05, lOZO 

258 

8 

258 









m 

5,l8SP0T 

13,6514 

133 


1- 



m 

76C0NTIN 

13,7152 

263 

1 

263 


aoodEc 

3567 

627 


— 



m 

5.19SP0T 

13,6520 

133 






7 6 JUMP TO 

05,6041 

236 

1 

236 


AOOEC 

3561 

626 




iS; 

m 

5.1 SPOT 

1 3 1 6^ 1 0 

131 

1 

134 




76UPDATE 

13,6753 

261 

2 

2 36 

261 

aomanu 

26,7203 

673 

7 

671 

677 


li 

5.20SPOT 

13,6524 

133 

- 




m 

77CQNT In 

13,7071 

262 



- 

aomsrupt 

2651 

159 

1 

159 



m 

5,215POT 

13,6530 

133 

- 

- 

- 



7 /update 

13,6761 

261 

1 

236 


AIMANU 

26,7212 

673 

1 

673 



m 

5.22SP0T 

13,6534 

133 

- 

- 

- 


m 

7-8WAIT 

11,6343 

270 

1 

270 


A2< 

4121 

40 

1 

40 



m 

5.23SPOT 

1 3 , 65 4 0 

133 


- 

* 


m 

7/12 

23, /210 

320 

1 

312 


A2MANU 

26,7224 

673 

2 

673 



«■ 

5,2SP0T 

13,6414 

131 


- 

- 


m 

7SEC33 

33,7223 

6 1 6 

- 

- 

- 

43MANU 

26,7221 

673 

1 

673 




5.7SP0T 

13 §6^40 

132 


- 

- 


m 

/SEC 

32,7150 

575 

2 

572 

574 

455ECS 

14,6076 

194 

1 

195 



m 

5/128 

23,7214 

320 

1 

313 










4, 145P0T 

13,6270 

129 


•• 



m 

5SEC24 

24,6354 

612 

1 

6ll 



m 

89.55EC 

32,6706 

57 O 

1 

57 O 


4, 1 SPOT 

13,6204 

128 

1 

134 



m 

55EC32 

32,6703 

570 

1 

569 



m 

89 TEST 

06 f 6 0 6 3 

487 

2 

486 


4,215P0T 

13,6324 

130 





m 

5SEC33 

33,7222 

616 

-- 

- 

• 



6. 3SEC 

32,6504 

566 

1 

564 


A ® 2 6 SPOT 

13,6350 

130 

- 

- 

* 


m 

5SEC 

33,6556 

602 

3 

6l4 

6l9 


m 

8T02 

5041 

55 

5 

5 8 

92 

4.2TSP0T 

13,6354 

130 



— 

















4 * 2 bSPOT 

1 3 1 6360 

131 






6003EC 

3571 

627 

1 

627 




9 ODEG 

26,7562 

679 

3 

660 

6 6 I 

4,295P0T 

13,6364 

131 





m 

600EC 

3563 

626 

* 

- 

- 

= 

m 

9 ODEGAZ 

21,7000 

351 

2 

339 

354 

4,25P0T 

13,6210 

128 





m 

60< 

4170 

41 

1 

151 



m 

905EC24 

24,6454 

622 

1 

621 


4,30SP0T 

13,6370 

131 


i*. 



m 

60MSRUPT 

10,7047 

178 

1 

161 



m 

905EC32 

32,7575 

586 

1 

584 


4.31SP0T 

13,6374 

131 





m 

60SCND5 

10,7502 

169 

1 

186 



m 

9 OSECS 

14,6075 

194 

I 

196 


4,32SP0T 

13,6400 

131 






60SEC 

12,7743 

425 

1 

394 




93. 8SEC 

32,6506 

566 

1 

571 


4.33SP0T 

13,6404 

131 





m 

63DEC 

34,6235 

429 

3 

426 

428 


m 

9/16 

23,7212 

320 

1 

312 


4,3SP0T 

13,6214 

128 





m 

69DEC 

34 ♦ 62 3 5 

429 

i 

426 










4,4SP0T 

13,6220 

128 





m 

6.1 SPOT 

13,6554 

134 

1 

134 




+OCASE 

06,7021 

511 

1 

510 


4kSCALE 

0100 

296 

1 

314 



■ 

6K 

4373 

46 

8 

44 

290 

= 


+ ORET 

06,7014 

510 

1 

511 


4SEC 

32,7261 

580 





m 

6K ♦ 3 

3322 

550 

1 

550 



ft 

♦uECSGN 

06 , 6 1 75 

489 

1 

488 


4SEC0NDS 

30,6243 

331 

1 

330 



m 

6K-1 

4610 

50 

1 

50 



ft 

♦ ON 

06,6322 

491 

3 

491 

525 


mmmmmmum 

mrnmmm 



m 

6SEC 

32,6704 

570 

2 

573 









500DEC 

3570 

627 


* 

IP, 


■1 m 









AOsO 

03,7353 

95 

1 

94 


5Q1AB0RT 

25,6530 

641 

i 

565 



m 

70< 

2667 

159 

2 

1 19 

29 O 


ft 

AO 

1 60 1 

31 

8 

709 

II 

— i 

r- 

5Q1AVEX 

26,7771 

752 

1 

751 



m 

71C0NTIN 

13,7145 

263 

- 

- 

- 


ft 

AOCALC 

31 f / 0 3 6 

708 

1 

708 


501LSTA1 

10,6067 

158 

2 

155 



m 

71JJMPT0 

05,6043 

236 

1 

235 



ft 

A1 

1100 

732 

3 

70b 

718 = 

501LST A2 

10,6001 

157 

1 

155 



m 

71JPDATE 

13,6757 

261 

1 

236 



■ 

A 

0000 

1 2 

5 O 3 

37 

758 = 

501L5TB1 

10,6026 

157 

1 

158 



m 

72DeC 

12,7 741 

425 

1 

392 




ABCLOAD 

07,6564 

512 

1 

499 



key: symbols defined by equals Are flagged =. OTHERS are normally defined except those flagged: 


U UNDEf^INEO 

N nearly OEFINEO by 


E failed leftover ERASE M MULTIPLY DeFINeU 

J FAILEU leftover WuRO 0 overside- or ILL-DeFINeO 


T wrong Memory type mm multiple errors 
c conflict in Memory x misc, trouble 
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SYMtioL table LIStINO* InCLUDInO PaOE number of definition* and NUMBER qF REFERENCES WItH FIRST AND LaSt Pa^E NUMBERS 


SYMBOL H 

def ini t Ion 

ReF’eREN 

Ct3 

ABLOAD 

07 

,6620 

512 

1 

499 


AbORT32 

32 

,7257 

580 

2 

579 

580 

AbORT33 

33 

,7406 

620 

- 

— 

— 

AbORT 


3044 

295 

11 

82 

552 

AbORTCAL 

06 

,6057 

407 

1 

486 


AbORTEST 

32 

*6400 

56A 

1 

563 


AbORTLOC 

32 

,646 1 

565 

2 

565 

572 

AbORTRPT 

32 

,6477 

565 

2 

129 

236 

AbORTSIG 


0002 

18 

1 

582 


AbRTFLAG 


0056 

19 

• 



AbRTJPTO 

05 

, b045 

236 

1 

235 


AbRTvJAIT 

32 

,6374 

563 

2 

129 

563 

AbVALl 

03 

,6261 

75 

1 

47 


AbVAL 

03 

*6263 

75 

2 

75 

92 

ACCELTST 

12 

,6606 

402 

1 

257 


alceptup 

04 

,7455 

478 

1 

478 


AtCEPTWC 

26 

,6037 

658 

2 

676 


acceptwd 

07 

,6030 

497 

1 

497 


ACC0MP2 

23 

,6525 

309 

• 

> 

— 

ACCQMP 

23 

,6515 

309 

1 

308 


accurot 

22 

,6565 

466 

4 

354 

373 

ACDSST 

03 

, 6643 

82 

2 

62 

64 

ACTIVFLG 


0025 

18 

- 

- 

- 

AD2 


5242 

60 

3 

59 

92 

ADDINC 

22 

, 6044 

366 

2 

366 


ADDRESS 


4215 

42 

2 

39 

4 1 

ADDRWD 


0062 

14 

91 

40 

535 

ADDT05UB 


5055 

55 

3 

53 

59 

ADENDEXT 

31 

,7514 

716 

1 

714 


aoiax 


0747 

21 

2 

216 

542 

adiay 


0750 

21 

1 

2X6 


adiaz 


0751 

21 

1 

217 


ADRLOC 


0121 

16 

25 

37 

385 

ADRS+l 

11 

,6712 

276 

1 

276 


ADR5CHK 

11 

*6721 

276 

2 

275 

276 

aosrax 


0752 

21 

2 

216 

542 

AD5RAY 


0753 

21 

1 

216 


AD5RAZ 


0754 

21 

1 

217 


ADSUM 

11 

*6774 

277 

2 

275 

276 

AD V AN 


3002 

284 

- 

- 

- 

AGAINI 

21 

*7177 

356 

1 

356 


AGAIN2 

21 

,7207 

356 

1 

356 


AGAIN3 

21 

,7226 

356 

1 

356 



symbol h 

Definition 

References 

AbAlN4 

21,7236 

356 

1 

356 


AtjAlN 

32,7304 

58 1 

1 

581 


AH33KDV 

1435 

29 

3 

7U 

717 

alarm 

300 7 

293 

26 

36 

752 

alfalim 

31,6321 

669 

1 

685 


ALG'4INIT 

34,6572 

436 

1 

456 


ALoNTST 

12*6000 

392 

1 

257 


alintime 

05,6502 

252 

1 

235 


allabort 

33,6254 

594 

1 

613 


ALLDC/OC 

07,6720 

514 

2 

512 


alldone 

13,7114 

262 

3 

263 


ALLSHADE 

26,6672 

668 

2 

66 5 

667 

ALM/END 

05,6075 

236 

9 

235 

257 

ALDAD 

07,6645 

513 

1 

499 


Alp 

1627 

32 

7 

709 

717 

ALPMAM 

1254 

24 

15 

298 

315 

ALPHAV 

1152 

23 

19 

308 

324 

altpulss 

22,6073 

367 

2 

367 


amemory 

IlOO 

23 

139 

23 

369 

anslEx 

1673 

33 

1 

604 


ANGLEY 

1674 

33 

1 

604 


ANGLEZ 

1675 

33 

1 

604 


ANDRMAL 

1440 

28 

2 

644 

646 

ANDvFLOw 

25,7065 

646 

1 

644 


AN PSEUDO 

25 ,7l60 

647 

1 

646 


ARGCOSl 

03,6757 

85 

1 

47 


ARCCOS 

03,6627 

62 

L 

85 


ARC5IN1 

03,6755 

85 

1 

47 


ARCS IN 

03*6624 

82 

1 

85 


akctan 

30,6503 

383 

1 

666 


ARC TRIG 

22,6436 

463 

7 

461 

475 

ARETURN 

0113 

15 

6 

15 

227 

ARGNI 

03,7405 

96 

3 

94 

96 

ARGUO 

03,7374 

96 

1 

94 


ARGOl 

31.6142 

686 

1 

686 


ARGD2 

31,6154 

686 

1 

68 6 


arrstflg 

0057 

19 

- 

- 

- 

ARRSTM5K 

32,6463 

565 

2 

569 

571 

artninsf 

06,7127 

518 

1 

516 


artdutsf 

06,6743 

509 

1 

507 


ARJPT 

0026 

12 

7 

35 

119 

asp 

0000 

732 

> 

- 

- 

AS3 

00 3 0 

304 

4 

304 



symbol h 

Definition 

References f 

AST 

03,6062 

71 

1 

47 


ATANO/0 

30,6552 

384 

1 

383 


ATAN=90 

30,6556 

384 

1 

383 


ATANDUN 

30,6531 

383 

4 

383 

304 

ATDT 

1714 

33 

2 

652 


AT5BITS 

57/7 

48 

1 

55 

* 

ATTCABS 

0 5 f 6306 

244 

1 

244 


ATTCk2 

05,6274 

244 

2 

244 


attcnoff 

32,6527 

567 

11 

129 

599 

ATTCONON 

32,7135 

575 

2 

126 

575 

ATTljOBl 

33,6413 

598 

5 

125 

622 

ATTIjOB2 

33,6423 

598 

1 

603 


ATTI JOB 

33,6404 

598 

2 

125 

587 

avegon 

30,6175 

330 

1 

329 


AVETOMDI 

30,6000 

326 

1 

606 


AVET0MD2 

30,6007 

326 

1 

610 


avetomid 

30,6014 

326 

L 

326 


AVGON 

24,6357 

620 

2 

130 

611 

avgret 

32,7303 

581 

1 

752 


avgRetrn 

1313 

26 

2 

747 

748 = 

axc 

03,6067 

71 

1 

47 


axisgeni 

22,6764 

471 

1 

47 I 


AXISGEN 2 

22,7013 

472 

1 

472 


AXISGEN3 

22,7040 

472 

1 

472 


AXISGEN 

22,6760 

471 

4 

360 

446 

AXiSROTl 

22,6627 

467 

1 

466 


AX I SHOT 

22,6555 

466 

6 

464 

465 

AXT 

03,6072 

71 

1 

47 


AZ 

1270 

24 

- 

** 

= 

azimuth 

I3l6 

29 

14 

332 

446 = 

A(XJ 

23,6350 

305 

1 

304 


B12-1 

04,7510 

479 

1 

478 


B14-B8 

05,6651 

254 

1 

254 


B 

0073 

14 

7 

83 

84 : 

BACK.2 

27,6605 

723 

1 

724 


BACK 

27,6563 

723 

1 

723 


backflag 

0043 

18 

7 

662 

675 : 

backlim 

26,6207 

660 

1 

662 


qACkTEST 

2 6 f 7 3 1 6 

675 

5 

67l 

675 

badlong 

13,6746 

139 

1 

139 


BADMARK 

14,6547 

208 

- 

- 

*- 

baduptim 

26,7754 

751 

1 

751 



keY; symbols Defined by eojals are flagged =* others are normally defined except those flagged; 


U undefined 
N nearly defined by 


E failed Leftover erase 
j failed leftover word 


M multiply defined t wrong Memory type 

0 OVERial^E- OR ILL-OeFINED C CONFLICT IN MEMORY 


MM multiple errors 
X MI SC, trouble 
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svMboL Table listingi incljding paoe number of definition* and number op references with first and last Page numbers 


Symbol h 

Definition 

ReFeReN 

CeS 

F 

* 

symbol h 

Definition 

References f 

■ SYMBOL H 

Definition 

ReFeRENCeS 

F 

BANK2 

11*6670 

275 

1 

276 



m 

« 

B1T3/A 

OA 

*73A6 

150 

1 

1A9 


m BNKC0N7 

1 1 1 5 62 3 

27A 


p. 



BANKCALL 

S65A 

290 

171 

lAA 

699 


m 

bita 


A513 

AB 

33 

A8 

68B 

■ BNKCON 

3150 

535 

* 

- 

- 


bankjump 

5723 

291 

20 

117 

7A8 


» 

BITS 


A5 1 2 

48 

lA 

lAO 

596 

■ B0NLY2 

1A*7Z66 

222 

1 

223 



6AN<MASk 

2261 

119 

6 

AO 

385 


m 

Bl T6 


4511 

A8 

16 

lOA 

558 

• B0NLy3 

1A,7275 

222 

1 

222 



bankreg 

0015 

12 

A8 

35 

550 


9 

BIT7 


A510 

AB 

lA 

166 

686 

• bothsgn 

06,6305 

A90 

1 

49 I 



BANKRUPT 

0030 

12 

6 

118 

A78 


m 

BITB 


4507 

A6 

11 

39 

61A 

■ aovF 

5623 

69 

1 

46 



BANKSET 

0061 

1^ 

IT 

37 

385 


m 

Bl T9 


4506 

A8 

7 

l5A 

588 

• BPLl 

03*600A 

70 

1 

46 



bankstop 

11 *66A5 

275 

* 

* 

* 


m 

biton 

10 

6300 

166 

1 

165 


• branch 

03*6021 

70 

7 

70 

9 O 


BANKTEM 

0072 

lA 

10 

213 

535 


m 

B1TSA65 

OA 

7003 

lAl 

1 

lAl 


• branchq 

0111 

15 

7 

15 

7 O 


base 

OlOA 

15 

2 

65 

66 


m 

BIT556 

21 

7017 

351 

1 

33? 


• BRNCHCOn 

06*6620 

A95 

1 

A 95 



BA5ICALL 

2122 

105 

1 

105 



m 

BITS567 

OA 

700A 

lAl 

1 

1A3 


■ BROKYPRG 

11*7660 

289 

1 

289 



BBB 

3A*6010 

A26 

1 

426 



m 

BL361 

27 

704A 

72B 

1 

726 


■ eRUPT 

0025 

12 

- 

- 

- 

- 

BODV 

51A1 

58 

1 

46 



m 

blankcon 

06 

6637 

A96 

1 

A95 


■ BUBBLE 

1571 

27 

2 

396 


= 

BECONSTD 

27 *6A0A 

720 

1 

710 




blankret 


0112 

15 

2 

A95 

A96 = 

■ buf 

0077 

15 

118 

15 

505 


BEGINl 

26*6A31 

66A 

1 

66A 



m 

BLIV0T3 

10 

6525 

171 

1 

171 


■ BUGbITS2 

5610 

68 

1 

67 



bLGlN2 

26* 6 A 36 

66A 

1 

66A 



w 

bldad 

07 

6655 

513 

1 

A99 


• bUGB I T S 

5777 

Ae 

A 

56 

65 

s 

BEGIN501 

33*7All 

697 

1 

lAl 



m 

bldgs 

12 

6262 

396 

1 

396 


• BUGMPAC 

A231 

A2 

3 

62 

81 


BEG INARC 

26*6350 

663 

1 

65 8 



m 

bmemory 


131A 

23 

1A7 

27 

31 

■ BUMP 

06,7503 

531 

2 

A99 

531 


BEGINCOM 

1A*6125 

195 

1 

195 



m 

BMNl 

03 

6000 

70 

1 

A6 


• BUMPJOB 

1A*6321 

201 

1 

201 



beginflg 

0050 

19 

7 

66 3 

569 


m 

bnkchk 

11 

7005 

277 

1 

276 


■ burninit 

33,6255 

595 

2 

587 

607 


BEGINNER 

33*7A07 

697 

* 




m 

bnkconio 

11 

662 A 

27A 

- 

- 

- 

■ burnmask 

3515 

625 

1 

625 



BEGINSW 

33*7A33 

697 

* 

«i. 



t 

BNKCONll 

11 

6625 

27A 


- 

- 

■ BURSTPOS 

12,6365 

397 

2 

395 



BETAM 

1256 

2A 

2 

309 

311 


« 

BN<C0N12 

11 

6626 

27A 

- 

" 

- 

■ aVECTOR 

1220 

2A 

- 

— 


= 

BETAV 

1160 

2A 

8 

308 

311 

5 

m 

BN<C0N13 

11 

6627 

27A 

- 

- 


■ BVSUl 

521A 

59 

1 

46 



BHIZI 

03*6014 

70 

1 




m 

BNKCONlA 

1 1 

6630 

274 

* 


- 

• BZEl 

03,6010 

70 

1 

46 



BIASCOM 

06*6661 

508 

2 

508 

509 


M 

BNKCONl 

11 

6615 

27A 

2 

275 

277 

■ a (x> 

23,6367 

305 

1 

304 



BIASCOMP 

1^^7157 

216 

1 

219 



m 

BN<C0N21 

11 

6631 

27A 

- 

* 

- 








BIASFLAg 

OOOA 

18 


— 


5 

ft 

BN<E0N22 

11 

6632 

2 ?4 

- 

- 

• 

■ C12 

30,7107 

736 

1 

713 



BIASHI 

03*7A0A 

96 

1 

96 




BN<CON23 

11 

6633 

27A 

• 

- 

- 

■ C10 

30,7065 

736 

2 

709 

722 


BIA5L0 

03*7A02 

96 

1 

96 



II 

BNKCONZA 

11 

663A 

27A 

- 

- 

- 

■ C19 

30,7115 

737 

2 

720 



BI A50NLY 

IA*7261 

222 

1 

llA 



ft 

BN<C:ON25 

11 

66 35 

27A 

- 

- 

- 

■ Cl/16 

30*7071 

736 

1 

712 



BINCON 

3232 

5A8 

3 

492 

5A8 


ft 

BN < CON 2 6 

11 

6636 

27A 

- 

- 


y C20 

30*7121 

737 

2 

708 

719 


B INROUND 

06t7lA0 

518 

2 

516 

518 



BN<CON27 

11 

6637 

27A 

- 

- 

- 

• C33 

26*7570 

679 

2 

667 



Bi TlO 

A505 

A8 

18 

110 

61A 


ft 

BN<C0N2 

11 

6616 

27A 

1 

275 


■ cadrmode 

33,7410 

697 

- 

- 



BITlOBAR 

14 * 6546 

208 

1 

203 



ft 

BN<C0N30 

11 

66 AO 

27A 

- 

- 


• CADRNEWG 

1 A , 75A7 

228 

1 

228 



Bl T1 1 

450A 

AB 

2g 

38 

727 


ft 

BN<C0N31 

ll 

66A1 

27A 

- 

- 

- 

■ cadrstor 

0627 

17 

6 

148 

536 


BIT12 

4503 

A8 

23 

110 

727 


ft 

BN<C0N32 

11 

6642 

27A 


- 

- 

■ CADKTAB 

13,6003 

125 

2 

13 7 

138 


BIT13 

A502 

A8 

15 

Ae 

690 


ft 

BN < CON 3 3 

II 

66 A3 

27A 

- 

- 

- 

• CADHTEM 

OllA 

15 

10 

55 O 

552 


BI T 1 A 

A501 

A8 

17 

69 

628 


ft 

Bn<C0N3A 

11 

66AA 

27A 

- 

- 

- 

■ CAFREPiP 

32*7232 

580 

4 

580 



Rl T 1 5 

4500 

A8 

29 

AA 

62** 


II 

BN<C0N3 

11 

6617 

27A 

1 

276 


■ CALCCBDT 

25 *6A30 

639 

4 

6A0 

65l 


R I T 1 

A5 16 

A8 

31 

A8 

7A1 


ft 

BNKCONA 

11 

6620 

27A 


- 

- 

■ CALCCDU 

25*6071 

630 

2 

568 

660 


W 1 J ^ 

Bl T2 

A515 

A8 

le 

7A 

7Ab 


ft 

BN < CON 5 

11 

1 

27 A 


- 


■ CALCDIR 

1570 

27 

2 

395 

396 


BIT3 

A5 1 A 

A8 

17 

168 

72 V 


ft 

BN<C0N6 

11 

6622 

27A 

- 

- 

- 

• CALCFLAG 

00A5 

19 

2 

601 

660 



KeY; symbols DeFINED BY EQUALS ARe FLAGGED s. OTHERS ARE NORMALLY DEFINED E^GePT THOSe FLAGGED; 


u undefined 
N Nearly defined by 


E failed leftover erase 

J FAILED leftover WORO 


M multiply Defined t wrong memory type mm multiple errors 

0 overside- or ILL-DeFINED c conflict in memory X MISC. trouble 
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symbol table listing^ InCLJDInOi Page number of UEFlNIIlONt AMO NUMBER 0^ REFERENCES WITH FIRST AND LaSt PAGE NUMBERS 


symbol h 

Definition 

ReFeREN 

CtS F 

symbol h 

Definition 

References 

F 

m 

■ 

symbol h 

Definition 

References 

CALCG 


10A2 

22 

1 

744 


CDJSUF 


1322 

27 

2 

561 



m 

CHANGl 

2101 

103 

5 

93 

403 

CALCGAl 

22 

,6702 

468 

1 

469 


CDJCALC 

34 

,72A1 

4A9 

3 

409 

448 


m 

CHANG2 

2113 

103 

2 

38 

105 

calcga 

22 

, 66 A3 

468 

2 

333 

A33 

COJCKl 

12 

,6760 

AO? 

4 

407 



m 

CHANGED! 

32,7222 

580 

1 

579 


CALCGEAR 

30 

♦ 766A 

749 

1 

745 


C0JCK2 

12 

,6767 

A07 

1 

4 O 7 



m 

CHANJOB 

04,6145 

IO 4 

3 

103 

108 

calcglun 

30 

t7723 

749 

- 

- 

- 

CDJCK3 

12 

,6 770 

407 

X 

407 




CHAR 

0063 

14 

5 

486 

468 

CALCGRAv 

30 

*76A2 

748 

7 

355 

751 

CUJCKA 

12 

,7003 

A07 

2 

407 



m 

charalrm 

06,7440 

528 

16 

486 

488 

CALCGRVl 

30 

,76AA 

748 

2 

746 

74 7 

CDUCK5 

12 

,7012 

407 

1 

407 



m 

char IN 

06,6006 

486 

1 

477 


calcgta 

22 

♦ 6352 

A6l 

6 

360 

729 

CDJCK6 

12 

,70A1 

A08 

1 

408 



m 

CHDTMASk 

450A 

580 


.. 


calcmanu 

26 

♦ 6000 

657 

1 

601 


CUJCK7 

12 

, 7043 

A08 

1 

408 




CHECKGl 

12,6615 

403 

1 

404 


calcnbsc 

25 

,6212 

634 

3 

604 

657 

CDJCK 

12 

,6757 

407 


- 

- 


m 

CHECkg3 

12,6660 

403 

3 

403 

420 

CALCPTCH 

26 

,7527 

678 

2 

677 

678 

CDJCODES 

10 

,7A50 

189 

1 

163 



m 

CHECKG5 

12,6662 

403 

1 

404 


CALCRVG2 

30 

,7613 

7A7 

1 

751 


CDJDl 

12 

,7055 

408 

2 

406 



m 

CHECKG 

12,6613 

403 

5 

394 

419 

CALCRVG 

30 

,7550 

747 

2 

581 

699 

CUJD 

12 

,7066 

A09 

2 

407 

408 


m 

CHECK I N3 

04,7070 

143 

1 

145 


CALCSCNB 

25 

, 6 1 66 

63 3 

2 

558 

660 

cdjdrive 

25 

,637^ 

638 

2 

592 

603 


m 

checkldi 

12,7202 

411 

1 

411 


CALC5MNB 

25 

,610? 

63l 

3 

596 

657 

CDJDRVEI 

25 

,6412 

638 

1 

638 




CHECKLD2 

12,7204 

411 

1 

411 


CALCSNAP 

26 

, 6 l 70 

660 

1 

659 


CDJDRVE2 

25 

,6401 

63B 

1 

596 



m 

CHECKED 

1 2 , 7 1 6 2 

411 

4 

392 

411 

CALCSXAl 

22 

♦ 7112 

A73 

2 

473 


CDJFAIL2 

10 

♦ 6336 

166 

1 

166 



m 

CHECKMO 2 

05,7120 

260 

1 

260 


CALC5XA 

22 

,7043 

473 

• 

— 


CDJFA1L3 

10 

,633A 

166 

1 

166 



m 

checkmi 

1 2 ,6646 

403 

1 

403 


CALCTFF 

31 

,6000 

68A 

2 

582 

610 

cdjfail 

10 

,632 7 

166 

1 

166 



m 

CHECKM 

12,6645 

403 

1 

403 


CALCVGB 

25 

,6420 

639 

4 

587 

607 

CDJINC 

14 

,636l 

203 

2 

241 

38l 


m 

CHECKMM 

2346 

122 

13 

12A 

3A0 

CALCXSC 

25 

♦ 7401 

652 

1 

595 


CDJIND 


0677 

19 

28 

143 

418 


m 

checkneg 

30,6751 

390 

I 

390 


CALLA.il 

32 

,6010 

553 




CD jlogi 

30 

,6311 

377 

2 

377 



m 

checknvi 

21,7562 

365 

1 

365 


CALLCADR 


1467 

28 

4 

117 

5 7 7 = 

CUJLOGIC 

30 

,6303 

377 

6 

363 

629 


m 

CHECKNV2 

21,7564 

365 

1 

365 


CARRYON 

12 

♦ 6745 

406 

1 

406 


CDUNBRES 

25 

,6300 

636 

- 

- 

- 


m 

CHECKNV 

21,7542 

365 

6 

332 

365 

caryon 

12 

♦ 7435 

419 

1 

419 


CDJNDX 


1233 

26 

14 

407 

422 


m 

CHECKPl 

12,6633 

403 

1 

403 


cedt 


1410 

27 

7 

590 

652 = 

CDJOUT 

10 

,6l7l 

163 

1 

163 



m 

checkp 

12 ,6632 

a03 

1 

403 


cccc 

3A 

♦ 6025 

A26 

1 

426 


CDJRSM 

10 

,6220 

163 

2 

162 



m 

chekexit 

25,7060 

646 

A 

646 

647 

CCHKO 

11 

*7441 

285 

2 

286 


CDJTEMP 


131^t 

27 

IB 

559 

629 


m 

CHEXIT 

21,7441 

361 

3 

358 

360 

CCHKl 

11 

,7455 

285 

1 

285 


cdjtrig 

25 

,6000 

628 

2 

559 

561 


m 

chgigc 

22t6l72 

370 

1 

371 


CCH<2 

11 

,7460 

285 

1 

286 


CDUX 


0047 

12 

20 

156 

628 


m 

chgmgc 

22,6207 

370 

1 

371 


CCH< 

11 

,7421 

285 

1 

257 


cdjxfix 

30 

,672 0 

390 

2 

630 

744 


■ 

chgogc 

22,6224 

371 

1 

37l 


CCHKA 

11 

,7433 

285 

1 

285 


CDJXFLAG 


OOA2 

18 

4 

^99 

638 


m 

CHKCALC 

34,7365 

452 

1 

399 


CCHKALM 

11 

,7525 

286 

5 

285 

288 

CDJXJOB 

33 

,727«» 

618 

2 

127 

616 


m 

chkoelvx 

30,7406 

743 

1 

743 


CCH<B 

11 

,7436 

285 

1 

266 


CDJXTASk 

33 

,7260 

618 

2 

126 

614 


m 

CHKNvTEM 

1354 

30 

4 

365 


CCHKC 

11 

,7503 

286 

1 

286 


CDJr 


0050 

12 

7 

156 

628 

- 


chkqpt 

21,7262 

358 

3 

124 

358 

cchkd 

11 

,7506 

286 

1 

286 


CDJZ 


0051 

12 

7 

156 

628 

- 

m 

chktemx 

30,7421 

743 

1 

7A3 


CCHKNV 

11 

,7532 

286 

1 

286 


cfactor 

26 

,7572 

680 

1 

639 



m 

chkvl 

31,7420 

714 

1 

714 


ccschk 

11 

,6045 

266 

3 

284 


CFAILCON 

06 

,6500 

493 

1 

492 



m 

CHOOk 

30,7157 

737 

1 

711 


CC5H0LE 


3062 

295 

A7 

71 

678 

CGJOB 

14 

♦ 7562 

577 

1 

577 



m 

CK4MM14 

13,7062 

262 

1 

261 


cdrvei 

10 

,6544 

172 

2 

172 


CGTASK 

14 

♦ 7550 

577 

2 

126 

573 


m 

CLEANOUT 

32,6366 

563 

1 

563 


CDRvF2 

10 

,6554 

172 

2 

172 


cgy 


170A 

33 

1 

595 



m 

CLEARl 

06,6535 

494 

1 

494 


CDRvE 

10 

,6534 

172 

3 

170 


C6Z 


1710 

33 

1 

595 



m 

CLEAR 

06,6501 

493 

1 

487 


CDTTHREE 

22 

,6055 

367 

2 

367 


CHl 

30 

♦ 7l63 

737 

3 

7 II 

7l8 


m 

CLGNMAKK 

34,6374 

431 

1 

A30 



e 


key: symbols Defined by equals are flagged =. others are normally defined except those flagged: 


u undefined 
N nearly defined by 


E failed leftover erase M multiply defined T nRONG MEMORY TYPE 

j failed leftover Word o oveRS»i^e- or ill-defined c conflict in memory 


MM multiple errors 
X MISC. trouble 


^8^^>7bA YUL system FOR AGCA : REVISljN 0 Oh PROGRAM SOLRUM55 BY NASA 1021108-021 


DEC 4, 1966 


PAGE 767 


SYMbDL table LISTING* IiMCLJDING PaGE NUMBER OF DEFINITION* AND NUMBER OF REFERENCES WITH FIRST AND LASt PaGE NUMBERS 


symbol h 

Definition 

ReFeRen 

CbS 

F 

CLOAD 

07*6671 

513 

1 

499 



CLOGI/2 

30*6501 

382 

2 

382 



CLPASHI 

06*6516 

494 

1 

A9H 



CLPASS 

0633 

17 

13 

148 

534 


ClR5 

06,65A2 

494 

1 

494 



CMEMORY 

1561 

23 

46 

2 r 

33 


cm/smtsk 

33,73A2 

619 

A 

126 

618 


cneglims 

26*6277 

662 

1 

661 



cntrchk 

11*6563 

273 

- 

- 

- 


cntrloop 

11*6564 

273 

1 

274 



coarofin 

1305 

26 

3 

393 

A30 


COARSAGN 

1213 

26 

2 

392 

393 

z: 

COARSDON 

14*6214 

198 

1 

195 


= 

COAsTEST 

32*7355 

582 

- 

- 

— 


coastflg 

0021 

IB 

2 

582 

599 


COASTMSK 

24*6115 

576 

- 

- 

— 


COASTPHS 

24,611A 

576 

2 

128 

572 


CODE 

0111 

15 

18 

487 

531 


comlsta 

2576 

156 

1 

154 



CQMLSTB 

2612 

156 

1 

152 



C0MP2SEC 

24*6511 

623 

1 

623 



COMp 

03*6325 

76 

3 

47 

73 


COMPCHK 

U*7260 

221 

1 

219 



CUMPICK 

07 *6474 

506 

2 

506 



CUMP.OFF 

10*7010 

178 

1 

177 



COMP. ON 

10*7017 

178 

1 

177 



COMPLMNT 

11*6525 

273 

- 

- 

- 


CUMPNUMB 

1117 

25 

7 

15 ? 

263 


COMPON 

0112 

15 

7 

15 

92 


COMPTEST 

07*6430 

505 

8 

505 

513 


COMPTSTl 

07*6433 

505 

- 

- 

- 


COMPUT 

12*6470 

399 

1 

399 



CONC+Sl 

11,6005 

265 

1 

274 



C0NC+S2 

4664 

265 

1 

274 



CONCADR 

12*6750 

406 

2 

406 



CONCNTRl 

4512 

265 

1 

273 



CONERASl 

11 ,6003 

265 

1 

273 



CONERA52 

11,6004 

265 

2 

272 

280 


CONSTDI 

27*6426 

720 

1 

721 



CONSTD 

27,6411 

720 

- 

- 

- 


CONTI 

27*6232 

717 

1 

722 



CONTCADR 

12»74A0 

419 

2 

419 



C0NTINU2 

27*6302 

718 

1 

717 




Symbol h 

Definition 

References 

F 

C0NTINU3 

27,6317 

718 

i 

718 



CDNTINU 

11*6730 

276 

A 

276 



CONTINUE 

29,6414 

621 

2 

621 



conjmnor 

07*6775 

515 

1 

514 



CORSW 

OA , bOA a 

101 



- 


COSl 

03,6622 

el 

1 

47 



CQ527 

26,7542 

678 

1 

656 



CQ530 

26,7546 

6 76 

- 

- 



COS33 

25,6240 

634 

5 

596 

634 


C0S3 

26,7540 

678 

2 

659 

665 


C0560 

33,7256 

617 

1 

6l7 



C0S63 

26,7544 

676 

2 

659 

663 


CUSAZ 

0004 

332 

5 

339 

346 

s 

COSCDU 

1336 

27 

19 

629 

637 

= 

CU53/2 

1605 

31 

A 

712 



COSINE 

03,6535 

80 

1 

61 



COSLAM 

0044 

332 

2 

339 

344 

s 

COSDNE 

26,7652 

680 


675 



C0S5IX 

26,7654 

680 

3 

657 

680 


COSTH 

0020 

A76 

9 

A6l 

475 

= 

COStlB) 

30,7213 

738 

1 

739 



COT 3 AM 

1276 

24 


- 

- 


COUNT 

0104 

15 

20 

A87 

531 

= 

COJNTCHK 

11,6414 

Z7l 

1 

274 



COUNTPL 

1220 

26 

12 

399 

456 

- 

COJNTS 

11,6415 

271 

2 

271 

272 


COJNTSOF 

11,6446 

272 

1 

272 



CREXIT 

5550 

66 

- 

- 

- 


CRIT 

2A * 6 1 1 2 

562 

1 

561 



CRI ICON 

06*6211 

489 

2 

A88 

490 


CROSS! 

5511 

65 

1 

46 



C/DO 

30*7177 

738 

1 

720 



CbO 

4664 

5l 

6 

111 

295 


CSTmASK 

32*7256 

580 

1 

579 



CURNTJOb 

13*6676 

138 

3 

135 

136 


CURTAINS 

3066 

295 

7 

221 

619 


CUSSANG 

1564 

27 

3 

289 

397 


CYCL5HFT 

11*6572 

274 

- 

- 



cyl 

0022 

12 

34 

43 

626 

* 

CYR 

0020 

U 

44 

38 

547 

- 

DO 

1613 

31 

- 

- 

- 


D34 

40A3 

38 

1 

38 




SYMBOL H 

Definition 

ReFeRENCeS 

F 

D 

1362 

29 

19 

701 

725 

= 

OACCOM 

4742 

53 

4 

53 

04 


DACCOM+ 

03,6761 

85 

2 

80 

84 


DADl 

5020 

55 

8 

54 

68 


DAD2 

4766 

54 

14 

46 

93 


dad 

5171 

58 

2 

382 

509 


DADVl 

1344 

29 

— 

• 

» 

z 

DANZIG 

4024 

38 

44 

56 

688 


datacall 

5730 

291 

3 

275 

523 


DATADwNF 

2511 

154 

1 

152 



DATALDl 

12,7235 

412 

4 

399 

419 


DATAPL 

1242 

2 6 

57 

398 

455 

z 

datawait 

3157 

535 

- 

- 

- 


datupdat 

13,6762 

261 

2 

26l 



DATwAITl 

3167 

535 

2 

535 

547 


DBSU 

4735 

53 

1 

46 



DCIO 

11*7573 

287 

1 

287 



DCl 1 

11*7576 

28? 

1 

288 



DC585 

34,7742 

458 

4 

448 

452 


DC9 

11,7535 

287 

1 

287 



DC+ 

11,7613 

286 

1 

28? 



DC+ + 

11,7632 

268 

1 

288 



DCAl 

4537 

49 

1 

42 



OCDU 

1344 

27 

8 

636 

637 


OCHECK 

11*7534 

287 

1 

257 



dcnout 

11*7656 

288 

1 

287 



dconstd 

27,6376 

720 

1 

713 



DCWAIT 

11*7566 

287 

1 

288 



DDDD 

34,6051 

426 

2 

427 

429 


DDVO 

03,6776 

86 

2 

58 

92 


DDV 

5144 

58 

1 

46 



DDVOK 

03*7030 

86 

2 

86 



DECll 

12,7752 

425 

1 

414 



DEC1500 

12,7756 

425 

1 

419 



decis 

27,7201 

732 

1 

723 



DEC180 

12,7750 

425 

• 

- 

- 


decbrnch 

0615 

17 

1 f 

487 

516 


DECDSP3 

07*6551 

507 

2 

507 



DECDSP 

07,6476 

506 

1 

499 



DECEND 

06,6165 

488 

2 

488 



decon 

06*6216 

489 

1 

489 



DECOUNT 

0063 

14 

30 

501 

519 

= 

DECRET 

0106 

15 

5 

514 

516 



Key: symbols defined by equals are flagged =. others are normally Defined except those flagged: 


u undefined 

N nearly defined by = 


E failed leftover erase 
J failed leftover word 


M MULTIPLV defined 
0 oversize- ok ILL-DeFINED 


T WRONG memory TYPE 

c Conflict in memory 


MM multiple errors 
X MISC, trouble 
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sYMboL table Listing^ incljding page number qf definition* and number of references with first and last Page numbers 


symbol h 

Definition 

ReFeREN 

ces 

F 

■ 

m 

symbol h 

Definition 

References 

F 

m 

m 

SYMBOL H 

Definition 

ReFeReNCeS F 

DECROUND 

06»73U 

524 

1 

524 



■ 

■ 

DESDPSET 

0732 

20 

6 

149 

192 


m 

m 

DODCSION 

30,6140 

329 

1 

328 

DtCTEMl 

006A 

14 

- 

- 

• 


■ 

0E5DPTX 

0704 

19 

4 

171 

545 


m 

OOGYRO 

10,7571 

231 

2 

227 231 

DECTEM2 

0X10 

15 

- 

- 

- 


m 

dfrnt 

06,7406 

527 

2 

527 



m 

OOGYROCl 

21,6352 

340 

1 

340 

DECTEM 

0064 

14 

3 

506 

507 


m 

DHDDK 

1433 

29 

5 

711 

718 

Z 

m 

D0GYR0C2 

21*6354 

340 

1 

358 

dectobin 

06 1 6 1 3 0 

488 

1 

488 



m 

difeqo 

23,7131 

318 

1 

321 



m 

dogyroc 

21,6344 

340 

1 

349 

DECX 

12,7757 

425 

1 

409 



m 

DIFEQ 

23,7202 

323 

2 

316 

324 

P 

m 

DOGYROSp 

10,750a 

229 

2 

224 229 

degcom 

06,6722 

509 

1 

508 



m 

D1 FEQ+0 

23,7202 

320 

1 

323 



m 

DOIMUCDU 

10,6141 

162 

2 

1 6 1 

DEGCONl 

06,7122 

517 

1 

517 



m 

DIFEQ+12 

23,7216 

320 

- 

- 

- 


m 

DOLD 

1415 

29 

1 

701 = 

DEGC0N2 

06, n24 

518 

1 

518 




D1 FE0+2a 

23,7232 

320 

- 

- 



m 

DOMANFLg 

0046 

19 

1 

603 = 

DEGINSF2 

06,7066 

517 

1 

518 



m 

DlFEOtNT 

1305 

25 

4 

308 

323 

* 


D0MANM5K 

33,6526 

602 

1 

602 

DEGINSF 

06,7054 

517 

1 

5l6 



m 

DIFEQCOM 

23,7353 

323 

2 

320 



m 

DOMANOFF 

33,6552 

602 

1 

602 

DEGOUTSF 

06 , 6645 

508 

2 

507 

508 


m 

DIFEX 

10,7433 

188 

2 

188 



m 

DUMANUl 

33,6527 

602 

I 

602 

degtabi 

06,673a 

509 

2 

509 



m 

DIFF 

1224 

25 

6 

713 

720 

z 

M 

DOMANU 

33,6525 

602 

2 

598 602 

DEGTAB2 

06,6737 

509 

2 

509 



m 

DIFFCOM 

05,6713 

255 

1 

255 




domarker 

2536 

154 

2 

152 153 

DEL 

0002 

296 

2 

298 

306 

— 

m 

DIFFNEG 

05,6720 

255 

1 

255 



m 

DOMAX 

10,7610 

231 

1 

232 

DEL + E 

0002 

296 

2 

297 

306 


m 

DIFFOLD 

1324 

28 

4 

709 

720 

z 


duminor 

10,7577 

231 

1 

231 

DLLCDU 

25,7533 

656 

1 

578 



m 

diffvect 

1424 

27 

2 

644 

645 

z 

m 

domkrej 

05,6415 

249 

1 

235 

DELE 

1360 

30 

2 

30 

34b 


m 

DIMCOUNT 

22,6100 

367 

1 

367 




DONE! 

26,7407 

676 

1 

680 

delload 

05,6216 

241 

3 

241 

245 


m 

DiSEXiT 

14,6160 

l96 

5 

196 

199 


m 

DONE 

26,7656 

680 

2 

673 

DELR 

1152 

24 

3 

546 



m 

D15PCNTR 

1443 

28 

1 

143 


* 

m 

DONEGMAx 

10,7615 

232 

1 

231 

DELS 

1362 

30 

4 

30 

347 


m 

DISPLACE 

07,6772 

515 

1 

515 



m 

dontset 

26,6374 

663 

1 

66 3 

DELT 

0577 

16 

6 

111 

112 

z 

m 

D15TEM 

0064 

14 

3 

605 


— 

m 

DONW 

10,6371 

168 

2 

169 

DELTA 

22,6130 

369 

1 

367 




DL3NG 

1260 

24 

— 

- 

- 



D0PL14 

21,6741 

349 

1 

349 

DELTAQ 

1276 

24 

1 

546 


z 

m 

DMOVE 

4024 

97 

1 

47 


z 


D0PL15 

2 1 ,67 36 

349 

- 

- 

DELTAT 

1027 

22 

15 

580 

74T 

- 

m 

DMPl 

5102 

57 

12 

56 

81 


■ 

DOPLCHNg 

21,6733 

349 

1 

349 

DELTAV 

1001 

22 

2 

22 

321 


m 

DMP2 

5061 

56 

2 

46 



• 

doposmax 

10,7605 

231 

1 

231 

DELV 

1001 

22 

20 

22 

74 f 

z 

m 

dmp 

5157 

58 

10 

81 

519 


m 

DOPROC 

06,7630 

537 

1 

536 

delvel 

1160 

24 

3 

546 



m 

DN74K 

2565 

155 

1 

154 



m 

DOSCTEST 

12*6734 

406 

1 

405 

DELVX 

1001 

22 

18 

158 

743 


m 

On 

1434 

28 

2 

650 

651 



DOTl 

5234 

60 

2 

46 74 

DELVY 

1003 

22 

15 

2 16 

743 

2 

m 

DNB 

1352 

2T 

1 

6 36 


= 


00T2 

5246 

60 

7 

60 75 

DELV2 

1005 

22 

13 

216 

743 

Z 

m 

ONLSTADR 

0672 

19 

6 

149 

609 


m 

DOTERM 

06,7626 

537 

1 

536 

DENO 

23*7462 

325 

1 

315 



m 

dnphasei 

2413 

151 

1 

150 



m 

dotest 

22,6261 

372 

5 

37U 371 

DEN 1 

23,7460 

325 

1 

315 



m 

DnPHASE2 

2425 

152 

1 

155 



m 

doubLk 

06 ,6615 

495 

2 

494 495 

DEN2 

23,7456 

325 

1 

315 



m 

DNPHASE3 

2435 

152 

1 

155 



m 

DOW • • 

23,7376 

32a 

1 

322 

DEN3 

23,7454 

325 

1 

315 



m 

dnphasea 

2443 

l52 

1 

155 



m 

downcntl 

27,6441 

720 

1 

717 

DENa 

23, ?452 

325 

1 

315 



m 

DNPHASE5 

2455 

152 

1 

155 




DOWNRUPT 

2377 

151 

1 

35 

DENALT 

0032 

325 

4 

315 


z 

m 

ONP RA SE6 

2476 

153 

1 

155 



m 

OOWNTMOK 

2407 

151 

1 

l5l 

denbase 

23,7446 

325 

1 

315 



m 

DNPHASE7 

241 1 

151 

2 

153 

155 


m 

DP105SEC 

32,7576 

586 

1 

585 

DENCEIL 

23,7474 

325 

1 

315 



m 

DNS PARE 

10*6114 

158 

4 

157 




DP120SEC 

24 , 6350 

611 

1 

609 

DENFACT 

23,7450 

325 

1 

315 



m 

dnt mgoto 

0673 

19 

8 

149 

153 



dpioutsf 

06,6752 

510 

1 

507 

DENSITYI 

23,7024 

315 

1 

315 



m 

doalarm 

11,7725 

294 

2 

144 

293 



DPl/2 

23,7444 

325 

6 

297 311 

DENSITY 

23,7014 

315 





m 

D0BR2 

4602 

50 

4 

50 

76 


m 

DP 1/3 

23,6305 

303 

1 

298 

DE5KSET 

0731 

20 

10 

149 

200 


m 

DUBR 

4567 

50 

7 

69 

70 


m 

DP1/3S 

31 ,6675 

696 

1 

696 


key: symbols Defined by equals are flagged =. others are normally defined except those flagged; 
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symbol h 

Definition 

ReFeREN 

CeS f 

symbol h 

DeFINI T IDN 

References 

f 

m 

m 

SYMBOL H 

DeFINI 1 ion 

references 

f 

OPl/A 

23 

6303 

303 

6 

303 

685 

driyecdu 

33 

f 6600 

603 

1 

603 



• 

dspmm 

07,6003 

497 

2 

122 

1 44 


DP2,5SEC 

21 

7015 

351 

1 

353 


DSExl T 


0112 

15 

5 

486 

527 


• 

dspmmtem 

0107 

15 

2 

536 


- 

DP20UTSF 

06 

67 5 7 

510 

1 

507 


DS<YCODE 

11 

7643 

288 

1 

287 



m 

DSPMSK 

5362 

526 

1 

525 


z 

DP2PI/16 

31 

6312 

689 

1 

685 


DS<yMASk 

10 

6140 

I6l 

1 

161 



m 

03P0CTIN 

06,7434 

528 

I 

525 



DP2/3 

23 

7230 

320 

3 

320 

325 

DS<YON 

10 

6133 

l6l 

2 

161 



m 

DSPOCTWD 

07,7225 

525 

4 

498 

523 


DP2SEC 

32 

7566 

586 


- 


DSLY 

06 

7420 

527 

1 

527 



m 

dspoff 

04, ?256 

146 

1 

148 



DP2 (-10) 

25 

7262 

649 

1 

649 


DSMAG 


0103 

15 

2 

527 


= 

m 

05 POUT 

10,6564 

172 

2 

172 



DP2 (-11) 

25 

7136 

647 

1 

643 


DbMSK 

06 

7422 

527 

3 

527 

531 


m 

dsprtrn 

1302 

25 


- 

- 


DP2(-12) 

25 

7140 

647 

2 

643 

668 

OSPllO 

04 

6737 

140 

— 

- 

• 


m 

DSPSCAN 

10,6575 

172 

2 

172 

173 


DP2 (-13) 

26 

7566 

679 

3 

664 

677 

DSP12D 

04 

673A 

140 

- 

- 

- 


m 

OSPSFNOR 

07,6540 

507 

1 

507 



DP2 (-1) 

2 6 

7572 

680 

2 

646 

65h 5 

DSP i 3D 

04 

6735 

140 

- 

- 

- 


m 

DSPTAB 

0710 

19 

98 

140 

624 


Dp2 (-2) 

26 

7564 

679 

8 

640 

679 

0SP2B1T 

07 

7261 

526 

3 

503 

536 


m 

DbpTEMl 

0616 

17 

66 

17 

592 


0P2 (-3) 

30 

?743 

75 O 

1 

749 


DSP2DEC 

06 

7315 

524 

1 

511 



m 

0SPTEM2 

0621 

17 

16 

27 

546 


DP2 (-A) 

25 

7132 

647 

2 

642 


DSPA 

07 

6372 

505 

1 

499 



m 

OSPYLOAD 

12,7107 

4 O 9 

3 

393 

410 


DP2 (-5) 

25 

7260 

649 

2 

649 


D5PAB 

07 

6365 

505 

1 

499 



m 

DS02 

5064 

56 

1 

76 



DP2 (-6) 

25 

7134 

647 

1 

643 


dspabc 

07 

6360 

505 

1 

499 



m 

DSREL 

0102 

15 

5 

526 

528 


DP30UTSF 

06 

6761 

510 

1 

508 


DSPADD 

07 

6120 

498 

2 

498 



m 

DSRUPTBR 

10,6223 

164 

2 

I6l 



DP955EC 

32 

7600 

586 

1 

585 


DSPALARM 

06 

7442 

528 

10 

503 

520 


m 

osruptlm 

0600 

17 

5 

172 

173 

* 

DPDNORM 

03 

7036 

87 

1 

87 


DSP3 

07 

6377 

505 

1 

499 



m 

DSRUPTSV, 

0033 

12 

7 

14 7 

173 

- 

DPDNORT 

03 

7046 

87 

2 

86 

87 

DSP bank 

07 

7216 

523 

2 

499 

525 


m 

D5U2 

4732 

53 

1 

46 



dpdoflo 

03 

7132 

89 

4 

86 


DSPC 

07 

640 A 

505 

1 

499 



m 

DT2SEC 

33,7033 

608 

1 

607 



DPDSQNT 

03 

7120 

89 




DSPCNT 


0706 

19 

7 

148 

173 



UT4SEC 

33,7035 

600 

1 

606 



DPEXIT 


5237 

6 0 

12 

63 

38 f 

D5PC0MI 

07 

6375 

505 

2 

505 



m 

DT 

27,7200 

732 

1 

698 



DPINCOM 

06 

7177 

519 

1 

519 


0SPC0M2 

07 

6411 

505 

2 

505 



m 

OTCOUNT 

1100 

369 

6 

366 

367 


DP I NORM 

06 

7205 

519 

1 

519 


DSP COM3 

07 

6417 

505 

1 

505 



m 

UTEAROT 

1144 

25 

1 1 

353 

745 

- 

DPIN5F2 

06 

7207 

519 

1 

516 


DSPCOUNT 


061 A 

17 

50 

149 

536 


m 

D TEMPI 

1432 

28 

7 

664 

668 


dpinsf 

06 

7161 

518 

3 

516 

519 

DSPDCEND 

07 

6542 

507 

2 

507 

510 



DTEPOCH 

1073 

22 

5 

262 

353 


DP. 36 

26 

7707 

68 1 

1 

685 


D3PDCGET 

07 

6506 

506 

1 

507 



m 

DTH 

26,7630 

679 

1 

601 



DPNT 

14 

7441 

226 

1 

227 


DSPDCPUT 

07 

6516 

507 

1 

507 



m 

dtheta 

1452 

28 

4 

601 

603 


DPOUT 

06 

6764 

510 

3 

510 


D5PDCW01 

06 

7267 

524 

2 

524 

525 


m 

DT/2 

1262 

24 

7 

296 

328 


dpoutcom 

06 

6775 

510 

1 

511 


dspdecwd 

06 

72AI 

523 

1 

507 



m 

DT/2MAX 

30,6247 

33 1 

2 

328 



DPOUTNOR 

06 

7025 

511 

1 

510 


OSPDPDEC 

06 

7030 

511 

L 

499 



m 

DT/2MIN 

30,6245 

331 

2 

328 



dpset 


4747 

53 

8 

44 

58 

DSPFREE 

30 

6716 

309 

- 

- 

- 


m 

DTSl 

4556 

49 

1 

46 



OPTESTl 

07 

6272 

502 

3 

502 


DSPINl 

06 

7366 

527 

3 

526 

528 


m 

dumcode 

10,6200 

163 

4 

163 

175 


DPTE5T 

07 

6255 

501 

4 

501 

516 

DSPIN 

06 

7341 

526 

7 

488 

531 


m 

dumexit 

11,7377 

284 

10 

271 

284 


DPZERO 

23 

7226 

320 

5 

316 

557 

dsplay 

10 

6612 

173 

1 

172 



m 

DUMMARK 

2541 

154 

2 

151 

152 


DP (5/8 ) 

30 

7745 

750 

1 

749 


DSPLAYC 

10 

6623 

173 

3 

172 



m 

dummyuob 

IL, ^415 

284 

1 

144 



DuUARTER 

23 

6303 

303 

2 

310 


DSPLIST 


0634 

17 

15 

148 

552 


m 

dumpdump 

23,6231 

301 

- 

- 

- 


DRAGl 

23 

7036 

315 




D5PL0CK0 


3257 

546 

2 

521 

551 


m 

DUMYUOb 

1 1 , ?407 

284 

1 

284 

^ -1 


DHAG2 

23 

7061 

316 




DSPLOCKl 


3265 

548 

2 

406 

535 


m 

DUPCDU 

1344 

27 

3 

559 

56 1 


DRFT5UB2 

14 

7202 

219 

1 

223 


dsplock 


0645 

18 

B 

492 

548 

- 

m 

DVl 

11,7212 

280 

1 

280 



DRIFTFLQ 


004 1 

18 




DSPLV 

07 

,7256 

526 

- 

- 

— 


m 

DV 1 + + 

11,7214 

280 

1 

282 



DKIFTSUB 

14 

t7l7l 

219 

3 

216 

21 t 

OSPMMl 

07 

,7423 

536 

2 

497 

538 


m 

DV1 + - 

11,7224 

280 
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U undefined 
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T wrong Memory type 
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X MI sc, trouble 


4fj^578A YUL SYSTEM FOR AGc^fl REV]Siar4 0 OF PROGRAM 50LRUM55 BY NASA 1021 108-021 


0 EC A * 1 9 & 6 


page 770 


SVMboL TABLE: LISTING* INCLUDING PftGt NUMBER OF DEFINITION* AND NUMBER OF REFERENCES WItH FIRST AND LaST PAGE NUMBERS 


symbol h 

DeF INITION 

reFeRen 

CeS 

F 

m 

Symbol h 

Definition 

references f 

■ 

H 

SYMBOL H 

Definition 

References f 

DVU + 

11*7241 

280 





m 

m 

ECC 


1725 

33 

1 

694 


■ 

■ 

ENDJ30UT 

21,6750 

350 

1 

355 


DVl — 

11*7233 

280 

- 

- 

- 


m 

LEEE 

34 

f 6 1 1 ^ 

427 

1 

428 


■ 

END JOB! 

04,6256 

106 

1 

106 


DV2 

11*7255 

281 

- 

- 

- 


m 

EgSW 


0010 

18 

2 

704 

722 = 

m 

endksamp 

2262 

184 

10 

180 

183 = 

Dv2L00p 

11.7256 

281 

1 

281 



m 

eight 


4513 

48 

6 

101 

609 = 

a 

ENDMANU 

33*6472 

599 

4 

599 


DV3 

11,7300 

2el 

1 

281 



m 

EIGHTN 


3542 

626 

2 

567 

680 

a 

ENDMARKS 

14,6744 

212 

i 

211 


DV3L0OP 

11.7302 

281 

1 

281 



m 

einsti 

11 

6l47 

267 

1 

267 


a 

endmisc 

4145 

40 

2 

4 O 


DVA*- + 

11.731A 

282 

- 

- 



m 

E1N5T2 

11 

615D 

267 

1 

267 


a 

ENDMKDSP 

1 ^ f 6666 

210 

* 

- 

- 

D V 4 ♦ - 

11*7325 

282 





m 

E1NST3 

11 

6151 

267 

1 

267 


a 

ENDMODE 

14,6300 

201 

1 

201 


Dv A-4- 

11*7336 

282 

• 

— 



m 

E1N5T4 

11 

6152 

267 

1 

267 


a 

ENDMONDO 

07,7211 

523 

i 

523 


DVA — 

11*7347 

282 

- 

— 



m 

EIN5T5 

11 

6153 

267 

1 

267 


a 

ENDMZERO 

05,6134 

239 


— 

* 

Dv + + 

11.6246 

269 

•* 

- 

- 


m 

EINST6 

11 

6154 

267 

1 

267 


a 

ENONMTST 

06,6146 

488 

2 

488 


Dv + - 

11,6254 

269 

- 

— 

- 


m 

Ejl 

04 

6341 

loe 

7 

107 


a 

ENDNORMS 

26,6313 

662 

1 

66l 


dvalarm 

32,7712 

589 

1 

588 



m 

EJ2 

04 

6351 

108 

2 

106 

109 

a 

ENONUM 

06,6157 

488 

* 

*. 


DVCHK 

11,6244 

269 

* 


-* 



EJSCAN 

04 

6274 

107 

2 

106 

109 

a 

enonvbsy 

07,7500 

551 

1 

552 


DVCNTl 

1262 

26 

2 

581 

5b6 


m 

ELEVEN 


3533 

626 

7 

334 

626 

a 

endof 

11.6466 

272 

i 

272 


DvCNTR 

1447 

28 

8 

568 

589 


m 

ELEvEND 

30 

7641 

748 

1 

746 


a 

ENDOFjOb 

2124 

106 

109 

124 

753 

DVCONl 

11,7210 

2 eo 

7 

282 



m 

elrcode 

04 

7443 

478 

I 

478 


a 

ENDOFPR 

21,6361 

340 

i 

343 


0VC0N3 

11*7211 

2 80 

* 

• 



• 

enabexit 

14 

6227 

199 

1 

199 


a 

endopt 

14,6261 

201 

1 

212 


0V- + 

11*6271 

269 





m 

enable 

14 

6233 

199 

1 

199 


a 

endpaste 

3076 

523 

- 

- 

* 

Dv — 

11*6263 

269 

** 




m 

EN02DEC 

06 

7340 

525 

1 

526 


a 

endRqwT 

07,7353 

530 

i 

533 


DVL 

1437 

29 

7 

710 

717 


m 

ENOALARM 


3016 

293 

1 

293 


a 

ENDRTOUT 

07,6564 

50a 

1 

512 


DVMIN 

33*6000 

589 

1 

588 



m 

ENDALINE 

05 

6542 

252 

2 

252 


a 

endrutin 

07,7102 

5l6 

1 

521 


dvmntest 

3^ f 7 66^ 

588 

1 

58 7 



m 

ENDALL 

06 

6163 

488 

1 

489 


a 

END5CALE 

06,7112 

517 

5 

517 

519 

dvmqdeon 

32,6545 

567 

2 

130 

56 f 


m 

endbanks 

11 

6762 

276 



- 

a 

ENDSER32 

32*7741 

589 

9 

585 

589 

OVMODOFl 

33,7156 

615 

1 

614 



m 

ENDCHANG 

04 

6255 

105 

1 

106 


a 

Ei'lDSERV 

33,6241 

593 

5 

589 

593 

DVM0D0F2 

33,7177 

615 

4 

128 

615 


m 

EiMDCHEC 

22 

6051 

367 

1 

366 


a 

ENDSHUT 

32,7737 

589 

1 

588 


DVMODOFF 

32*7124 

574 

2 

126 

574 


m 

ENDCHEK 

26 

6354 

663 

1 

669 


a 

ENDSPMMl 

07,7433 

536 

1 

550 


dvmonflg 

0033 

18 





m 

ENDDPDEC 

06 

7053 

511 

1 

517 


a 

ENDSPOCT 

06,7437 

528 

- 

- 

- 

DVM0NM5K 

4512 

589 

2 

142 

588 

£ 

m 

ENDECOM 

06 

6177 

4B9 

1 

488 


a 

ENDSROT 

U05 

369 

1 

367 


DVSTART 

03*7060 

08 

2 

87 



m 

ENDENTRY 

27 

7042 

727 

1 

727 


a 

ENDSTALL 

14,6361 

202 

- 

- 

- 5 

D V 5 W 

0110 

15 

7 

15 

92 



ENDERA5 

1 1 

6554 

273 

- 


* 


ENDSTATE 

23*7313 

321 

1 

321 









# 

enoexit 

27 

6513 

721 

1 

716 


a 

ENDSwAY 

22,6124 

368 

3 

367 


e 

0000 

296 

3 

300 

301 


H 

EIMDEXTVB 

05 

6^6 5 

236 

22 

236 

251 


ENDT4ERR 

10,6463 

170 

3 

l65 


eargcadr 

30*7517 

745 

1 

744 



• 

endextvs 

05 

7153 

264 

1 

540 

= 

a 

ENDTASK 

2260 

119 

3 

112 

147 

EARROTl 

25*7447 

65 ^ 

4 

555 

745 


m 

ENOFAILF 


3071 

295 

1 

523 

= 

a 

endtesti 

34*6237 

429 

12 

428 

457 

EARR0T2 

25*7462 

654 

3 

353 

702 


m 

ENDFIND 

04 

6101 

101 

1 

101 


a 

ENDTEST 

12,7406 

418 

20 

392 

429 

earrtcom 

34*6332 

431 

1 

431 



m 

endfresh 

04 

7135 

144 

2 

141 


a 

ENDT5T 

26*7315 

674 

3 

674 


EARTHORB 

25*7170 

648 





m 

EnOGYROI 

10 

7715 

234 

1 

231 


a 

enoupdat 

13*7167 

263 

3 

261 

262 

earthr 

34,6612 

437 

3 

431 

456 


m 

ENDoYRO 

10 

7721 

234 

2 

229 

234 

a 

endvbfan 

07,6207 

5 OO 

- 

- 

- 

earthrat 

21 *6514 

344 

3 

340 

353 


m 

ENDoYROC 

10 

6701 

175 

- 

- 

- = 

a 

ENEMA 

04,7147 

145 

5 

554 

6l3 

earthrr 

21 ,6357 

340 

1 

340 



m 

endidle 


3136 

535 

26 

211 

535 

a 

engineon 

32 f 6562 

568 

2 

130 

i)67 

EARTHTAB 

23,7430 

325 

3 

296 

328 


m 

EnOIMU 

14 

f 62 b ^ 

201 

5 

194 

199 

a 

enginoff 

32,6710 

571 

7 

128 

593 

ecadtem 

0117 

136 

2 

136 



m 

END INST 


3147 

535 

7 

49 O 

530 

a 

ENGNOFF 

11,7717 

289 

1 

289 



KLY; symbols defined by equals Are flagged =. OTHERS are normally defined except those FLAGGED; 


u undefined 
N nearly defined by 


E failed Leftover erase m multiply defined t wrong memory type 

j failed Leftover word o overside- or ill-defined c lonflict in memory 


MM multiple errors 

X Ml sc, TRuUBLe 


I 
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symbol h 

Definition 

ReFeRlN 

CeS 

F 

m 

& 

symbol h 

DeFINI T iDN 

References 

F 

ft 

!■ 

SYMBOL H 

Definition 

References 

F 

ENGNON 

11*7706 

289 

1 

289 



®l 

ft 

ERRORS 

11,6013 

265 

42 

265 

277 


■ 

ft 

FAILDISP 

3043 

294 

1 

294 



ENGOFLOC 

11 ,772A 

289 

1 

289 



ft 

ERR DR SUM 

1360 

27 

9 

590 

592 


ft 

failend 

14,6305 

201 

1 

197 



ENORMO 

31,6275 

688 

1 

688 



■1 

ERR5CAN3 

10,62/4 

165 

2 

166 

167 


ft 

FAILITON 

10,6313 

1 66 

2 

166 



ENORMl 

31*6277 

688 

1 

688 



ft 

ERRSCAN 

10,6266 

165 

I 

165 



■ 

FAILREG 

1763 

34 

10 

140 

541 

= 

EN0RM2 

31*6301 

688 

1 

688 



ft 

ERRJPT 

203A 

36 

1 

35 



ft 

falnei 

34,6732 

442 

1 

AOl 



EN0RM3 

31*6267 

680 

3 

688 



ft 

ehthrven 

34,7754 

460 

1 

435 



ft 

FALNEDl 

34,7576 

456 

1 

401 



entauob 

33*7361 

620 

1 

620 



ft 

ERONITSI 

34,7752 

459 

1 

453 



ft 

FALNED 

1 2 f 6600 

401 

1 

442 



ENTATA5K 

33*7355 

620 

2 

127 

619 


ft 

ERUNIT52 

34,7746 

458 

I 

451 



ft 

FALTOF 

3242 

548 

- 

- 

- 


ENTER 

07*6007 

497 

1 

48 7 



ft 

ERJNITS 

34,7744 

458 

1 

449 




FALTON 

3233 

548 

5 

124 

528 


ENTERUMP 

06*6055 

487 

1 

486 



ft 

ESCAPE2 

0075 

14 

2 

84 

85 

= 

ft 

FBI ASSUB 

14,7331 

223 

3 

222 



ENT EX IT 

0065 

497 

12 

490 

532 


ft 

ESCAPE 

0114 

15 

12 

15 

29l 


ft 

FBR3 

23,6000 

296 

1 

317 



ENTMASK 

30*7522 

745 

1 

744 



ft 

ES3 

1332 

29 

- 

- 

- 


ft 

FBRANCH 

1270 

24 

3 

317 

323 

- 

ENTpASO 

07,6035 

497 

3 

497 

534 



esq (VR) 

1546 

26 

1 

640 


Z 

ft 

FDAILOC 

24,6140 

576 

1 

576 



ENTRET 

0065 

14 

7 

49 O 

533 

— 


ESTART 

04,6765 

I4l 

-- 

-- 

- 



FDAI0FF2 

24,6327 

6ll 

1 

609 



ENTRYFLG 

0035 

18 

1 

581 



m 

ETA 

1356 

29 

1 

704 


- 

ft 

FDAOFTSk 

24,6154 

576 

2 

128 

576 


ENTRYM5K 

45 1 4 

580 

1 

579 


C 

ft 

EXAM2 

10,7435 

188 

2 

188 



ft 

fdaontsk 

2^,6143 

576 

1 

576 



entrysw 

30,7523 

745 

1 

744 



ft 

EXEC70K 

04 f 63 1 6 

107 

1 

101 



ft 

fdoftski 

24,61 72 

577 

1 

260 



ENTRYTOP 

27*6033 

699 

2 

132 

698 



execbank 

2075 

98 

8 

35 

479 


ft 

FFFLAGS 

1313 

25 

- 

* 

- 

- 

ENTSET 

07*7373 

534 

1 

533 



ft 

EXECCOM 

2065 

98 

3 

98 

111 


ft 

FIFTN 

3537 

626 

2 

565 

619 


ERAD/2 

1240 

24 


• 

* 


M 

EXECSW 

2071 

98 

1 

98 



ft 

FIFTY 

3562 

626 

i 

626 



ekadsq/a 

1236 

24 



— 

- 

ft 

ExECTEMl 

0572 

16 

5 

16 

112 


ft 

FILDELx 

1114 

26 

5 

416 

456 


eraschk 

11*6472 

272 

• 




ft 

EXECTEM2 

0573 

16 

10 

16 

112 


ft 

FILDELY 

1362 

30 

3 

343 



ERASLOOP 

11,6474 

272 

1 

273 



11 

EXECTEM3 

05 74 

16 

8 

16 

102 


ft 

fildelz 

1360 

30 

3 

343 



ERASTE5T 

4504 

48 

1 

44 



ft 

EXECTEM4 

0575 

16 

- 

- 

- 


ft 

FILENORM 

26,6315 

662 

i 

658 



ercnt 

0063 

14 

4 

492 



ft 

ExECTEMS 

0576 

16 

- 

- 

- 


ft 

FILTER 

1356 

30 

5 

334 

356 


ERCOM 

06,6440 

492 

1 

492 



m 

EXIT2 

4571 

50 

1 

73 



ft 

FINDNAVB 

34,6241 

430 

2 

393 



ERCON 

06,6476 

493 

1 

492 



m 

Exit 

03,6206 

73 

1 

47 



ft 

FINDVAC2 

0 f 6 0 0 ^ 

99 

2 

98 



ERCOUNT 

1765 

34 

3 

140 

265 


ft 

EXI TCADl 

1474 

28 

2 

601 



ft 

FINDVAC 

2046 

98 

34 

124 

744 


erectnd 

34,7036 

443 

1 

443 



ft 

ExITCADR 

1471 

28 

5 

657 

678 


ft 

FINE+CRS 

10,7336 

184 

i 

180 



ERESTQRE 

1760 

34 

4 

142 

2 M 

z. 

ft 

EXITEM 

0112 

15 

7 

514 

515 

£ 

ft 

FINECODE 

21,6744 

350 

- 

- 

- 


ERFINAL 

12*6126 

394 

1 

394 



ft 

EXITL0C2 

33,7420 

697 


- 

* 


ft 

finemask 

2356 

122 

2 

I 9 I 



ERMINUS 

06*6432 

492 





ft 

EXTRAI/0 

05*7016 

258 

1 

236 



ft 

FINETIME 

2712 

191 

1 

4l5 



EROPTN 

1313 

26 

3 

392 

438 


ft 

ExT\/BACT 

0645 

18 

5 

236 


- 

ft 

FINISH 

12^7256 

414 

3 

448 

45 I 


EKPLU5 

06,6435 

492 

1 

492 



ft 

LZCASE 

26,7332 

675 

1 

670 



ft 

FINISHUP 

26,6730 

669 

3 

669 

675 


ekrchang 

10,6255 

165 

2 

165 











ft 

FIVE 

4477 

48 

16 

141 

756 


ERRETN 

12*6130 

394 


* 



ft 

F2 

26,6415 

664 

2 

663 

664 


ft 

FIXCLPAS 

06,6311 

490 

— 

* 

" 


ekrmask 

10*6252 

165 

3 

165 



ft 

F3 

26*6441 

664 

• 

- 

- 


ft 

FIXLOC 

0067 

14 

49 

40 

747 


EkRMON 

10*6240 

165 

2 

165 



ft 

F4 

26,6451 

664 

1 

664 



ft 

fixrange 

06,6707 

509 

1 

508 



EKROPT 

06*6455 

493 

3 

493 



ft 

F5 

2 6 1 6 ^ 6 1 

665 

1 

665 



ft 

FIXVG 

25,7073 

646 

1 

645 



ERROR! 

06*6465 

493 

3 

493 



ft 

F6 

26*6466 

665 

1 

665 



ft 

flagidwn 

3430 

624 

19 

197 

752 


ERROR 

06 ♦ 6^0 2 

492 

1 

486 



ft 

FACTl 

1631 

32 

5 

7 O 9 

7l7 


ft 

FLACjIUP 

34l6 

624 

22 

213 

623 


ERRORMAX 

33*6170 

592 

1 

591 




FACT2 

1330 

29 

5 

710 

717 

- 

ft 

FLAG2Dt*(N 

34 52 

625 

6 

59 O 

678 


ERROR MON 

10,6234 

165 



-P 


ft 

FACTOR 

1621 

31 

3 

7l8 



ft 

FLAG2UP 

3440 

624 

6 

503 

676 



KEY: SYMBOLS DEFINED BY EQUALS Are FLAGGED =• OTHERS ArE NORMALLY DEFINED EXCEPT THOSE FLAGGED; 


U UNDeFINeU 

N nearly defineu by = 


E failed Leftover 
j failed leftover 


erase m multipl 

WORD 0 OVeRSIZ 


defined 

- OR ILL-DeFINED 


T wrong Memory type 
c conflict in Memory 


MM multiple errors 
X MISC. trouble 
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SYMBOL H 

DEf^ I NI tI ON 


ReFeReN 

CeS 

F • 

symbol h 

DEFINITION 

References f 

■ 

li 

SYMBOL H 

Definition 

References f 

FLAGWRDl 

06A 6 

18 


30 

142 

624 

m 

=: 

GCDMPSUB 

14, 7146 

218 

6 

216 

2l7 

P 

■ 

GOJUMP 

04,7114 

144 

3 

143 144 

FLAGWRD2 

06A7 

16 


29 

114 

684 

- 11 

GC D MP5W 

0101 

15 

5 

216 

223 = 

• 

goloadlv 

05,6437 

249 

2 

235 

FLASHLOC 

06*7 A6 A 

528 


2 

528 

530 

n 

GENPL 

1100 

26 

62 

26 

45 B = 

m 

GOLOC 

0122 

136 

12 

135 138 s 

FLASHOFl 

06*7462 

528 


1 

466 


n 

GETANgLE 

27,6160 

702 


- 

• 

m 

gomaxl/d 

27*6704 

725 

2 

724 

FLASHOFF 

06*6003 

486 


3 

249 

530 

II 

GETCADR 

04*6622 

117 

2 

116 


m 

GOMEGA 

21*7007 

351 

1 

344 

FUASHONl 

06,7453 

520 


2 

486 

528 

m 

getdhook 

31*7206 

711 

1 

710 


m 

GQMXL/Dl 

27,6371 

719 

3 

716 720 

FLASHON 

06 * 6000 

486 


11 

211 

529 

m 

getdt 

10,7672 

234 

4 

229 

232 

m 

goneglad 

2 7 ,66 / 7 

725 

1 

7 23 

FLNDX12 

12*7755 

425 


3 

401 


m 

GETETA2 

30*7001 

704 

1 

704 


• 

gonepast 

0006 

18 

3 

723 726 = 

flndx 

34*7740 

458 


1 

442 


■ 

geteta 

30,6772 

704 

1 

7 OI 


m 

qDODEND 

1 4 , 6 3 1 4 

201 

4 

197 212 

FLTR2ER0 

12,7343 

416 


2 

^ 1 6 

456 

m 

getff 

32,7353 

5b2 

1 

581 


m 

goposlad 

27*6670 

724 

3 

7l7 725 

FORTY 

3561 

626 


1 

626 


m 

getinrel 

06*6222 

4B9 

4 

487 

495 

m 

G0PR0G2 

04,7020 

142 

1 

142 

FOUNOR 

1130 

23 


1 

306 


~ m 

get<time 

23*6022 

296 

1 

302 


m 

GOPROG 

04* 7005 

142 

1 

35 

FOUNDV 

1136 

23 


1 

30 7 


= fe 

getmanu 

33,6477 

601 

2 

596 


m 

GORETURN 

04*7130 

144 

2 

1 46 

FOUNOVAC 

2076 

98 


3 

101 

1 14 

9 

getnewx 

23*6242 

301 

1 

301 


m 

GO/ONl 

24 * 6447 

622 

- 


four 

5502 

65 


1 6 

45 

576 

m 

getnuogc 

30,6756 

39 O 

1 

390 


« 

GO/ON 

24,6433 

622 

1 

621 

FOURTH 

30 * 7054 

736 


3 

384 

704 

m 

getnuvi 

31,7432 

714 

1 

714 


m 

GOSHOSUM 

05,7014 

257 

i 

235 

FOURTN 

3536 

626 


2 

573 

698 

m 

GETDGC 

25*6102 

630 

1 

630 


m 

goterm 

04,7166 

146 

i 

144 

frect 

34,7612 

456 


2 

409 

457 

m 

GETPTCH2 

26,7521 

678 

2 

67b 

680 

m 

gotoaddr 

1374 

29 

9 

703 744 s 

fkedspdo 

07*7505 

552 


1 

552 


m 

GETPTCH 

26,7517 

678 

11 

658 

676 

m 

gotoupsy 

27,6202 

7l6 

i 

713 

FREE05P 

3362 

552 


28 

210 

72 ? 

m 

getrandv 

23*6406 

306 

2 

301 


m 

gotrange 

25,6634 

642 

1 

646 

freeret 

0113 

15 


2 

552 


=: K 

GETRANGE 

25*7103 

646 

1 

642 


m 

grabdsp 

3302 

550 

24 

210 727 

FREEWAIT 

07*7501 

552 


I 

552 


■ 

GETTFF3 

3 L ,624 3 

668 

1 

687 


m 

grablock 

0630 

17 

9 

146 552 

FRESHPD 

30 * 62 64 

375 


22 

450 

739 

■ 

GETTFF 

31,6212 

667 

1 

686 


m 

GRABUSYl 

07*7434 

550 

1 

497 

FULHAM 

25*7166 

647 


1 

645 


m 

GETJNB 

30*7243 

739 

2 

620 

729 

m 

grabusy 

33l3 

550 

2 

122 550 

FULLDT 

10,7740 

234 


1 

231 


m 

GETjNi 

27*6136 

701 

1 

704 


p 

GRABUSYB 

07,6001 

497 

\ 

550 

FVl 

04*6020 

99 


5 

99 


9 

GETJNITV 

27*6076 

700 

1 

700 


■ 

grad 

1422 

29 

2 

723 5 

FV 

1202 

24 


11 

311 

324 


GETvCOR 

31*7367 

713 

1 

713 


■ 

gravity 

100? 

22 

3 

639 75 O = 

FX 

1100 

25 


8 

724 

732 

= ■ 

61 MLOCKl 

22*672A 

469 

2 

468 


• 

gtsfin 

05,7222 

541 

1 

516 

FXA0R5 

11,6664 

275 


2 

276 


II 

Gl MPO wOF 

32*7110 

574 

3 

126 

574 

■ 

gtsfout 

05,7213 

541 

1 

507 

FXCONl 

11,7023 

277 


1 

275 


* 

G1 MPOWON 

32,6511 

567 

7 

129 

622 

m 

gyorft 

12,6511 

400 

1 

257 

FXC0N2 

11,7024 

277 


1 

275 


■ 

GIVEN! 

1260 

24 

1 

301 

— 

m 

GYRCMCl 

21,6766 

351 

1 

346 

FXFXBNK3 

1 1 ,6660 

275 


1 

275 


m 

GLI Ml TER 

27*6711 

725 

2 

724 

725 

ft 

GYRCMC2 

21,6770 

351 

1 

346 

FXFXCHK 

11*6650 

275 


1 

277 


m 

GMAx/2 

30*7201 

738 

2 

725 


ft 

GYRCMC3 

21*6772 

351 

1 

346 

FXFXWORD 

11* ?054 

278 


2 

278 


m 

GMDDE 

1272 

24 

2 

300 

301 = 

ft 

GYRCMC4 

21*6774 

351 

1 

347 

FXSWBNKS 

11*6676 

275 


2 

277 


m 

GMPOFFl 

33,7147 

615 

1 

614 


ft 

GYRDRFT 1 

12,6521 

400 

- 

- 


m 

GMP3FP2 

33*7166 

615 

2 

128 

615 

ft 

6YRDKFT2 

12*6523 

400 

3 

414 423 

GAMCHECK 

25,7120 

646 


1 

643 


p 

GMP3FF3 

32*7121 

574 

2 

126 

577 

ft 

GYRDADV 

10,7560 

231 

2 

23l 233 

GAMMALl 

0026 

732 


5 

710 

713 

s p 

GMPDFF 

32*7101 

574 

- 

- 

- 

ft 

gyroadvs 

10,7512 

229 

3 

229 230 

GAMMAL 

1607 

31 


6 

711 

715 


GMP3N 

32,7057 

573 

- 

- 

- 

■ 

gvroang 

1340 

30 

13 

340 353 = 

GBI ASX 

0744 

2l 


3 

216 

542 

m 

GO C ADR 

04*7350 

150 

1 

146 


ft 

GYR0BSY2 

14,7543 

228 

1 

227 

GBI A5Y 

0745 

21 


2 

216 

222 

m 

godspalm 

07*6356 

503 

13 

497 

534 

ft 

GYROBUSy 

14,7524 

228 

2 

224 225 

GBI ASZ 

0746 

21 


2 

217 

222 


gogetunb 

33,7367 

620 

- 

- 

- 

ft 

6YR0C0M 

21*6574 

346 

1 

34 O 

GCOMP 

0756 

21 


15 

149 

221 

■ 

GO-ON 

25*6774 

644 

1 

646 


ft 

GYR0C5W 

1320 

29 

8 

334 37 I 5 

Y: symbols definei 

J BY 

EQUALS are flagged =♦ OTHERS ARE NORMALLY DEFINED EXCEPT 

THOSE FLAGGED; 




IJWncFTNPD 



E 

failed 

leftover 

erase m 

MULTIPLY defined 



T 

WRONG Memory type 

MM 

multiple EKRO 

nearly defined by 

= 

J 

failed 

leftover 

WORD 0 

qversize- ok 

ILL 

“DeF I ned 

C 

CONFLICT 

IN memory 

X 

MI SC, trouble 
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symbol h 

Definition 

ReF 

eRen 

CES 

F 

m 

symbol h 

Definition 

References 

f 

m 

m 

symbol h 

Definition 

ReFeRENGeS 

F 

GYROD 

1234 

26 

6 

396 

436 

— 

■ 

m 

IGC 

1522 

30 

11 

370 

729 


m 

m 

inihitem 

0572 

16 

6 

253 

255 


GYRODPNT 

14,7433 

226 

4 

242 

379 


m 

IGN-4SEC 

30,6221 

330 

1 

329 




IMLODlF 

1105 

23 

2 

255 

256 


GYR0EX2 

14, ^76 

224 

1 

227 



m 

I JUMP 

437 O 

46 

2 

46 



m 

INILOOK 

05 1 6 6 0 3 

254 

2 

253 

255 


GYROSPNT 

14,7347 

224 

2 

221 

396 


m 

IMACT 2 

14,7003 

213 

1 

213 



m 

INlLOSAv 

U 03 

23 

7 

253 

255 

= 

GYROSpTw 

14,7404 

225 

- 

— 



m 

IMJACTW 

14,701 1 

213 

1 

213 




INI LOT Em 

0573 

16 

6 

253 

255 


gyrotork 

12,6203 

395 

1 

257 



m 

IMUATTC 

14*6223 

199 

5 

244 

613 


m 

INI PREP 

0 b * f) 6 2 4 

254 

2 

254 



GYROWAIT 

10,7612 

231 





m 

IMJATTCK 

05,6262 

24h 

1 

235 



m 

IN2 

0006 

12 

15 

156 

754 









m 

IMJATTCV 

05,6315 

244 

1 

244 



m 

IN3 

0007 

12 

20 

140 

545 

— 

H 

1264 

24 

10 

296 

323 

— 

m 

IMJCADR 

0733 

20 

2 

20 

149 


m 

INATAN 

30,6505 

383 

1 

383 



HALF 

4522 

48 

23 

63 

757 

£ 

m 

IMJCHKl 

12,6434 

398 

1 

399 



m 

INCADR 

4364 

45 

4 

36 

78 


HALFDP 

22,7177 

476 

7 

370 

463 


M 

IMUCHK2 

12,6435 

398 

i 

399 



m 

incex- 

10,7443 

188 

2 

186 



HALFSEC 

33,6252 

594 

1 

593 




IMJCHK 

12,6372 

398 

1 

257 



■ 

INC LOOP 2 

05 , 6204 

241 

1 

241 



HALvE 

30,7l73 

737 

8 

383 

7l4 


m 

IMJCHkR 

1 2 *6406 

398 

i 

401 



m 

INCLOOP 

05,6177 

241 

3 

241 

245 


HBRANCH 

1271 

24 

4 

307 

322 

* 

m 

IMJCOARIC 

05,6l42 

240 

i 

237 



m 

INCNOUl 

0 6 * 6640 

496 

3 

496 

527 


HEADWNl 

33 *6346 

596 

1 

596 



a 

IMJC0AR5 

1 4 * 6 1 0 4 

195 

3 

240 

433 


m 

incnoutu 

04,7511 

479 

1 

478 



HEADWN2 

25*7441 

652 

1 

652 



m 

IMJCOARV 

05,6166 

240 

2 

240 

248 



INCORPtX 

1303 

25 


- 

- 

- 

HllO 

04,7507 

479 

1 

478 



m 

IMJCORK 

05*6352 

246 

1 

235 



m 

I NCR 

03,6134 

72 

3 

47 

72 


HU 

30,6771 

391 

1 

390 



m 

IMUFAIL2 

10,6315 

1 66 

1 

166 



m 

INCRCDU2 

30,6420 

361 

1 

38l 



HI5 

2261 

189 

9 

173 

b 1 4 


m 

IMUFAIL3 

10,6312 

166 

1 

166 




INCRCDUS 

30,6415 

381 

2 

578 

638 


HJECCl 

31,6442 

693 

1 

694 



m 

IMJFAIL 

10,6305 

1 66 

1 

16 6 



m 

INCRMT 

22,6255 

371 

3 

37 O 

37 I 


HIECC 

3 1 , 6464 

693 

2 

664 

585 


m 

imjfine 

14,6143 

196 

5 

242 

400 


m 

I NCR T 2 

5412 

6 3 

9 

59 

79 


HiGHll 

25 ,6070 

629 


* 



m 

IMJFINED 

14,6171 

197 

3 

194 

234 



INCRT4 

5302 

61 

2 

60 



HIGHA 

33,7354 

619 

1 

6I8 



m 

imjfinek 

05,6220 

242 

1 

235 



m 

IND 

0107 

15 

6 

66 



HIND 

0012 

18 

3 

713 

7 U 


m 

IMJFINEv 

05 * 62 b 2 

242 

1 

242 



m 

INDEX 

4233 

43 

1 

38 



HMAG 

1274 

24 

* 




m 

IMJFINIS 

14,6241 

199 

1 

350 




INDIRECT 

1 ^ f 6625 

136 

1 

135 



hungcode 

04,7035 

142 

1 

142 



m 

I M J F I N N W 

14*6163 

196 

1 

559 



m 

INDJUMP 

4367 

46 

2 

44 

45 

= 

hungmask 

04,7341 

150 

1 

142 



m 

IMJLOCX 

14,6205 

19 a 

2 

243 

398 


m 

INFLANG 

1332 

29 

I 9 

335 

360 

3 

huntcadr 

31*6700 

706 

1 

707 



a 

IMJLOCKD 

14,6214 

19B 

2 

198 



m 

inhint 

001 7 

12 

4 

270 

277 

3 

HUNTDUMP 

27*6203 

716 

• 

• 

I* 


m 

IMJLOCKK 

05 *6253 

243 

1 

235 



m 

INITCAOR 

30,7516 

745 

1 

744 



HUNTESTl 

31*7105 

709 

3 

709 

715 


m 

imjrecor 

14,6134 

196 

1 

246 



m 

INITEST 

32, 7602 

587 

2 

585 



HUNTEST 

31*7007 

708 

3 

706 

720 


m 

imjreenk 

05,6316 

245 

1 

235 



m 

initflag 

0027 

18 

- 


- 

- 

HUNTESTA 

31*7025 

708 

1 

706 



m 

imjreent 

14,6216 

199 

4 

245 

697 


m 

INITISE 

32,7617 

587 

1 

587 



HUNTSWl 

0011 

18 

2 

709 


- 

m 

IMJREENV 

05,6351 

245 

1 

245 



m 

initl/d 

1575 

31 

4 

581 

707 









m 

IM JRELK 

05*6451 

250 

1 

250 



m 

INITMASk 

4506 

588 

1 

587 


= 

ibnkcall 

5742 

292 

5 

136 

577 


m 

IMJSTALL 

14*6331 

202 

35 

221 

697 


m 

initmsk 

30 , 6251 

331 

- 

- 

- 


IC0RK2 

05*6153 

24 O 

2 

241 



m 

IMJSTART 

10,7322 

183 

1 

183 



m 

INITRLl 

31,6767 

7 O 7 

1 

706 



icsdel 

05*6167 

241 

1 

240 



m 

IMJzERO 

14,6000 

193 

4 

239 

400 


m 

INI TROLL 

31,6701 

706 

1 

745 



idaditem 

0056 

14 

5 

501 

540 

- 

m 

IMJzEROD 

14,6022 

193 

1 

193 



m 

INREL 

0076 

15 

22 

488 

495 

- 

IDAD2TEM 

0057 

14 

1 

540 



m 

IMJZEROK 

05,6126 

239 

1 

236 



m 

inreltab 

06*6226 

489 

2 

489 

49 ^ 


IDAD3TEM 

0060 

14 

2 

540 



m 

I NO 

0004 

12 

7 

142 

206 

= 

m 

INRLSW 

0017 

18 

2 

706 



idaddtab 

05*7515 

545 

3 

540 



m 

INI 

0005 

12 

4 

253 

255 

- 

s 

INTI 

4024 

63 

3 

54 

59 


IDADDTEM 

0103 

15 





m 

INHIDIF 

1104 

23 

2 

255 

256 


m 

1 fO 1 F L A Q 

0031 

18 

1 

585 



ifailok 

14*6201 

197 

4 

141 

196 


m 

luUlSAv 

1102 

23 

2 

253 

255 

- 


INT 

1 364 

30 

3 

34 B 




KeY; symbols DEFINED BY EQUALS ARE FLAGGED =• OTHERS ARE NORMALLY DEFINED E^CePT THOSE FLAGGED: 


U UNDEFINED 
N nearly defined BY 


E failed leftover erase 
J failed leftover word 


M multiply Defined t wronq memory type mm multiple errors 

0 oveRSUe- or ill-defined c conflict in Memory x misc, trouble 
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SYMBOL table LlSjINGt INCLUDING Page NUMBeR OF DEFINITION* AND NUMBER OF REFERENCES WITH FIRST AND LAST PAGE NUMBERS 


SYMBOL H 

Definition 

ReFeReN 

CeS 

INTCONl 

3A,7736 

458 

2 

443 


iNTERPiP 

27,7U7 

731 

2 

69b 

731 

intgrate 

23,7116 

317 

1 

317 


intmatbs 

07,6110 

498 

2 

498 


INTPFLAG 

0026 

18 

1 

585 


INTPMASK 

32,6351 

563 

- 

- 


INTPRET 

AOOO 

37 

105 

50 

753 

IPlpDTl 

27,7177 

731 

1 

73l 


IPIPOT 

27,6032 

698 

1 

698 


IPRDC2 

4072 

39 

1 

37 


IPROC 

4065 

39 

2 

38 

52 

I5».jCALL 

5750 

292 

4 

337 

698 

ISWRETRN 

5761 

292 

4 

138 

742 

ITAL 

03,6174 

73 

1 

4 7 


ITANCO 

31,6362 

690 

1 

690 


ITANCl 

31,6436 

692 

1 

69l 


ITANC3 

31,6437 

692 

1 

69l 


ITANC5 

31,6440 

692 

1 

691 


ITANC7 

3 1 ,644 1 

692 

1 

691 


I TCF 

5612 

69 

1 

46 


ITEMPl 

0577 

16 

29 

119 

295 

ITEMP2 

0600 

17 

19 

162 

396 

I T EMP 3 

0574 

16 

4 

188 


ITERNO 

12,6366 

397 

1 

395 


ITSAPRIO 

13,6713 

138 

1 

138 


IX 

21,7031 

352 

- 


" 

,05g 

30,7141 

737 

2 

706 

721 

« 3 3 3 « « • 

22,7201 

476 

1 

468 


-1/2+2 

03 * 7066 

88 

1 

94 


-1/2PI 

31,6316 

689 

1 

687 


-310SEC 

24,6176 

577 

2 

576 

57 7 

-bITl4+l 

10,7176 

181 

1 

177 


-bITA 

10*6343 

166 

1 

166 


-EjIT9 

2311 

120 

1 

120 


-CC5FINE 

21,6731 

349 

1 

349 


-CCSPR 

04,6322 

107 

1 

108 


-uJMCODE 

10,6201 

163 

4 

163 

175 

-,25SC21 

21,7012 

35l 

- 

- 

- 

-.S5EC75 

05,7137 

260 


- 

- 

-M00E20 

10,6417 

168 

1 

168 


-nmbr 

11,6434 

271 

1 

271 



symbol h 

Definition 

References f 

-0CT50 

14,67lA 

211 

1 

211 


-ON 

06,63A3 

A9I 

3 

490 

525 

-ONECHK 

11,6034 

266 

17 

268 

282 

-PHA5E1 

0656 

19 

4 

120 

747 = 

-SINK 13) 

30,7215 

738 

1 

739 


-UPADR 

1122 

23 

8 

261 

264 = 

-VXSC 

43AO 

45 

1 

45 

- 

-ZEROCHk 

11,6023 

265 

9 

268 

281 

U2REQSQ 

23,7436 

325 

1 

3l4 


J4REQ/J3 

23,7442 

325 

2 

313 


JAC<P0T 

10,7377 

167 


163 

175 

JAMEXTVB 

07,6136 

499 

1 

487 


JAMTERM 

3151 

535 

4 

553 

611 

UJ 

1107 

25 

9 

723 

724 s 

JO3SLEEP 

2127 

106 

20 

IO9 

551 

JOBSLPl 

04,6267 

106 

1 

106 


J0BWAKE2 

O4 f 6 1 1 0 

102 

2 

98 

102 

J03WAKE3 

04,6140 

102 

4 

102 


U 03 vvAkE 4 

04,6047 

101 

1 

102 


UOBwAKE 

2060 

98 

18 

123 

552 

jsterthr 

21,6347 

340 

1- 

- 

- 

UbWiTCH 

0001 

18 

4 

317 

322 = 

JUMplO 

33,6034 

590 

1 

590 


UUMP3 

25,6023 

628 

1 

628 


JUMP4 

33,6571 

603 

1 

602 


JUMP 6 

33,6457 

599 

1 

599 


UUMP 7 

33,6446 

599 

1 

599 


UUMPe 

25,6037 

628 

1 

628 


UuMP 9 

33,6055 

591 

- 

- 

- 

UUMP 

4305 

44 

3 

4A 

45 

JUMpIT 

4076 

39 

1 

41 


JUMPY 

21,6436 

341 

2 

340 


J(RE) 5Q 

30,7753 

750 

1 

749 


KID 

30,7125 

737 

1 

720 


KIRDLL 

1450 

29 

12 

390 

728 = 

kisteer 

33,616A 

592 

1 

591 


K2 

5475 

65 

6 

61 

66 

K20 

30,7127 

737 

2 

720 


K2RDLL 

1372 

29 

7 

726 

744 = 

K25TEER 

33,6166 

592 

1 

591 


KiROLL 

27,7202 

732 

3 

728 

738 


symbol h 

Definition 

References 

K44 

30,7225 

738 

1 

707 


K 

34,6233 

429 

1 

428 


KACOS 

30,7155 

737 

1 

704 


kascale 

30,7133 

737 

1 

701 


KAT 

30,7231 

738 

i 

707 


KBl 

30,7111 

736 

i 

718 


KB2 

30,7113 

736 

1 

718 


KC3 

30,7165 

737 

1 

713 


KCHECK 

14, 6070 

194 

5 

193 

195 

KDMIN 

30,7067 

736 

i 

72l 


kenable 

04,6771 

141 

1 

140 


KEp2 

27,6475 

721 

2 

706 

722 

KEP3 

27,6505 

721 

1 

722 


kep 

27,6467 

721 

i 

717 


KEPCADRI 

3 1 ,6677 

706 

1 

706 


kEPCADK 

27,6521 

722 

1 

721 


KEPLER2 

23,6065 

298 

1 

296 


KEPLER3 

23,6224 

301 

1 

296 


KEPLER 

23,6026 

297 

1 

296 


kepsilon 

23,6277 

303 

1 

301 


keycall 

14,6674 

210 

1 

206 


KEYRUPT 1 

04,7363 

477 

2 

99 

470 

keyrupt 

2042 

36 

1 

35 


KEyRUPTA 

14,6461 

206 

2 

36 


keykuptc 

04,6001 

99 

1 

210 


keytempi 

0600 

17 

6 

478 

479 

KEYTEMPz 

0571 

16 

4 

478 

479 

KG 

10,6215 

163 

1 

162 


KILLMANU 

33,7136 

614 

- 

- 

- 

killmon 

07,7155 

522 

2 

522 


kilmonon 

3127 

534 

2 

530 

533 

KLAT 

30, ?147 

737 

1 

726 


KPIP 

30,7741 

750 

3 

590 

747 

krangeo 

25,7142 

647 

1 

642 


krangei 

25,7144 

647 

1 

642 


KRANGE2 

25,7146 

647 

1 

642 


KR (TVC) 

33,6402 

597 

1 

596 


K5AMP1 

10,7250 

182 

1 

IBO 


ksampia 

10,7263 

183 

2 

182 


K5AMp2 

10,7131 

180 

3 

180 

182 

KSAMP2A 

10,7312 

183 

2 

183 


KSAMP2B 

10,7211 

181 

1 

leo 


KSAMP3A 

10,7317 

183 

2 

183 



KEY; SYMBOLS DEFINED BY EQUALS ARe FLAGGED =. OTHERS ARE NORMALLY DEFINED EXCePT THOSE FLAGGED; 


u undefined 
N nearly defined by 


E FAILED leftover ERASE M MULTIPLY DEFINED 

u failed Leftover word o oversize- oh ill-defined 


T WRONG memory TYPE 

c LONFUCT IN Memory 


MM multiple errors 
X MI sc, trouble 
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SYMboL table LISTING* InCLJDInG Pa&E nUMBeK DF DEFINITION* AND NUMBER 0^ REFERENCES WITH FIRST AND LaSt PaGE NUMBERS 


symbol h 

Definition 

ReFeREN 


f 


5YM30L H 

Definition 

References 

F 

m 

m 

SYMBOL H 

Definition 

ReFerenceS 

F 

KSAMPA 

10 

7117 

180 

1 

IBO 



■ 

1 

LEFTS 

3203 

547 

8 

277 

521 


w 

■ 

lodnntab 

05,7153 

540 

1 

498 



ksamp 

10 

7076 

180 

- 




m 

LLFT7C0M 

06*7216 

519 

1 

519 



• 

lgdnorm 

05,7210 

540 

1 

540 



KSAMPTEM 


0637 

17 

18 

176 

183 

= 

m 

LLFTLOOP 

03*6404 

77 

i 

77 



m 

lodsampt 

2736 

191 

2 

477 

522 


Kl 

30 

7137 

737 

1 

704 



m 

LE3ALT5T 

06,6545 

494 

2 

494 



m 

LOECC 

31,6076 

685 

1 

685 



KTETA 

30 

7135 

737 

1 

704 



m 

LEO 

1431 

29 

3 

700 

725 


■ 

LOG 

30,6436 

382 

1 

713 



KTIMEN+1 

23 

6144 

300 

1 

296 



m 

LEWDl 

30*7050 

736 

i 

7 O& 



■ 

logtem 

0077 

15 

3 

382 



kvscale 

30 

7131 

737 

1 

700 



m 

LEWD2 

30*7052 

736 

i 

708 



m 

lomega 

21 * ?005 

351 

- 

- 

- 


KkvE 

30 

7153 

737 

1 

700 



m 

Lt rtO 

1340 

29 

8 

708 

719 

s 

m 

LUNG 

1264 

24 


- 



KWIEM 

30 

7211 

738 

1 

739 



m 

LGCOMP 

14*7060 

215 

1 

221 



m 

LONGCl 

04,6617 

117 

1 

116 











m 

LGYRO 

0764 

21 

9 

149 

340 


m 

LONGCALL 

04,6552 

116 

4 

136 

577 


L350 

27 

6747 

726 





m 

LgYROANG 

21*7030 

352 

1 

341 



m 

longcler 

13,6613 

135 

3 

135 

136 


L353 

27 

676S 

726 

1 

726 



m 

LoYROBIN 

05,6500 

251 

2 

242 

251 


m 

LONgCyCL 

0 ^ 1 6 6 0 2 

116 

1 

117 



L355 

27 

6775 

726 

3 

726 

728 


« 

LI FT flag 

0036 

18 

* 

- 


= 

m 

longdes 

1256 

24 

- 

- 

- 

- 

L357 

27 

7067 

728 

1 

726 



m 

LIFTOFF 

32,6000 

553 

2 

170 

260 


m 

longexit 

1466 

20 

2 

116 

117 

- 

lablat 

21 

6776 

351 


— 



m 

limitl/d 

27*6737 

726 

11 

706 

725 


m 

longtime 

1460 

28 

31 

116 

593 

= 

LAbNBAZI 

34 

7704 

458 

fip 




m 

LIMITS 

4477 

48 

10 

171 

729 

- 


LONgTST 

12,7101 

4 O 9 

2 

407 

406 


LaBNBAZ 

34 

7676 

458 





m 

LIMJACTW 

14,7010 

213 

2 

213 



m 

LOOKANG 

1442 

28 

4 

565 

645 


LABNBVER 

34 

7716 

458 

1 

446 



m 

LISTBANK 

2570 

155 


153 

154 


m 

lookret 

0574 

16 

3 

254 



LA8TEST1 

34 

7666 

457 

1 




■ 

LITESOUT 

10,6277 

165 

1 

165 



m 

LOOP AG in 

04,6613 

116 

1 

116 



labtest 

12 

6751 

407 

3 

406 

457 


■ 

l-jpadr 

13,7202 

264 

1 

262 



m 

LOSCAN 

10,6447 

170 

1 

1 64 



LAD 

30 

7143 

737 

12 

58l 

726 


■ 

LLoYROD 

12,6370 

397 

1 

396 



m 

LOW 10 

4606 

50 

l9 

44 

550 


LAD/256 

30 

7145 

737 

1 

721 



m 

LNDMRKV 

1174 

24 

- 

- 


• 

m 

LOWll 

4302 

44 

7 

38 

628 


landmark 


0616 

17 

2 

542 



m 

LNEiVGYRO 

10,7736 

234 

1 

234 



m 

LOWS 

3220 

547 

13 

120 

526 


LASTADR 

04 

6042 

99 

2 

99 

102 


m 

Li’jOBR 

03,6127 

72 

* 

- 

- 


m 

LOW5BAR 

10,7214 

182 

1 

181 



lastbias 

14 

7343 

223 

1 

623 



m 

LOAD 

4203 

42 

4 

46 

53 


m 

LOW6 

07,7421 

534 

3 

521 

533 


LA5TW0RD 

22 

6260 

371 

•• 




m 

LOADIND 

0066 

14 

1 

14 



m 

LOW? 

4720 

52 

14 

37 

493 


LAT 


1262 

24 



* 


m 

LOADLVl 

07,6006 

497 

1 

249 



m 

LOW8 

10,7465 

189 

2 

163 

189 


latang 


1112 

25 

3 

702 

726 


m 

loadlv 

07,6705 

513 

6 

497 

513 


m 

L0W9 

4607 

50 

7 

104 

254 


LATAZCHK 

34 

6515 

434 

2 

392 

400 


m 

loadop 

4100 

39 

1 

41 



m 

lowverb 

07,6043 

497 

1 

497 



LATAZCKl 

12 

7153 

411 

1 

434 



m 

loadret 

4211 

42 

1 

49 



k 

LOWWD 

4200 

4l 

2 

38 

52 


LATBI AS 

30 

7151 

737 

1 

726 



m 

LOADSTAT 

0632 

17 

5 

513 

536 


m 

lp 

0003 

12 

59 

57 

688 

- 

LATITUDE 


1314 

29 

13 

332 

460 


m 

luadtime 

30,6252 

374 

4 

436 

557 


m 

LPHASEl 

OA ,7345 

150 

1 

149 



LBNBVER 1 

3A 

7724 

45 a 





m 

LOC 

0120 

16 

30 

37 

537 


m 

LPHASE2 

2553 

155 

1 

151 



LCCHK2 

11 

7 5'%! 

286 

2 

285 



m 

LUCALUP 

21,7022 

351 

- 

- 

- 



LPHASE3 

2554 

155 

1 

152 



LCCHKB 

11 

7530 

286 

2 

285 



m 

locctr 

0601 

17 

24 

17 

536 


m 

LPHASE4 

2555 

155 

1 

152 



LCCHKD 

U 

7533 

286 

2 

286 



a 

LOCNO 

1567 

27 

2 

395 

396 

- 

m 

LPHASEb 

2556 

155 

1 

152 



LCNDX3 

12 

7613 

422 

2 

422 



m 

locset 

04,6067 

lOl 

1 

99 



m 

LPHA5E6 

2557 

155 

1 

153 



LCNDX5 

12 

7644 

422 

4 

422 

423 


m 

LOCSPSI 

24,6455 

622 

1 

621 



m 

LPHASE7 

2560 

155 

1 

153 



LDAnZIG 


5553 

66 

1 

58 




loctheta 

30,6435 

381 

1 

381 



m 

LPNDXl 

12,7556 

421 

4 

421 

423 


LDATALST 


0671 

19 

4 

151 

154 


m 

LQD 

30,7167 

7 37 

1 

724 



m 

LPNOX2 

12,7576 

422 

4 

421 

423 


LDC 1 1 

1 1 

*7657 

288 

2 

287 



a 

LQDMIXNN 

05,7171 

540 

- 

- 

- 


m 

LPNDX4 

1 2 f 76 30 

422 

2 

422 



LDNLSTl 


2566 

155 

4 

149 

609 


m 

LODNLv 

05,7206 

540 

1 

540 



m 

LpRgRCT 

04 f 56 6 ^ 

123 

Z 

123 



LDNLST2 


2567 

155 

1 

261 



m 

LODNNLOC 

07,6107 

49 a 

8 

498 

513 


m 

LPRUPT 

0032 

12 

19 

1 6 2 

36 8 



key: symbols Defined by equals are flagged =• others are normally defined except those flagged: 


U UimDeFINeD 

N nearly defined by 


E failed Ll^-TOVER erase 
J failed LLFTOVeR word 


M MULTIPLY defined T wRONg MEMORY TYPE 

0 oversize- or ill-defined c conflict in Memory 


MM multiple errors 

X MISC, trouble 
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SYMBOL table LlSTINGt INCLUDING PaGL nUMBeR DF DEFINITION* AND NUMBER qF REFERENCES WlyH FIRST AND LaSt PaGE NUMBERS 


SYMBOL H 

Definition 

ReFeREN 

ces 

f 

m 

m 

SYMBOL H 

DeFINI TIDN 

References 

F 

■ 

■ 

SYMBOL H 

Definition 

References f 

LyPL 

05*7013 

257 

1 

257 



li 

■ 

MANOPTZ 

10,7360 

186 

1 

179 



■ 

m 

MIXNN2 

07*6242 

501 

1 

501 


lhemkdsp 

14*6673 

210 

1 

210 



• 

MAN32D 

10*7372 

186 

1 

186 



m 

mixnoun 

07*6210 

501 

1 

498 


L/D 

1222 

25 

15 

706 

728 


• 

MANJJOB 

33*6560 

602 

1 

602 




mixtemp 

0073 

14 

3 

494 

501 = 

L/DCMINR 

30*7175 

738 

2 

726 

723 


* 

MANzTEST 

10,7145 

IBI 

1 

180 



m 

MkDSPbSY 

14,6670 

210 

1 

210 


LSTl 

0552 

16 

30 

112 

147 


m 

MAR<2 

14,6543 

208 

1 

207 




MKDSPCOD 

14,6672 

210 

1 

210 


L5T2 

0561 

16 

24 

112 

147 


m 

MAR<3 

14,6552 

208 

1 

208 



m 

MKREJECT 

1 ♦ 6 6 1 1 

209 

2 

206 

249 

LST2CADR 

07*6144 

499 

1 

499 



m 

MARK 

14,6462 

206 

- 

- 

- 


m 

MKRELE A5 

1 ^ f 6^5 3 

205 

4 

360 

430 

LST2CON 

07*6143 

499 

1 

499 



m 

MAR<D1SP 

1 ^ V 6 6 5 I 

210 

1 

207 



m 

MkSTATI 

1304 

26 

4 

430 

431 = 

LST2FAN 

05*6000 

235 

1 

499 



m 

MARKERCT 

0676 

19 

6 

151 

154 


m 

MKVACFND 

14,6432 

204 

5 

204 


L5T0UFF 

13*7132 

263 

2 

261 

262 


m 

MARKEXIT 

14,6447 

204 


-p 

- 


m 

MKVbSO 

14,6750 

212 

2 

208 

212 

lstempty 

07*7524 

552 

1 

552 



m 

MAR<OK 

14*6416 

204 

1 

204 



m 

MKVB51 

14*6677 

211 

2 

204 

212 

LSTFULL 

07*7526 

552 

3 

550 

551 


m 

MAR<STAT 

0735 

20 

31 

149 

432 


m 

MKVB5X 

14,6736 

212 

4 

211 


LSTPTR 

0113 

15 

4 

550 




MATBSUB 

07*7416 

534 

1 

534 



m 

MMCHANG 

07,7273 

528 

1 

500 


ltarupta 

2650 

159 

1 

159 



m 

MATXDET 

34*6420 

432 

1 

431 




modabort 

14,6357 

202 

2 

202 


LTHCOMA 

2561 

155 

1 

151 



m 

MAXPROG 

447 7 

141 

3 

140 

144 

= 

■ 

modalarm 

10*7290 

182 

- 

- 

- 

lthcomb 

2562 

155 

1 

152 



m 

MAXPT52 

1307 

26 

2 

392 

438 


m 

mode 21 

10*6925 

169 

1 

168 


LTHD+2 

05*6217 

241 

1 

24 1 



m 

MAXROLL 

1702 

33 

1 

557 



b 

MODE23 

32,7190 

575 

1 

574 


LIHLSTA 

2563 

155 

1 

152 



m 

MBXCH 

03,6767 

86 

2 

86 



■ 

MODE26 

29,6977 

623 

3 

132 

622 

LTHL5TB 

2564 

155 

1 

153 



M 

MDl 

3231 

547 

1 

536 



• 

MODE32 

29,6957 

622 

1 

622 


LTHvACA 

04*7357 

150 

4 

148 



m 

MDT 

1449 

28 

4 

590 

591 


■ 

M0DE44 

32*7193 

575 

1 

573 


ltndxo 

12*6534 

400 

1 

400 



m 

MDT INIT 

33*6033 

6gO 

1 

590 



m 

MODE 

0065 

14 

21 

14 

388 

LTNOX+ 

12*6536 

400 

1 

^ 00 



m 

MEASMODE 

1300 

24 

8 

326 

546 

- 

m 

modebank 

2045 

36 

1 

36 


LTSKOV 

04.653A 

114 

1 

117 



m 

MEASQ 

1276 

29 

2 

542 

546 


m 

MODECAOR 

0733 

20 

8 

201 

202 ! 

LT5TNDX 

1216 

26 

3 

400 

409 

— 

m 

M(j2 

14,6341 

202 

1 

202 



m 

MODECHNg 

10,7456 

189 

2 

181 

185 

LUNDEB5T 

25*7174 

6^8 





m 

MGC 

1524 

30 

13 

370 

729 


m 

modeexit 

14,6020 

193 

6 

195 

224 

LUP 

5521 

66 

1 

66 



m 

MiD5 

3221 

547 

2 

287 

5l4 


m 

modegood 

14,6344 

202 

1 

202 


LV7STEMP 

05*7143 

260 

1 

258 




MI 06 

07*7422 

534 

2 

533 

536 


m 

modesamp 

10,6711 

176 

- 

- 

- 

LvDSRUpT 

2262 

173 

4 

172 

184 


m 

MIOEXlT 

1302 

24 

3 

326 

329 


m 

modeset 

4164 

41 

1 

41 


lvendmod 

14*6311 

201 

2 

201 



m 

MIOSIX 

3077 

523 

2 

523 

533 



modeslp 

14,6352 

202 

1 

202 


lvksamp 

10*7260 

182 

5 

180 

l84 


m 

MINRANGE 

25*7150 

647 

1 

646 



m 

mooreg 

0612 

17 

12 

122 

536 

LVOPTSMP 

10*7074 

179 

7 

177 

1 73 


m 

MINJS13 

5363 

62 

1 

97 



•r 

MODKOUT 

04*6653 

124 

1 

99 


LVwTLIST 

2076 

114 

1 

112 



m 

M1NJS140 

13*7l74 

263 

1 

261 



m 

MODROUTb 

04,6002 

99 

1 

529 


LXA 

03*6077 

7l 

1 

47 



m 

MINJSI 

4335 

45 

6 

37 

265 


m 

monitask 

32 f 6 0 6 6 

556 

2 

125 

554 

lxc 

03*6104 

7l 

I 

4? 



m 

MINJS2 

4340 

45 

5 

45 

265 


• 

monback 

07,7213 

523 

1 

523 










MINUS 

03*6035 

70 

2 

70 



» 

monbusy 

07* 7214 

523 

1 

522 


Ml 

1421 

29 

3 

723 

724 


m 

MISALIGN 

3 ^ 1 6 0 0 3 

426 

1 

439 



m 

mondel 

07,7161 

522 

1 

522 


MAKECADR 

5706 

291 

15 

123 

535 


m 

M15C2 

4135 

40 

1 

40 



m 

HONDO 

07,7162 

522 

1 

522 


MmKESERV 

32,7203 

579 

3 

579 

580 


m 

MlSCPROC 

4113 

40 

1 

39 



h 

MONITI 

0 7 f 7 1 0 ^ 

521 

• 

* 


makexsm 

21 *7445 

362 

4 

333 

435 


m 

M15CREU 

4143 

40 

1 

40 



m 

monitflg 

0032 

18 

1 

556 


MALAPROP 

05*7145 

264 

5 

259 

260 


m 

MiXAD 

07*6254 

501 

1 

501 



m 

MONI TJOb 

32,6074 

556 

3 

128 

550 

MALSJOB 

31 *7520 

753 






MIX3R 

0107 

15 

13 

498 

540 


m 

MONITMSk 

32,6072 

556 

- 

- 

— 

MANCDU 

10*7337 

185 

1 

181 



m 

Ml XCON 

05,7167 

540 

1 

540 



• 

monitor 

07,7102 

521 

7 

499 


MANIZD 

10*7350 

185 

1 

185 



m 

MIXNNl 

07*6229 

501 

1 

501 



» 

monmask 

07*7212 

523 

1 

522 



KEY: SYMBOLS DEFINED BY ECjJALS ARe FLAGGED =, OTHERS ARE NORMALLY DEFINED EXCEPT THOSE FLAGGED; 


u undefined 
N Nearly defined by 


F FAILED Leftover erase m multiply defined t wrong memory type mm multiple errors 

j failed leftover vi/oRo 0 oveRBIce- or ill-defined c lonfuct in Memory x misc, trouble 
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sYMboL Table listing* incljdino Pa^e number qf definition* and number of references with first and last page numbers 


symbol h 

Definition 

ReFeReN 

Ce3 F 

symbol h 

OeFINU ION 

References 

f 

m 

m 

symbol h 

Definition 

ReFeRENCeS 

F 

MuNREq 

07*7137 

522 

2 

521 

522 

nbresume 

2266 

119 

5 

36 

159 


m 

m 

NEGTESTS 

27,6353 

7I9 

2 

719 

720 


MuNSAVEl 

0626 

17 

8 

148 

5 3 4 

NBSMl 

22,6551 

465 

1 

465 



• 

NEGTHET 

1366 

29 



- 


MONSAVE 

0625 

17 

7 

148 

523 

NbSM2 

22,6530 

465 

1 

^65 



m 

negvx 

30,6533 

383 

1 

383 



MONT EM 

0066 

14 

- 

— 

* S 

nbsm 

22*6523 

465 

6 

359 

442 


m 

NEQRET 

4566 

49 

- 

* 



MURE 

21,6456 

3A3 

1 

343 


NbSMBl T 

0005 

18 

9 

354 

466 


m 

NEwAbORT 

3056 

295 

1 

295 



MOREZERO 

14^602^ 

193 


W 


NDl 

3230 

547 

4 

490 

529 


m 

NEWALARm 

3024 

293 

1 

293 



MQRNUM 

06*6206 

489 

2 

488 


ndxctr 

1224 

26 

32 

392 

44O 


m 

NEWALM2 

3035 

293 

1 

294 



MP + + 

11,6212 

268 

- 


««* 

NEARI/4 

30*7063 

736 

2 

702 




NEWBIAS 

30,6743 

390 

2 

390 



Mp + - 

11*621? 

268 

* 

— 


NeAR+MP 

26 • 6^ 1 1 

664 

I 

663 



m 

NEWULTAv 

1114 

23 

-i* 


- 


MPAC 

0115 

16 

535 

34 

757 

nearone 

30,7042 

736 

15 

382 

717 


■ 

NEWEQIND 

0066 

14 

17 

14 

387 

s 

MPACCOM 

A740 

53 

6 

60 

90 

NEGO 

5504 

65 

3 

172 

265 


■ 

newequn 

4005 

37 

3 

49 

52 


mpacrnd 

5072 

56 

1 

76 


MEG 13 

5363 

97 

2 

69 

74 


m 

NEWGYRO 

14,7533 

228 

2 

228 

234 


MPACSRl 

03,7300 

93 

2 

94 


NEG14 

5642 

69 

1 

723 



m 

NEwH I gh 

04,6102 

101 

1 

101 



mpagain 

11,7152 

279 

1 

280 


NEG180 

06,7114 

517 

1 

517 



m 

NEWJOB 

0215 

16 

28 

38 

403 


MPCHK 

11*6210 

268 




NEGl 

4335 

48 

B 

50 

551 

= 

m 

NEWMODt 

2362 

122 

43 

l69 

744 


MPHIGHl 

11*713A 

279 

1 

279 


NEGl/2 

4520 

48 

8 

80 

553 


m 

NEWNUV 

1122 

23 

« 

- 

- 

— 

MPHIGH2 

11*7172 

280 

1 

280 


NEGI/8 

27, 7202 

738 


- 

- 


m 

NEwPHASE 

2312 

120 

70 

337 

747 


MP- + 

11,6232 

268 


-p. 


NEGl/8+1 

30*6741 

390 

1 

390 



m 

NEWPRIO 

0577 

16 

1 1 

16 

109 


MP — 

11*6225 

268 

•P 



NEo2 

4340 

48 

5 

45 

231 

= 

m 

NEXTl 

27,6345 

718 

1 

718 



MPNMBRS 

11,7113 

279 

3 

278 

282 

N£o3 

4341 

45 

4 

104 

56B 


m 

next 

03,6341 

76 

1 

47 



MSIGN 

4563 

49 

1 

112 


NEG5 

07*6115 

498 

1 

498 



m 

nextchge 

13,7034 

262 

4 

262 



MTRxLDI 

12*7753 

425 

1 

421 


NEG7 

10,6705 

l76 

1 

176 



m 

NExTCOL 

23,7303 

321 

3 

321 

322 


MTRXLD 

3A,7741 

458 

1 

446 


negama 

31,7447 

715 

1 

711 



m 

nextcomp 

13,7007 

261 

1 

262 



MUE 

25*7375 

651 

5 

640 

650 

NLGARGU 

03,6740 

84 

1 

82 



m 

nextman 

33 1 66 1 3 

603 

1 

603 



MUEARTH 

30*77A7 

750 

1 

749 


NEGCDUl 

1565 

27 

4 

395 

396 


m 

nextrupt 

22,6113 

367 

- 

- 

- 


MUE (37) 

31,6310 

688 

1 

684 


NEGCDU2 

1566 

27 

7 

395 

396 

= 

m 

NINE 

3532 

626 

4 

335 

589 


MUE{AU 

25,7541 

656 

1 

640 


NtGC0M2 

I0,6l63 

I63 

1 

162 



m 

nineteen 

3543 

626 

3 

334 

567 


MULTEXIT 

3015 

2g3 

1 

293 


NEGCOM 

10,6641 

174 

1 

174 



m 

ninthou 

12,7746 

425 

2 

402 

419 


multfail 

3021 

293 

1 

293 


NEG3EC0N 

06,6220 

489 

1 

488 



m 

nnadtab 

05,7231 

541 

1 

540 



MUM 

25,7377 

651 

2 

648 

649 

negflag 

0047 

19 

8 

658 

665 

£ 

m 

nnadtem 

0054 

14 

7 

498 

540 


MU MOON 

30,7751 

750 

1 

749 


NEG30UT2 

10,7663 

232 

1 

232 



m 

NNICDU 

05,6ll3 

238 

1 

238 



MU/RSQ 

30,7731 

749 

1 

749 


negsout 

10,7650 

232 

1 

231 



m 

NImOCDU 

0 1? * 6 1 2 Z 

238 

1 

238 



MXVl 

5316 

6l 

1 

46 


NEG30UTS 

10,7537 

229 

1 

229 



m 

nntyptab 

05,7331 

542 

1 

54O 



MXV2 

5324 

61 

1 

61 


NEGIDEX 

4060 

38 

1 

38 



m 

nntyptem 

0055 

14 

5 

506 

540 

- 

myroti 

22,6320 

3 72 

1 

372 


NEG.2 

06*7126 

518 

1 

518 



m 

NODELTAv 

32,7703 

588 

1 

5B8 



MYRDT 

22 ,6312 

372 

2 

372 


NEG.5SEC 

21*7013 

351 

- 

- 

- 


m 

NUDISP 

33*6156 

592 

1 

592 



MYTEST 

22*6147 

370 




NEGMAX2 

10,7636 

232 

1 

232 



m 

NOFAIL 

10,6350 

167 

10 

166 









negdpt 

06,6670 

508 

1 

508 




NOGIMLOC 

2 5 , 6 0 6 7 

629 

1 

629 



N6CDURES 

25*6340 

637 


-p 

*«• 

NLGOUT 

30*6542 

383 

1 

383 



m 

nogimtst 

26 , 7400 

676 

1 

659 



nbiton 

21 *7l66 

355 

1 

354 


negpls 

12,7032 

408 

1 

407 



m 

NOgO 

04,6717 

140 

6 

1 4O 

1 46 


NBP05 

1231 

26 

11 

395 

446 s 

NEG02 

31*6202 

687 

2 

686 

68B 


m 

nogyroc 

L 0 f 67 ^ 1 

175 


- 

- 

• 

NBPOSPL 

34*7131 

4A6 

2 

4 00 


NEGSGN 

06*6302 

49O 

1 

486 



» 

NOGYROCM 

21,6451 

343 

1 

34O 



Nb RANCH 

23,7103 

316 

1 

315 


NEG51GN 

4500 

48 

5 

41 

386 

= 

m 

NQINH 

1 0 1 b42T 

169 

5 

168 




KeY; symbols DEFINED BY EQUALS ARE FLAGGED =, OTHERS ARe NORMALLY DEFINED EXCEPT THOSE FLAGGED; 


u Undefined 

N nearly defined by 


E FAILED leftover ER'VSE M MULTIPLY DEFINED 

J failed leftover word Q OVE^^StlZE- ON ILL-DEFINED 


T WRONG memory TYPE MM MULTIPLE ERNORS 

c conflict in Memory x misc. trouble 
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SYMBOL table LIStINO* InCLJDInO PauC nUMBeR dF DEFINITION* AND NUMBER pF REFERENCES WlyH FIRST AND LaSt PaGE NUMBERS 


SYMBOL H 

DeF INI T iON 

RePeRen 

CeS 

F 

m 

symbol h 

Definition 

RePeRences 

F 

m 

SYMBOL H 

Definition 

ReFeRENCeS f 

N0.05G 

27 t6S15 

721 

1 

721 



V 

m 

N/VCOM 

06,6266 

49 O 

1 

490 



m 

m 

OCT40020 


5070 

56 

1 

192 


NU.rtDS 


48 

3 

45 

48 


m 

NSHIFT 

1040 

22 

2 

746 

748 


m 

0CT50 

04 

7343 

150 

1 

I4l 


nokeybuf 

OA * 7371 

477 

- 

- 

- 


m 

nudeltat 

30,7520 

745 

1 

744 



m 

0CT60 

10 

7315 

183 

2 

103 


NUkILL 

11,7061 

278 

1 

278 



m 

NjLDNgDT 

13,6724 

138 

1 

136 



m 

0CT76 

14 

6747 

212 

1 

211 


NOLOAD 

03,6352 

76 

1 

47 



m 

NUM 

06,6072 

4 87 

9 

486 

487 


m 

0CT7?407 

10 

7407 

187 

1 

187 


NOMBURN 

31,6320 

689 

1 

684 



m 

NUMBOPT 

1273 

24 

1 - 

* 

• 

z. 

m 

OCT 7 7 

32 

7574 

586 


** 


NUMCASE 

32,7406 

583 

1 

582 



m 

numbtlmp 

1272 

24 

- 

• 

- 

= 

■ 

OCTBACK 

07 

7254 

525 

1 

528 


nomkacpt 

10,7003 

177 

1 

176 



m 

NUM0DE63 

30,7441 

744 

1 

133 



■ 

OCTIONV 

13 

7055 

262 

1 

262 


nomrkRS 

4473 

155 

2 

152 

153 


m 

NU/PIPOT 

30,7521 

745 

1 

744 



■ 

QCTNEG30 

31 

6304 

688 

1 

688 


NON INDEX 

4257 

44 

3 

3b 

4 3 


m 

NUV 

1007 

22 

2 

22 

321 


m 

0CTNEG6 

3l 

6305 

68B 

1 

688 


NONJUMP 

4433 

47 

1 

40 



m 

NVAl 

0577 

16 

6 

16 

115 



ofailset 

10 

7032 

178 

1 

178 


NONNWJOB 

10*6405 

168 

1 

168 



m 

NVCODE 

1301 

24 

- 

- 

- 


m 

ofailtst 

10 

7034 

178 

2 

178 


NOOP 

4713 

52 

I 

50 




NvSaCAOR 

0631 

17 

2 

533 



m 

OFCOUNT 

u 

6443 

272 

1 

27l 


NQOPCOMl 

10,7052 

178 

2 

178 



m 

NVSaENDL 

06,7447 

528 

1 

526 



m 

OFFMASK 

10 

6762 

177 

3 

18 1 

185 

NOOPCOM 

10, 7043 

178 

1 

177 



m 

NVSJBI 

07,7354 

533 

2 

497 

533 


m 

OFFMSK 

14 

6260 

200 

1 

200 


NOOPRSET 

10,7076 

179 

3 

178 

179 

- 

m 

NV5JB2 

07,7411 

534 

1 

534 




OGC 


1520 

30 

31 

251 

729 = 

NOOpTCDU 

10,6463 

170 

2 

171 




NvSJB 

3100 

533 

42 

210 

727 



ogczero 

12 

f33l 

4l6 

5 

393 

^56 

NOP L WAIT 

21,6236 

337 

3 

337 

754 


■ 

NVSJBANK 

3120 

533 

1 

533 



m 

OHWELL 

13 

70 10 

261 

2 

261 

262 

NORMBYE 

31,6254 

688 

1 

685 



m 

NV5JBB 

07,6000 

497 

I 

533 



m 

OLOBTl 


0755 


4 

222 

583 = 

NORMGAM 

1305 

25 

* 

- 

* 


m 

nvsjbcom 

3111 

535 

1 

533 



m 

OLDERR 


0726 


^34', 

cT^r 

5W 

N0RML1M5 

26,6200 

660 

3 

658 

667 


m 

NvSJBEND 

3125 

533 

4 

528 

534 


m 

OMEgA 

23 

,7466 

325 

i 

316 

NORMLISE 

30,7524 

746 


— 




nvsjbmon 

3121 

533 

3 

252 

523 


m 

OMEG/MS 

34 

.7732 

458 

2 

436 

460 

N0RMTE5T 

03,7370 

96 





m 

NVSJBSYI 

07,7456 

550 

1 

497 



m 

ONALARM 

10 

,7023 

178 

2 

178 


NOROOT 

31,6173 

687 

* 

- 



M 

nvsjbsyb 

07*6002 

497 

i 

550 



m 

ONE 


4516 

48 

229 

37 

756 = 

nostate 

24,6307 

610 

2 

328 

609 


■ 

NVSJBUSY 

3320 

550 

b 

210 

551 


m 

onetenth 

22 

,6146 

369 

1 

367 


NOT 179 

26,6032 

657 

1 

67 5 



11 

NVTEMP 

Olio 

15 

7 

212 

533 


m 

ONOK 

10 

*7041 

178 

1 

178 


NOTBIT 12 

06,6477 

493 

2 

492 



m 

nwalm 

10,6355 

168 

1 

164 




OPDEGIN 2 

06 

, n50 

5l8 

2 

518 


NOTEST 

26,6151 

659 

1 

659 



II 

NvJJDB 

10,6364 

168 

1 

168 



■ 

OPDEGOUT 

06 

*6653 

508 

1 

507 


notumask 

32,6335 

560 

1 

560 



m 

NwMASK 

10,7503 

189 

1 

168 



m 

OpOVF 


5777 

69 

10 

39 

96 

notumble 

24,6105 

561 

1 

561 



m 

NXTBNK 

11,6750 

276 

2 

276 

278 


m 

OP/INERT 

05 

*6105 

238 

3 

236 

250 

notumski 

24,6111 

561 

1 

561 











m 

OPTbITS 

10 

*6770 

177 

1 

176 


NOUN 

06,6274 

490 

1 

487 



m 

OBLATE 

23,6671 

312 

- 

• 



m 

OPTCADR 


0734 

20 

2 

149 

431 

NOUNAOD 

0624 

17 

37 

*♦98 

534 


m 

OCT00767 

10,7406 

187 

1 

187 



m 

OpTCFAIL 

10 

*7027 

178 

2 

177 


NUUNREG 

0603 

17 

13 

148 

540 


m 

OCT05000 

2143 

110 

- 

- 

- 

= 

a 

OPTCHK 

21 

*7252 

358 

1 

349 


NOUNTEM 

0064 

14 

3 

501 



m 

OCT 122 

10,7737 

234 

1 

234 



m 

optcoark 

05 

,6367 

248 

I 

237 


NOUT 

0707 

19 

11 

149 

496 


m 

OCT 14 

10*7335 

184 

3 

182 

183 


n 

OPTCOAKy 

05 

,6166 

248 

1 

248 

- 

NOUTCON 

04,7347 

150 

1 

149 



» 

OlT32 

06,6062 

467 

1 

487 



m 

optcodes 

10 

*7472 

189 

1 

175 


N0VAC2 

04,6027 

99 

2 

98 

101 


• 

0CT37440 

31,6303 

668 

1 

668 



m 

0PTC0MM2 

10 

,6764 

177 

2 

178 


N0VAC3 

04,6105 

101 

2 

99 

iOO 


« 

0CT37775 

10,7254 

182 

i 

179 



m 

0PTC0MM3 

10 

,7000 

177 

1 

17 7 


NOVAC 

2052 

98 

30 

IH 

731 


m 

0CT37776 

13,6663 

137 

1 

137 



m 

OPTCOMM 

10 

*6751 

177 

1 

177 


N0wAKE2 

0 ^ 1 6 1 0 0 

101 

1 

102 



m 

OCT40002 

4656 

51 

1 

161 



m 

QPTCTEST 

10 

*67 73 

177 

3 

177 


fJOWAKE 

0 4 * 6 1 4 3 

102 

2 

102 

104 


m 

OCT 4 OOO 3 

4650 

51 

I 

41 



m 

OPTDATA 

12 

,6004 

392 

1 

392 


NREAD 

12,6673 

404 


** 

• 


m 

OCT 4 OOIO 

04,7344 

150 

1 

140 



m 

OPTDEGIN 

06 

,7143 

518 

1 

516 



key; symbols defined by equals Are flagged =. OTHERS are MORMALLY defined except THOSE FLAGGED: 


u undefined 
N Nearly defined by = 


e failed Leftover erase 
j failed leftover word 


M multiply defined 
0 oversize- or ill-defined 


T wrong Memory type 
c iwONFLiCT in Memory 


MM multiple errors 

X MI SC. trouble 


1 


I 


I 
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SYMboL table LIStIN^3» InClJDInO PaGe NUMBlR dF DEFINITION* AND NUMBER OF REFERENClS WItH FIRST AND LAST PAGE NUMBERS 


symbol h 

Definition 

reFeRen 

CeS 

F 

m 

■1 

Symbol h 

Definition 

References 

f 

m 

SYMBOL H 

def ini t ion 

References 

F 

OFT1CS0 

06.6A75 

493 

1 

493 



m 

m 

P9' /16 

0009 

325 

1 

313 


z 

■ 

m 

P1PA5R 

30 

,7313 

791 

5 

338 

793 


OPT I NO 

0703 

19 

12 

147 

250 


m 

PAC 

1522 

30 

2 

973 

975 

» 

m 

PIPAX 


0049 

12 

1 7 

335 

791 

= 

OPTMASK 

10,7466 

189 

- 


- 



pacd/m 

23,796A 

325 

1 

316 



m 

PIPAY 


0095 

12 

19 

335 

791 

z 

optmodes 

04,7342 

150 

2 

140 

143 


m 

PACIFIC 

32*7336 

582 

1 

582 



m 

PIPAZ 


0096 

12 

10 

335 

791 

* 

OPTOUT 

10,6523 

171 

1 

171 



m 

PARTSLl 

03.6731 

89 

2 

80 

82 


m 

PIPCADZl 

21 

*6269 

338 

1 

33 7 



optsamp 

10,6734 

177 

2 

176 



m 

PASTEVB 

3071 

523 

1 

523 



m 

PIPCAD29 

29 

,6956 

622 

1 

620 



optstall 

14,6327 

202 

6 

247 

932 


m 

PA5TIT 

25,7110 

696 

1 

693 



m 

PIPCADR 

32 

,7259 

580 

1 

579 



OPTTEST 

10*6501 

171 

1 

164 



m 

PblASX 

0736 

21 

'Y 

£. 

21 

596 


m 

PIPCALC 

39 

, 7260 

450 

i 

996 



opttrkon 

05.6415 

249 

1 

249 


= 

m 

PBl ASY 

0740 

21 

1 

596 



m 

pIpCTR 


1919 

29 

7 

698 

731 

- 

OPTTRONK 

05*6407 

249 





m 

PBIASZ 

07 92 

21 

1 

596 



m 

PIPINDEX 


1221 

26 

19 

399 

923 


OPTX 

0052 

12 

5 

160 

545 


m 

PBDOY 

1037 

22 

1 

326 



m 

PIPJUMP 

19 

,7055 

215 

1 

220 



OPTY 

0053 

12 

5 

160 

545 


m 

pda 

0026 

976 

9 

975 


z 

m 

PIPNDX 


1226 

26 

a 

399 

995 

- 

OpTzERO 

05*6367 

247 

1 

24? 



m 

PHASCH2 

2321 

120 

1 

120 



m 

plpOyF 

19 

,7216 

220 

2 

219 



optzerok 

05*6361 

247 


* 

•• 


% 

PHASCHNG 

22 76 

120 

39 

335 

751 


m 

PIPSETUP 

27 

*7172 

731 

- 

- 

- 


OPTzTEST 

2756 

192 

1 

192 



m 

PHASDATA 

0601 

17 

6 

120 

121 



P1P5LECT 


1111 

369 

19 

366 

367 


order 

0063 

lA 

18 

14 

385 


m 

phasei 

0650 

19 

9 

120 

196 


m 

PIPTIME 


1969 

28 

16 

157 

751 


osamptem 

06 AO 

17 

12 

176 

179 


m 

PHASE2 

0651 

19 

1 

568 


z 

m 

PIPTST 

12 

*6725 

906 

- 

- 

- 


OUTO 

0010 

12 

2 

159 

1 7 3 

— 

m 

PHASE2A 

2505 

159 

1 

152 



m 

PIPUP 

27 

*6009 

698 

3 

579 

698 


OUTl 

0011 

12 

49 

140 

6 1 3 


m 

PHASE36A 

2517 

154 

2 

152 

153 


m 

PlTCHl 

32 

*6112 

556 

- 

- 

- 


0UT2 

0012 

12 

11 

163 

757 

z 

m 

PHASES 

0652 

19 

- 

- 

- 

* 

m 

PITCH 


1315 

31 

- 

- 

• 

= 

0UT2MA5K 

10.7465 

189 

1 

175 


- 

m 

PHASE4 

0653 

19 

• 


- 


m 

PITCHOT 

27 

*7196 

730 

1 

730 



0UT25UB 

10,6631 

174 

11 

171 

232 


m 

phases 

0654 

19 

2 

339 


z 

m 

PLFINCHK 

21 

*6721 

399 

1 

358 



OUTa 

0014 

12 

3 

154 



m 

phasesa 

2450 

152 

1 

152 



m 

PLOW 


1563 

27 

5 

289 

396 


OUT 

22*6257 

371 

1 

370 



m 

PHASE6 

0655 

19 

- 

- 

- 

= 

m 

plpipadt 

21 

*7011 

351 

1 

335 



OUTCRl 

0042 

12 

5 

163 

757 



phasebar 

0656 

19 

3 

19 

192 


m 

pLpRIO 

21 

*6712 

399 

- 

- 

- 


0UTCR1W2 

13*7322 

757 





m 

phasechk 

04,7091 

192 

3 

192 

193 


m 

plstchk 

2l 

*6706 

399 

* 

- 

- 


OUTCRIWT 

13.7310 

757 

10 

75A 

756 


m 

PHAsETAB 

0650 

19 

7 

19 

192 


m 

plusmp 

26 


663 

1 

66 3 



0UTCR2 

0043 

12 





m 

PhAsEXIT 

2333 

120 

1 

121 



m 

PLU5P0LE 

26 

*6075 

658 

1 

658 



OUTGYRI 

34 ,6640 

438 

1 

438 



m 

pHAzING 

1109 

369 

1 

366 



m 

PLUSXZ 

29 

*6963 

622 

3 

131 

621 


outgyr 

3^ f 663 3 

438 

5 

431 

956 


m 

PHI V 

1166 

29 

5 

320 

323 

z 

■ 

PLUSXOFF 

32 

*6663 

569 

2 

130 

569 


OVCON 

11,6000 

265 

1 

270 



m 

PIBJTOFF 

10,7331 

183 

1 

182 



• 

POINTl 

3 O 

,7223 

738 

1 

718 



OVCTR 

0034 

12 

69 

57 


z 

m 

PINTEST 

05,6000 

235 

- 

- 

- 

z 

m 

P0INT2 

3 O 

, 7235 

738 

1 

712 



OVER AD ay 

25.7506 

654 

1 

654 



m 

PIPI 

12,6155 

399 

2 

399 



m 

POINTS 

30 

* 7233 

738 

1 

712 



OVERNOUT 

27,7032 

727 

2 

721 

795 


m 

PIP2 

12, 6160 

399 

1 

399 




pointer 


0115 

136 

9 

135 

138 

- 

OVERYET 

26*6713 

668 

B 

663 

668 


m 

PIP2ADR 

12,6202 

399 

3 

399 



m 

POLISH 


0076 

1 4 

27 

38 

78 


OVFIND 

0122 

16 

23 

55 

719 


m 

PlPABiAS 

0736 

21 

1 

219 


- 

m 

POLY 


5559 

67 

5 

81 

382 


OvFSET 

04,6226 

105 

1 

105 



m 

PIPAFAIL 

10,6346 

1 66 

1 

166 



m 

pOLYCOEF 


1575 

31 

* 

— 

— 


OVRESUME 

2262 

119 

1 

173 



m 

PIPAGE 

1035 

22 

5 

337 

793 


m 

POLYEND 


1613 

31 



— 

• 

OVR JPT 

0031 

12 

3 

lie 

161 

z 

m 

PIPANO 

1222 

26 

6 

903 

909 


m 

POLYENT 1 

32 

*6295 

558 

1 

556 











PIPASCF 

0737 

21 

2 

219 

220 


m 

PQLYENTR 


1573 

31 

1 

558 



P 2 ' / 8 

0000 

325 

1 

312 


— 

■ 

PIPASCFX 

0737 

21 

2 

21 

596 


m 

POLYLUP 


5576 

68 

2 

67 

68 


P3 1 /4 

0002 

325 

2 

313 


- 

m 

PIPASCFY 

0791 

21 

1 

596 



m 

POLYORDR 


1579 

31 

1 

558 


= 

P3CADR 

27.6522 

722 

1 

722 



m 

PIPASCFZ 

0793 

21 

1 

596 



m 

POSl 

39 

,7050 

444 

5 

444 

446 



KEY; SYMBOLS DEFINED BY EQUALS ARE FLAGGED =• OTHERS ARE NORMALLY DEFINED EXCEPT THOSE FLAGGED: 


u undefined 
N nearly defined by 


E failed leftover erase M MULTIPLY DEFINED 

J failed leftover WO^O 0 OVERSIDE'’ OH ILL-D£FINED 


T wrong Memory type 

c CONFLICT IN Memory 


MM multiple errors 
X MI5C. trouble 
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SYMBOL table LISTiNGt InCLJDINC PaGE NUMBeR oF DEFINITION. AND NUMBER qF REFERENCES WijH FIRST AND LaSt PaGE NUMBERS 


symbol h 

Definition 

ReFeRen 

CeS f 

• 

a 

SYMBOL H 

Definition 

f^eFfRences 

F 

ft 

■ 

SYMBOL H 

OeF IN iTlON 

References f 

P051/16 

23,6307 

303 

1 

304 


m 

m 

preavgon 

24.6335 

611 

4 

129 

611 


■ 

ft 

PRI025 

2160 

no 

5 

I4l 

57 I 

F051/2 

A522 

48 

3 

48 

U2 

m 

PR E dang 

1106 

25 

2 

724 



ft 

PRI026 

2161 

no 

— 

- 

- 

POSl/A 

23,6303 

303 

1 

304 

* 

m 

PRE0ICT3 

27.6544 

723 

1 

722 



ft 

PRI027 

2162 

no 

4 

341 

697 

P052 

3A,705S 

444 

1 

444 


m 

prefinal 

27.6531 

722 

2 

710 

721 


ft 

PR 102 

4504 

no 

1 

277 

- 

P0S3 

3A,707S 

444 

1 

444 


m 

PREgBSY 

3310 

550 

21 

210 

453 


ft 

PR 1030 

2163 

no 

• 

>. 


P05A 

3A,7l21 

446 

1 

444 


m 

prehunt 

31.7515 

7l6 

1 

127 



ft 

PRI031 

2164 

no 

4 

353 

552 

P05C0M2 

1 0 , 6 1 66 

163 

1 

162 


m 

PKElALTS 

21.6211 

337 

3 

336 

338 


ft 

PRI032 

2165 

no 

4 

204 

29 I 

POSCOM 

1C,66AA 

174 

1 

174 



preldt 

21,7002 

351 

2 

336 

337 


ft 

PRI033 

2166 

no 

2 

255 

477 

POSGMBL 

12,6553 

400 

10 

421 

423 

m 

prelexit 

21,6746 

350 

7 

332 

349 


ft 

PRI034 

2167 

no 

— 

- 

• 

POSGN 

06 ,6316 

491 

1 

486 


m 

PRELTEMP 

1321 

29 

6 

335 

357 

•«4 

ft 

PRI035 

2170 

no 

7 

114 

622 

posgout 

10.76A0 

232 

1 

231 


m 

PRELTERi 

21.7032 

353 

1 

339 



ft 

PRI036 

2171 

no 

1 

168 


posgouts 

10,7523 

229 

1 

229 


m 

prelterm 

21.6242 

337 

2 

337 



ft 

PRI037 

2172 

no 

2 

l44 

293 

POSITON 

1223 

26 

15 

393 

444 = 

II 

PRELXGA 

1322 

29 

5 

334 

371 


ft 

PRI03 

2142 

no 

— 

- 

- 

PUSLOAD 

12,6050 

392 

1 

435 


m 

prelyga 

1323 

29 

1 

334 


s 

ft 

PRIOa 

4503 

no 

- 

- 

s 

POSMAX 

A A 76 

48 

29 

40 

752 

m 

PRElZGA 

1324 

29 

1 

334 


= 

ft 

PRI05 

2143 

no 

3 

no 

556 

POSMAxDp 

22,7175 

476 


— 

— 

m 

prenvbSy 

3315 

550 

35 

211 

430 


ft 

PRI06 

4373 

no 

1 

609 


POSNIO 

12,7732 

423 

1 

421 


m 

PRERECON 

10,7165 

IBI 

1 

181 



ft 

PRI07 

2144 

no 

2 

573 

574 

POSNll 

12,7735 

424 

1 

42 1 


m 

preround 

5442 

64 

2 

56 

63 


ft 

PRI0CH2 

04,6356 

109 

1 

109 


PUSNl 

12 ,75A2 

421 

1 

421 



prestano 

05,6545 

253 

1 

235 



ft 

PRIOCHNG 

2133 

109 

1 

no 


P0SN2 

12,7561 

421 

1 

421 


m 

PRESTBYl 

05.6561 

253 

1 

253 



ft 

PRIORITY 

0124 

16 

29 

99 

148 

P05N3 

12,7601 

422 

1 

421 


m 

PRESTBY2 

05.6577 

253 

1 

253 



ft 

priotab 

13,6002 

125 

2 

137 

138 

POSNA 

12,7616 

422 

1 

421 


m 

PRESTBY 

05.6552 

253 

1 

253 



ft 

PRLR5T0R 

21,7223 

356 

1 

339 


PU5N5 

12,7632 

422 

2 

421 

423 

m 

PREyTIME 

1370 

30 

6 

335 

353 


ft 

prlsave 

2l,7l74 

356 

1 

339 


P0SN6 

12,7647 

422 

2 

421 

424 

m 

PREXIT 

25.7050 

645 

1 

646 



ft 

PROCl 

21,7501 

36 3 

1 

363 


PUSNT 

12*7661 

423 

1 

421 


m 

PRoBIT 

4516 

123 

2 

123 



ft 

PROCTAR& 

21.7474 

363 

2 

359 

435 

PQSN8 

12,7677 

423 

1 

421 


m 

prgret 

04,6647 

123 

1 

123 



ft 

prog 

0573 

16 

1 

144 


P05N9 

12,7714 

423 

1 

421 


m 

PRGSLEEP 

04*6642 

123 

1 

123 



ft 

proglarm 

3036 

294 

2 

293 

295 

PUSNJUMP 

34,7037 

444 

1 

393 


m 

prgstall 

04 1 6624 

123 

- 

- 

- 


ft 

PROGON 

04*7154 

146 

1 

144 


posnretn 

12,6076 

393 

1 

444 


m 

PRG5W 

0017 

18 

- 

- 

- 


ft 

progreg 

0073 

14 

8 

529 

530 : 

POSPl 

26,6522 

665 

1 

665 


m 

PRiOlO 

4502 

no 

1 

569 


= 

ft 

PSIV 

1174 

24 

2 

320 

321 = 

POSPLS 

12,7024 

407 

1 

407 


m 

PR I Oil 

2145 

no 

- 

- 

- 


ft 

P T 1 / 1 6 

30,7241 

738 

2 

718 


pospolei 

26,6401 

663 

1 

663 


ft 

PR1012 

2146 

no 

7 

554 

622 


ft 

PTEMP 

1243 

25 

8 

356 

357 

POSPOLE 

26.6241 

661 

1 

66l 


m 

PKlOli 

2147 

no 

1 

605 



ft 

PTORQUE 

21,6371 

340 

- 

- 

- 

POSQUOT 

03.7130 

89 

2 

89 


il 

PRI014 

2150 

no 

4 

124 

744 


ft 

PTS 

1311 

26 

3 

426 

428 

POSSET 

12,7513 

421 

1 

447 


■ 

PRI015 

2151 

no 

2 

584 

731 


ft 

pTy+ERAS 

11,6103 

267 

- 

- 

— 

postand 

05,6652 

255 

1 

235 


m 

PRI016 

2152 

no 

2 

579 

698 


ft 

PULSEIMU 

30,6375 

379 

1 

438 


PQ5TBY1 

05. 6666 

255 

1 

256 


K 

PRIOIT 

2153 

no 

- 


- 


ft 

PUSHDOWN 

4317 

45 

1 

38 


P0STBY2 

05.6724 

255 

1 

255 


m 

PRIOI 

4505 

no 

- 

- 

- 


ft 

PUSHLOC 

0123 

16 

24 

45 

716 

P0STBY3 

05.6730 

256 

1 

255 


m 

PRI020 

4501 

no 

6 

124 

61B 

- 

ft 

PUSHUPl 

4326 

45 

3 

45 

73 

PUSTBY 

05.6657 

255 

1 

255 


m 

PR 1 021 

2154 

no 

i 

577 



ft 

pUSHUp2 

4353 

45 

1 

42 


POSTJUMP 

5720 

291 

29 

144 

751 

m 

PR1022 

2155 

no 

2 

559 



ft 

PU5HUP3 

4356 

45 

1 

44 


POSTRUE 

23.6472 

308 

1 

317 


m 

PR1023 

2156 

no 

1 

602 



ft 

PUSHUP 

4354 

45 

2 

42 

45 

PKAwAkE 

21.6270 

339 

2 

337 

351 

m 

PR 1024 

2157 

no 

2 

170 

260 


ft 

pushupok 

4345 

45 

2 

45 



KeY; symbols DEFINED BY EqJALS ARe FLAGGED =. OTHERS ARE NORMALLY DEFINED EXCePT THOSE FLAGGED; 


u Undefined 
N nearly defined by 


F FAILED Leftover erase m multiply defined t wrong memory type mm multiple errors 

j failed leftover word 0 oveRSUe- or ill-defined c gonflkt in memory X Misc, trouble 
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symbol table liStino. including Page number of definition^ and number of references with first and laSt Page numbers 


symbol h 

Definition 

ReFeRen 

ces 

F • 

symbol h 

Definition 

References 

F 


symbol h 

Definition 

References 

PUTADD 

O 7 t 6 34 0 

503 

3 

503 


m 

m 

R2D1 

3172 

547 

3 

491 

525 


■1 

m 

RE005. 10 

3 3 t (> 7 3 4 

606 

1 

132 


PUTC0M2 

O 7 ,70b3 

516 

4 

515 

5l7 

m 

R3DI 

3l73 

547 

4 

492 

5 O 2 



REDO 5 .I 3 

27,6011 

698 

1 

132 


PUTCOM 

7000 

515 

8 

512 

513 

■ 

R400K 

26,7705 

6Bl 

2 

69A 

695 


m 

RED05,20 

05,7150 

264 

1 

133 


PUT0C5F2 

07»7067 

516 

1 

5l6 


m 

R+VSCALE 

0026 

296 

1 

3 1 6 


= 

m 

REDOS , 23 

32,7551 

585 

2 

I 33 

586 

putdecsf 

07*7055 

5l6 

2 

515 

516 

m 

RANGER 

31*7247 

712 

1 

715 



m 

REDU5.24 

26,7744 

751 

1 

133 


PUTDPCOM 

07*7032 

515 

1 

516 



ravegon 

1214 

24 

11 

157 

6l0 


m 

REDO 5.2 

32,7157 

579 

1 

131 


PUTINLST 

07t7A52 

550 

2 

550 


m 

Rev 

1130 

23 

6 

298 

327 

z 


RE005.3 

32,7276 

581 

2 

131 

58l 

PUTNORM 

07,70a3 

516 

1 

515 


m 

ROOT 

1346 

29 

14 

7 00 

725 


m 

RE005,5 

33 *6014 

59 O 

1 

132 


PUTP05X 

3^ 1 6444 

433 

2 

393 

400 

m 

RUDTREF 

1625 

32 

4 

717 

718 


■ 

RED05,7 

33 ♦ 66 f 6 

605 

i 

132 


PUTSFNOR 

07*7066 

516 

1 

5 1 6 


m 

RE3.21 

21,6301 

339 

1 

339 



■ 

REDO 

05,6760 

257 

1 

257 


PUTXY 

07*6630 

512 

* 

• 


m 

RL5.23 

32,7321 

5ei 

i 

506 



■ 

redocntr 

1075 

22 

4 

140 

158 

PUTXYZ 

07*6577 

512 

* 


— 

m 

RE 

25,7162 

647 


« 

• 


0 

REDOSPSl 

1724 

33 

1 

621 








m 

READACCS 

32, n52 

579 

6 

338 

697 


m 

redotime 

1076 

22 

1 

149 


Q2 

30,7073 

736 

1 

712 


m 

READLOOp 

14,6570 

208 

1 

208 



m 

reentabs 

05 ,6342 

245 

1 

245 


Q2R00T 

3l *6l77 

687 

2 

686 


m 

readmask 

4504 

580 


** 



m 

REENTK2 

05,6330 

245 

2 

245 


Q3 

30,7075 

736 

1 

712 



READPIPS 

30,6345 

379 

1 

456 



m 

REFAZElO 

27 ,6l74 

7 O 2 

2 

133 

705 

QS 

30,7077 

736 

1 

713 


m 

RbAoTIME 

2676 

191 

12 

130 

741 


m 

refazea 

27,6052 

699 

1 

133 


Q6 

30,7101 

736 

1 

713 



RtCALl 

06,7606 

536 

2 

536 



m 

REFAZE6 

30 , jbZQ 

748 

5 

131 

748 

Q7 

1326 

28 

9 

7 O 9 

721 

Z M 

RECAL2 

06,7617 

536 

2 

537 



m 

REFAZE8 

27,6057 

699 

1 

133 


Q7F 

30,7103 

736 

1 

709 


m 

RECAL3 

06,7624 

537 

1 

536 



m 

REFRCV 

1015 

22 

1 

22 


Q7MIN 

30,7237 

738 

1 

718 



RECALL 

0116 

136 

6 

135 

138 

- 

m 

refrrect 

0765 

22 

2 

22 


Q 

0001 

12 

328 

35 

757 


RECALTST 

06*7600 

536 

2 

514 

530 



refsmmat 

1051 

22 

17 

327 

753 

qadrs 

0115 

34 

8 

265 

284 


RECDARSD 

14,6114 

195 

1 

196 




refswtch 

1723 

33 

1 

684 


QENOTEST 

13*7307 

756 

- 

- 

» 


RECDNCIL 

10,7174 

181 

1 

182 




REFTC 

1031 

22 

2 

22 


QPLAC 

1310 

26 

6 

411 

415 


REC3NLUP 

10,7243 

182 

I 

181 




refvcv 

1023 

22 

3 

22 


QPLACE 

1225 

26 

17 

257 

420 

? * 

RECONTRk 

10,7057 

179 

1 

166 



m 

REFvRECT 

0773 

22 

2 

22 


QPRET 

0052 

13 

10 

69 

211 

= m 

RECTIFY 

23,Tl43 

319 

2 

317 

329 



refxkep 

1035 

22 

1 

22 


QRUPT 

0027 

12 

7 

35 

119 

m ^ 

R£0D3,13 

33,7330 

619 

1 

127 



m 

regdiff 

10,6515 

171 

1 

l7l 


QTSKIO 

13*734A 

758 

1 

756 


» 

RE0D3,20 

21,6216 

337 

1 

127 



m 

regrupt 

2642 

159 

2 

159 


QT5<2 

13,7332 

758 

1 

754 


m 

RED33.21 

21,6265 

339 

2 

127 



m 

REgSLE^-P 

14,7531 

228 

2 

228 


QT5<3 

13,7333 

750 

1 

755 



RtD33.3 

32,6771 

572 

1 

126 




regstep 

32,7301 

581 

3 

75l 

752 


13,733A 

758 

2 

755 

758 

m 

REDD4, 10 

32,7045 

573 

1 

129 



m 

RE-ENTER 

47 O 3 

52 

25 

70 

728 

'QT5<ADEL 

13*7345 

758 

1 

758 


m 

REDD4.13 

32 1 67 6 1 

572 

1 

129 




REJECT2 

14* 66 1 6 

209 

1 

209 


Q rs<6 

13,7340 

758 

1 

756 


m 

RE0D4.14 

32,7062 

573 

1 

129 



m 

rejects 

14 *66^7 

209 

1 

209 


QT 5K6DEL 

13,7346 

750 

1 

758 



RE0D4, 16 

32^6^40 

564 

1 

129 



m 

RELAYOFF 

3405 

624 

15 

259 

721 

0T5K7 

13,7342 

758 

i 

756 


li 

REDD4,1 

33,6202 

593 

1 

120 



m 

relayon 

3373 

624 

14 

259 

721 

otskb 

13*7343 

758 

1 

756 


m 

RED04,21 

32,6423 

564 

2 

I 3 O 

571 


m 

RELDSPl 

3356 

551 

2 

521 

537 

qtsxloop 

13,7277 

756 

1 

756 


■ 

RED04.22 

32 1 665 4 

569 

1 

130 




RELDSP2 

3351 

551 

4 

551 


QT SN45 

22,7l67 

476 

1 

46 3 



RE0D4,29 

24*6263 

610 

1 

131 



m 

RELDSP 

3323 

551 

5 

499 

53 O 

quarter 

4502 

48 

6 

82 

398 


R£0D4,3l 

32,6062 

554 

1 

131 



m 

RELD5P0N 

3250 

548 

4 

523 

727 







m 

RbDD4.32 

32,6054 

554 

1 

131 



m 

RELINT 

0016 

12 

5 

270 

277 

RlDl 

3171 

547 

9 

49 I 

5 32 

m 

RE004.3 

32,7022 

573 

1 

128 



m 

RELO/Ik. 

05 , 6444 

250 

1 

235 


R280K 

26,7703 

680 

1 

684 


m 

RED34,9 

24 ,6322 

611 

1 

129 



m 

RELRET 

0113 

15 

3 

55 1 



key; symbols Defined by equals are flagged =• others are normally defined except those flagged; 


u Undefined 
N nearly defined by = 


E FAILED Leftover erase 
j failed leftover WuRO 


M multiply defined 

0 oversize- or ILL-DEFINED 


T wrong Memory type 
c CONFLICT IN Memory 


MM multiple errors 
X MISC, trouble 
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SYMboL table LiSTINto* Ifs|CLJDlN<3 PA^t nUMBeR DF DEFINITION? AND NOMbER of' REFERENCES WIjH FIRST ANO LaSt PaGE NUMBERS 


symbol h 

DeF INI t Ion 

ReFeRen 

CeS F 

■ 

SYMBOL H 

def 1 Ni t Ion 

reFeRences 

F 

m 

m 

symbol h 

OeF inition 

reFeRlncfS 

F 

RELTABll 


2665 

159 

3 

172 


mm 

m 

RtSJLTCT 

1224 

26 

16 

26 

455 

£ 

w 

m 

rteast 

1122 

25 

2 

654 


— 

rlltab 


2652 

159 

4 

17 3 

525 

m 

RESJLT5 

34,7207 

448 

2 

405 

420 


m 

RTERM 

0016 

684 

2 

684 

685 

z 

RELTEST 


A517 

48 

3 

40 


m 

RbSjME 

2264 

119 

9 

154 

479 


m 

RTINIT 

1114 

25 

8 

555 

745 

z 

reltqvac 


4361 

45 

3 

43 

44 

m 

RETAA 

1573 

27 

16 

412 

455 


■ 

RTNORM 

1130 

25 

2 

654 


z 

relvelsw 


0007 

18 

3 

700 

704 = 

m 

RLTADR 

12,7472 

420 

I 

420 



m 

RTPACIFl 

1631 

28 

1 

555 


z 

REMKOSP 

I ^ 

*6653 

210 

1 

210 


m 

RET3B 

1574 

27 

2 

411 


* 

m 

RTPACIFC 

1590 

28 

2 

555 

582 

z 

REMKVBSl 

lA 

*6755 

212 

2 

209 

249 

m 

RtTHERE 

12,7501 

420 

1 

420 



m 

RTRNSLUN 

1322 

27 

2 

650 


* 

REPCADR 

12 

*7466 

419 

2 

419 


m 

RLTPLS 

12,7A73 

4^0 

1 

419 



m 

RUN 

1312 

26 

5 

426 

428 

z 

REPEATI 

25 

*6042 

628 

1 

629 


m 

RETRN 

03,6416 

77 

1 

77 




ruptagn 

0571 

16 

6 

16 

119 


REPEAT2 

33 

*6307 

595 

1 

595 


m 

REZFINE 

14,6056 

194 

1 

194 



m 

RUPTCHK 

11*6325 

270 

2 

270 



REPEET 

12 

*7451 

419 

1 

420 


m 

R 1 GhT 5 

3174 

547 

5 

5l4 

533 


m 

RUPTREGl 

0637 

17 

l9 

17 

292 


REPIPl 

30 

* ^324 

741 

1 

743 


m 

RIG-4SEC 

1230 

24 

2 

330 

606 

- 

m 

RUPTREG2 

0640 

17 

24 

17 

292 


RtPIPlB 

30 

*7335 

741 

1 

743 


m 

rigntion 

1100 

23 

2 

329 

607 

z. 

m 

RUPTREG3 

0641 

17 

11 

207 

292 


REPIP21 

21 

1 626 5 

338 

1 

338 


m 

RiNTALT 

25,7130 

647 

4 

64 1 

6^3 


m 

RUPTREG4 

0642 

17 

8 

120 

477 


RLPIP2 

30 

*7337 

74l 

1 

743 


m 

RMAG 

1023 

22 

12 

640 

748 

= 


RUPT5T0R 

0572 

16 

41 

136 

74l 

z 

REPIP2B 

30 

*7343 

74l 

1 

743 


m 

rmagsq 

1025 

22 

4 

640 

749 

= 

m 

RVH 

25*7164 

647 

1 

645 



REPIP3 

30 

*7345 

741 

1 

743 


m 

RNl 

127 7 

26 

3 

747 

751 

z 

m 

rvtoave 

30*6153 

329 

2 

329 

330 


REPIP3B 

30 

.7351 

741 

1 

743 


m 

RN 

0765 

22 

28 

158 

748 

z 

m 

RVTOMID 

30*6051 

327 

1 

327 



REPIPA 

30 

*7353 

741 

3 

743 


m 

ROLL 

1314 

31 

1 

542 











REPIPASR 

30 

* 7364 

743 

3 

338 

698 

m 

rollbias 

1352 

29 

b 

727 

744 

z 

m 

SI 

0050 

13 

21 

309 

677 


RtPIPCAD 

32 

*7255 

580 

1 

580 


m 

rollc 

1472 

28 

5 

620 

739 

z 

m 

32 

0051 

13 

29 

311 

747 

= 

REPIPUP 

27 

,6001 

696 

7 

132 

133 

m 

ROLLCTEM 

0016 

740 

3 

729 

739 

z 

m 

S25riITCH 

1722 

33 

1 

584 



REPLII 

21 

* 6 142 

335 

1 

127 


m 

rulldth 

1614 

31 


- 

- 

z 

m 

S4BSCAN 

10,6463 

170 

6 

I6B 

171 


REPH2 

21 

,6151 

335 

1 

127 


m 

roller 

32,6154 

557 

- 

" 

- 


m 

54BSMFLG 

0030 

18 

- 

- 

- 


REPMAL 

12 

,7467 

4i9 

1 

419 


m 

ROLLEXIT 

33*5357 

596 

1 

596 



m 

S4BSMSEP 

32,6336 

563 

3 

170 

697 


REPRELAL 

21 

,6262 

338 

2 

12 f 


m 

RQLLFLAg 

0044 

18 

3 

601 

673 

= 

m 

5 

1432 

28 

3 

650 

651 


REOADDi 

07 

,6067 

498 

1 

498 


m 

ROLLJOB 

33,6322 

596 

1 

569 



m 

SAC 

1520 

30 

2 

473 

475 

= 

REOCOM 

07 

,6307 

502 

2 

502 


M 

rolltask 

32,6645 

569 

4 

568 

569 


m 

SALLOW 

11 , 7076 

278 

1 

278 



REODATX 

07 

,6274 

502 

3 

512 

513 

m 

R0LLTE5T 

26,7237 

673 

2 

659 

673 


m 

SAMPTIME 

0643 

17 

4 

191 

546 


REODATY 

07 

1 6300 

502 

3 

512 

513 

m 

RQDT 2/4 

12,7754 

425 

3 

423 



m 

SAVE 

1562 

27 

3 

395 

396 

= 

REQOATZ 

07 

,6304 

502 

3 

498 

513 

m 

KOPECHK 

11,6646 

275 

2 

274 

278 


m 

sbitmask 

03,7210 

91 

1 

78 



REoexi 

07 

*7331 

529 

1 

529 


m 

rqtlmv 

1202 

24 

- 

- 

- 


m 

SbUSY 

11,7100 

278 

1 

278 



REOEXLOC 

07 

,6170 

499 



— 

m 

ROTXY 

21*7105 

354 

1 

355 



m 

SCADR 

11,6010 

265 

1 

278 



REQMM 

07 

,7306 

529 

1 

528 


m 

ROJMO 


64 

2 

63 



m 

SCALDELT 

1311 

25 

2 

308 

326 


REORET 


0613 

17 

l4 

148 

535 

m 

RPIP 

0765 

22 

- 

- 

- 


m 

SCALEA 

1306 

25 

2 

308 

310 

= 

REREADAC 

32 

*7226 

560 

8 

131 

133 

m 

RRECCMEM 

1655 

33 

4 

606 

610 


m 

SCALEB 

1307 

25 

4 

30a 

311 


RE5ET1 

32 

,6325 

560 

3 

559 

560 

m 

rrect 

1100 

23 

20 

158 

610 

- 

m 

scaledt 

1310 

25 

1 

326 



resetm 

22 

,6250 

371 

1 

371 


m 

RSCALE 

0020 

296 

15 

308 

610 

z 

m 

SCALEpOp 

27,6060 

700 

- 

- 

• 


RESETO 

22 

^6243 

371 

1 

3/1 


m 

RbTFAlL2 

04*7l75 

1 46 

2 

144 

146 


m 

scaler 

1312 

25 

2 

30a 

326 


restarts 

13 

,6563 

135 

5 

150 


m 

RT 

1214 

25 

4 

654 

745 


m 

scalftr 

34*7734 

458 

1 

438 



RE5T0REI 

12 

,6676 

404 

8 

403 


m 

rtarg 

1432 

27 

3 

643 

644 

z 

m 

SCCHK 

11*6155 

267 

- 

• 

— 


RESTORE 

12 

,6700 

404 

2 

404 


m 

RT ATLANl 

1621 

28 

I 

555 



m 

SCLRAvMD 

25,7521 

656 

1 

327 



REST0R5R 

OA 

,7466 

479 

2 

478 

479 

4 

RI ATLANT 

1530 

28 


555 

643 

z 

m 

sclkmdav 

25,7523 

656 

3 

329 

330 



key: symbols Defined by equals are flagged =• others are noR''1ally defined except those flagged; 


u undefined 
N nearly defined by 


F failed leftover erase M multiply defined T rtRONG MEMORY TYPE MM MULTIPLE ERRORS 

j Failed leftover wqro o oversize- or ill-defined c lonflict in memory x misc, trouble 
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SYMBOL table LIStINCj. INCLUDING P(^Ge nUMBeR OF DEFINlTlUNt AND NUMBER oF REFERENCES WITH FIRST AND LaSt PAGE NUMBERS 


SYMBOL H 

DeF ini t I on 

ReFeRENCeS 

F 

Symbol h 

Definition 

reFeRences f 

• SYMBOL H 

DeF INI t Ion 

reFerenCeS 

F 

scltavmd 

25t7525 

656 


a 



SETGPAST 

27,6675 

725 

1 

723 


■ SF TEMPI 

Olio 

15 

21 

501 

54l 

- 

SCLVAVMD 

25*752T 

656 

- 

*• 

• 


SETHETAD 

3516 

625 

A 

55A 

613 

■ SFTEMP2 

0111 

15 

16 

505 

54l 

— 

sclvmdav 

25*7531 

656 

- 

- 

• 


SET<ANDC 

IA,62A5 

200 

12 

193 

199 

• SFTSTIN 

12,65X3 

AOO 

1 

A02 



SCNeAZ 

3A,7670 

A5e 

1 

A *»6 



SETlIFT 

32,6022 

553 

2 

553 


■ SoFORCE 

03,7175 

91 

1 

90 



scnbmat 

26,7606 

679 

2 

333 



sltmanu 

33 , 65 A 3 

602 

1 

602 


■ SGN=0 

03,7165 

90 

1 

90 



SCNBVER 

3A,7710 

A58 

1 

A A 6 



SETmINO 

30,7023 

70A 

1 

701 


* 5GN s + 

03,7172 

90 

1 

90 



SCONO 

5501 

265 

6 

270 

2 7 f 

- 

SETMM23 

2A,6316 

611 

1 

611 


• 56NAGREE 

30,6A03 

380 

8 

328 

556 


SCONl 

A516 

265 

17 

265 

2 b 2 


SETM0D23 

32,7070 

57A 

3 

126 

573 

• sgnatan 

00 72 

690 

7 

687 

69 I 

* 

5C0N1/2 

ASOl 

265 

2 

267 

2bl 


setmultf 

305A 

295 

1 

295 


■ SGNCOM 

06,6332 

A91 

1 

A 9 I 



SCONl/A 

A502 

265 

2 

269 

280 


SETNJ 

0 A , 6 2 A 5 

105 

1 

108 


• sgndmax 

0101 

15 

5 

90 

9l 


5C0N2 

A515 

265 

7 

266 

276 


5ETN0RM 

03*7335 

9 A 

2 

9A 

95 

■ sgnoff 

0110 

15 

3 

A91 


= 

SC0N3/8 

11,6557 

273 

A 

269 

2bi 


SETDUT2 

10,66A7 

175 

1 

17A 


« sgnon 

006A 

lA 

3 

Agl 



5C0NA 

ASIA 

265 

1 

26B 



SETPD16 

26,7636 

679 

A 

680 


■ 5GNTAB 

06,635A 

A9l 

2 

A 9 I 



SC0N64 

A510 

265 

1 

267 



SETPDle 

26,76AA 

680 

2 

660 

663 

■ sgntheta 

IA2A 

27 

I 

651 


• 

SCON+MAX 

AA76 

265 

20 

268 

261 


SET PD 20 

26,7650 

600 

2 

662 

669 

• SGNTOl 

06,7116 

517 

1 

517 



SCON-1 

A335 

265 

3 

273 

280 


SETpDZS 

26,76A6 

680 

1 

667 


• SgNTSTI 

0 6 , 6 3 7 A 

A92 

3 

A 9 I 

492 


SCON-2 

A3 aO 

265 

2 

268 


* 

SETPD6 

26,76A2 

680 

1 

666 


• shiftl 

03,6A02 

77 

1 

A6 



SCON-3/8 

11,6560 

273 

A 

269 

280 


SETPOS 

30,6621 

386 

2 

386 


• SHIFTRI 

5075 

56 

3 

A6 

7 I 


SCONMAX 

550A 

265 

3 

271 

27:> 


setsasep 

32*6363 

563 

2 

129 

563 

• SHIFTR 

03,6233 

7A 

3 

56 

97 


5C0NSU 

11,6A21 

271 

1 

269 



SETSEp 

33,7211 

616 

1 

6 1 A 


■ SHINDIRT 

13,6720 

138 

1 

138 



SC0NT5 

11,6376 

271 

1 

270 



settgo 

33,6l72 

592 

1 

591 


* SHORTMPz 

5A22 

6A 

1 

382 



5C0UNT 

1766 

3A 

8 

271 

282 


5ETJMB2 

32,6A62 

565 

1 

563 


• SHOHTMP 

5Al6 

6A 

10 

7A 

687 


SCOUTEND 

06,6750 

510 

A 

509 

510 


SETjPENT 

32,7212 

579 

1 

579 


■ SHOT I ME 

3372 

552 

1 

552 



SCRINTP 

3A,7532 

A55 

1 

A20 



setjpsok 

32,7215 

580 

1 

579 


■ 5H0W1 

12*7207 

A12 

1 

A12 



SCRTEST 

12,7A16 

A19 

1 

A06 



SET JPSUb 

10,7704 

23A 

A 

229 

231 

• SHOW 

12,7205 

Al2 

A 

400 

453 


5CTMARK 

1A,6A06 

210 




= 

SfcTVAC 

07,73AO 

529 

L 

529 


• SHOWED 

12,7226 

Al2 

2 

400 

412 


SDISPLAY 

11,7037 

278 

2 

265 

2 76 


SETwARN 

26,6367 

663 

- 

- 

- 

• SHOwSUM 

11,7025 

277 

2 

257 

277 


5ELFERAS 

1760 

3A 

— 

• 

— 


SETWINT 

23*7330 

322 

1 

322 


■ shtunflg 

002A 

16 

1 

599 



SEMILAT 

1552 

28 

3 

6A0 



SETZLIT 

27A3 

192 

5 

179 

195 

• SHTDNMSk 

A503 

570 

- 

- 

- 


5EPMANU 

33,722A 

617 

1 

616 



SEVEN 

5362 

62 

16 

95 

756 

■ shtflgup 

32,75A6 

585 

1 

585 



5E0 

5500 

65 

A 

66 



SEVENTN 

35A1 

626 

1 

623 


■ SHUTASX 

33,7205 

6l5 

1 

bl5 



sequence 

27,6177 

703 

• 

— 

• 


SFAIL 

176A 

3A 

5 

lAl 

A93 s 

* SHUTDOWN 

33,7037 

613 

3 

585 

589 


SERvlCER 

32 » 7262 

581 

1 

579 



SFCALC 

3A,7213 

AA8 

- 

- 

- 

■ shutdwni 

32,75AI 

585 

1 

585 



5ET15D 

26,63A0 

662 

1 

662 



SFCDNUM 

07,6756 

51A 

2 

507 

516 

• SHUT0WN3 

32,7717 

589 

2 

588 

593 


5ET2.5S 

32,723A 

580 

1 

580 



SFINTABI 

05,7A3l 

5AA 

1 

5A1 


■ SHUTDwNA 

32,7735 

589 

1 

589 



SET32 

32,7A77 

58A 

2 

58A 



SFl NTAB2 

05,7AA6 

5^A 

1 

5A1 


• SHUTUObl 

33,7126 

6 1 A 

2 

61A 

616 


SETABORT 

32,6A2 7 

56A 

1 

56A 



SFINTABR 

07,7072 

516 

1 

516 


• shutjob 

33,7060 

613 

1 

126 



5ETATTC 

33,7215 

616 

1 

61A 



SFOJTABI 

05,7A63 

5 AA 

1 

5AL 


■ SIDEDAYS 

21 *7020 

351 

— 

• 



setaug 

06,6700 

509 

1 

508 



SF3jTAB2 

05,7500 

5A5 

1 

5Al 


• SIGN 

03,6213 

73 

1 

46 



SETBRNSW 

3 50 A 

625 

12 

56A 

621 


SFDUTABR 

07,655A 

507 

1 

507 


■ SIGNFIX 

06,7100 

517 

2 

b 17 



5ETC 

10,7203 

iBl 

2 

I8l 

185 


SFRET 

07,6771 

515 

1 

515 


• signmpac 

30,6606 

386 

3 

719 

7AA 


SLTCOARS 

10»7lAl 

181 

1 

182 



SFRJTMIX 

0 7 , 67 A6 

5 lA 

3 

507 

516 

• SIGNRET 

0073 

lA 

5 

491 

A92 

5 

sltdth 

33,6520 

601 

2 

601 



SFRJTNOR 

07,67A0 

51A 

A 

506 

5l6 

« signtest 

06,6357 

A9l 

2 

49 O 

49 I 



KeY: symbols defined by equals are flagged =• others are normally defined except those flagged: 


u undefined 
N nearly defined by = 


E failed leftover ERASE 
J failed leftover word 


M MULTIPLY Defined 
0 OVEPSI^l- UR ill-defined 


T wrong memory type 
c conflict in Memory 


MM multiple errors 
X Ml sc. trouble 
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SYMBOL table LISTING* INCLJDING Page NUMBeR OF DEFINITION! AND NUMBER qF REFERENCES WITH FIRST AND UaSt PAGE NUMBERS 


symbol h 

Def Ini tIon 

ReFeRen 

ClS 

F 

m 

m 

Symbol h 

Definition 

References 

F 

■ 

SYMBOL H 

Definition 

References 

Si Ml 

03i6620 

81 

1 

47 



■ 

« 

SMOOTHER 

27 

*7176 

731 

1 

731 



'iv 

11 

SP53TEST 

32*7050 

573 

1 

573 


S1N30 

26i756A 

679 

- 

- 


s 

• 

SMOvE 

03 

,6336 

76 

1 

47 



m 

SPS4FLAG 

0051 

19 




SIN33 

25*6236 

634 

5 

596 

634 


■ 

5Nl 

03 

,6570 

81 

1 

80 



m 

5PS4MASK 

32,7066 

573 


• 


51N60 

33 •725A 

617 

1 

617 



m 

snapout 

33 

*6430 

596 

i 

601 



m 

SPTEMl 

0072 

690 

1 

690 


sinaz 

0002 

332 

5 

339 

346 


m 

50A<ExIT 

33 

,7030 

608 

1 

606 



m 

SpTEM2 

0073 

690 

3 

690 

69l 

S INBLANK 

06*6612 

495 

1 

495 



m 

soakflag 


0023 

18 

— 


— 

• 

m 

SPTEMQ 

0071 

690 

1 

690 


SINCOU 

1330 

27 

l 8 

56l 

53? 


m 

5UA<INI T 

33 

*6621 

604 

2 

125 

576 


m 

SPTW 

14,7407 

225 

I 

225 


SI NCOS 

25*60A0 

628 

2 

561 

604 


m 

SOA<JOB 

33 

*6713 

606 

2 

132 

605 


m 

SURT2 

03,7320 

94 

2 

83 

97 

SINDIR 

13*666A 

137 

1 

135 



m 

SUA<TA5k 

33 

*6657 

605 

1 

580 



m 

SQRT3 

03,7322 

94 

3 

75 

687 

SINE 

03*65A2 

80 

2 

80 

Bl 


m 

SUA<TSK1 

33 

*6666 

605 

4 

132 

605 


m 

SQRTDIV 

03,7033 

87 

1 

96 


SI ML am 

00A2 

332 

2 

339 

34h 

— 

m 

S0ME5UN 

26 

,6510 

665 

1 

665 



m 

SURTMU/R 

25,7200 

6 A 8 

1 

648 


51NTH 

0022 

476 

11 

461 

4 75 



50PTI0N1 

11 

*6410 

271 

1 

271 



m 

SQRTNOKM 

03*7361 

95 

2 

94 

96 

sitenumb 

1300 

24 

- 

- 

— 


% 

S0PTIUN2 

11 

,6610 

274 


- 

- 


m 

SORTS 

03,7453 

97 

1 

47 


SIX 

AA75 

48 

23 

61 

6 bO 



SUPTI0N3 

11 

*7372 

282 

2 

276 

282 



SQUARE 

03,6323 

76 

1 

47 


sixhndrd 

3571 

627 

1 

334 



m 

50PTI0N 

11 

,6743 

276 

1 

276 



m 

SR14 

03,6251 

74 

2 

74 


SI XTN 

3540 

626 

1 

679 



m 

SPAPCTAN 

31 

,6323 

690 

1 

687 



m 

SRI 

03,7301 

93 

3 

75 


SIXTY 

3563 

626 

1 

626 



m 

SPATANl 

31 

,6355 

690 

1 

690 



m 

SR 

0021 

12 

31 

43 

69l 

SIZETAB 

13*6555 

134 

1 

135 



m 

SPATAN2 

31 

,6367 

69i 

1 

690 




SRGHT5 

04,7472 

479 

2 

478 


SKEEPl 

1771 

34 

57 

265 

2 b 1 


m 

SPATAN3 

31 

,6371 

691 

1 

691 



m 

5RRUPT 

0574 

16 

- 

- 

- 

SKEEP 2 

1772 

3A 

26 

267 

281 

5 

m 

5PATAN4 

31 

,643A 

691 

2 

690 



m 

SRTEST 

03,7346 

94 

1 

94 


SKEEP3 

1773 

34 

20 

267 

281 



SPATAN5 

31 

,6401 

69l 

1 

69l 



• 

SSM 

03,6312 

75 

> 

— 

- 

5KEEPA 

177A 

34 

21 

267 

282 

= 

m 

SPATANQ 


0071 

690 

4 

690 

691 


• 

5SP 

03,6316 

75 

1 

4 7 


SKEEP5 

1775 

34 

22 

267 

282 



spgyrex 

14 

,7372 

224 

1 

225 



■ 

SSTORE 

03,6064 

71 


« 

- 

SKEeP 6 

1776 

3A 

7 

267 

276 

5 

m 

SPIT6YR0 

21 

,6442 

341 

2 

3Al 

353 


■ 

STAR 

1416 

30 

3 

473 

475 

SKEEP7 

1777 

34 

13 

272 

282 


m 

SPLITI 

26 

,7501 

677 

1 

677 



m 

starad 

1402 

30 

32 

359 

472 

SLl 

03*6364 

77 

11 

77 

519 


m 

5PL1T2 

26 

,7444 

677 

1 

677 



1 

STARM 

0040 

476 

9 

359 

47 O 

SL 

0023 

12 

4 

41 

27<* 

s 

m 

SPLIT3 

26 

,7457 

677 

2 

677 



■ 

5TARMEAS 

1166 

24 

- 

- 

- 

SLAPl 

04*6705 

140 

1 

99 



m 

SPLIT4 

26 

,7471 

677 

1 

677 



m 

STARNUMB 

0621 

27 

- 

- 

- 

SLAP2 

04.6713 

140 

1 

141 



m 

SPLITS 

26 

,7506 

677 

2 

677 



m 

STARS 

1400 

30 

12 

358 

392 

SLAPB 

04*6000 

99 

1 

500 



m 

SPLITMNU 

26 

,7A33 

676 

1 

670 



m 

START2 

33,7442 

697 

1 

697 


SLCANS 

03,6430 

77 

2 

77 



m 

SP’MT 

14 

,7352 

224 

1 

224 



m 

startchk 

10,7233 

182 

1 

182 


SLEFTS 

3212 

547 

1 

526 




SPSiFLAG 


0054 

19 

- 

- 

- 

— 

m 

STARTCRS 

14,6126 

195 

- 

- 

- 

SLOPEHI 

03,7403 

96 

1 

96 



m 

5P51L0C 

32 

,6426 

564 

2 

564 

571 


m 

startdti 

33,7440 

697 

1 

697 


SLOPELO 

03,7401 

96 

1 

96 



m 

SP SI MASK 

32 

,6416 

564 

2 

572 

589 


m 

5 TARTDT 2 

33,7441 

697 

1 

697 


5MA 

1436 

28 

4 

651 



m 

SPSITEST 

32 

,6774 

572 

2 

131 

571 


m 

startent 

30 , 7 4 30 

744 

1 

562 


5MACHECK 

25*7114 

646 

1 

642 



m 

SP52FLAG 


0053 

19 

3 

595 

652 


m 

STARTPL 2 

2 1 » 6 1 47 

335 

1 

349 


smcdures 

25*6242 

635 

1 

638 



m 

SP52MASK 

32 

,702 3 

573 

1 

573 



m 

startpl 

21,6702 

349 

- 

- 

- 

SMDCALC 

34,6461 

433 

1 

393 




SP52M0De 

33 

,6377 

597 

1 

596 



m 

startsub 

04,7200 

14 7 

3 

140 

145 

SMNBl 

22,6502 

A64 

1 

464 



m 

SP52N0W 

32 

♦ 7432 

583 

1 

583 



m 

STARTSw 

04,6764 

141 

1 

I4l 


5MN6 

22,6474 

464 

1 

4^3 



m 

5P52TEST 

32 

,7025 

573 


- 

- 


m 

state 

0645 

18 

3 7 

18 

744 

smode 

1762 

34 

8 

140 

541 


to 

5PS34M5K 

32 

,6707 

570 

1 

568 



m 

STATEDvvN 

3474 

625 

4 

583 

622 

SMODECHK 

3000 

284 

11 

265 

284 


■ 

5PS3FLAG 


0052 

19 

- 

- 

- 

= 

m 

STATENV 7 

13,7201 

264 

1 

26 l 


5M00EC0N 

11*7420 

284 

1 

284 



m 

SPSaMASK 

32*7046 

573 

1 

573 



m 

STATENV 

05,7144 

264 

1 

258 



K£Y: symbols defined by eo>Jals ape flagged =. others are Normally defined except those flagged; 

u undefined e failed leftover erase m multiply defined t wrong memory type mm multiple errors 

N nearly defined by = J failed leftover word 0 oversize- or ill-defined c '-onflict in Memory x misc, trouble 
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SYMbpL table LISTING* INCLJOING PAGE RUMBeR OF DEFINITION* AND NUMBER oF REFERENCES WITH FIRST AND LAST PaGe NUMBERS 


symbol h 

Definition 

ReFeRen 

cts 

F 


SYM30L H 

DeF I NI I'lON 

ReFfRENCeS 

F 

■ 

■ 

SYMBOL H 

Definition 

References 

F 

ST ATEUP 

3A62 

625 

4 

565 

716 


m 

m 

SwAYROTz 

22,6017 

366 

2 

366 

368 



tatlani 


I6l7 

28 

I 

554 


— 

STB 

5A66 

65 

4 

63 

66 


m 

SwAySI AT 

22*6000 

366 


-- 

- 



TATLANT 


1526 

28 

1 

554 


* 

51 BNKCON 

Ilf 67 66 

277 

1 

275 




SrtCALL 

5662 

29 O 

12 

73 

533 



TAU 


1260 

24 

1 

296 


• 

5TBUFF 

1100 

25 

28 

157 

753 



SWCON 

U»6772 

27 7 

1 

276 



m 

tavegon 


1210 

24 

5 

157 

609 

* 

stcntr 

1123 

23 

3 

157 

2bl 


m 

5wF/F 

457“* 

50 

1 

78 



m 

TAZ 


1346 

30 

5 

358 

392 

Z 

STEER2 

27*7006 

727 

« 


* 



SwlMlT 

04*7360 

150 

3 

141 




TBASE2 


0664 

19 

i 

136 



STEER 

27*7005 

727 

1 

723 



m 

SwITCHEM 

03*6434 

78 

1 

47 



m 

TBASE3 


0665 

I 9 

5 

337 

6 1 A 


5TEERFLG 

0034 

18 

1 

593 



m 

SWITCH IT 

03.6464 

78 

1 

78 



m 

TBASE4 


0666 

19 

9 

553 

621 


5TEERLAW 

33*6071 

591 

2 

591 



m 

SwLDDIND 

03.6362 

76 

1 

76 



m 

TBA5E5 


0667 

19 

8 

337 

696 


5TEERMSK 

32*663A 

569 

1 

569 




SWRETURN 

5702 

290 

B 

123 

613 


m 

TC 


1144 

23 

5 

296 

326 

s 

steeroff 

32*6633 

569 

1 

130 



m 

SwSoN 

06.7545 

531 

I 

5 32 



m 

TCAl 


4533 

49 

1 

42 



STEERROR 

1 34A 

27 

2 

59l 

592 

s 


Sw T AB 

06*7574 

532 

A 

531 

536 



TCBUF 


4731 

53 

4 

58 

65 


STEPEXIT 

130A 

25 

2 

321 

32b 


m 

SXA 

0 3 t ^ ^ 

71 

2 

47 

73 


m 

TCEX 

03 

*6753 

85 

1 

62 


- 

stevein 

12 *65A0 

400 

2 

395 

398 


m 

sxtalarm 

22*7163 

475 

2 

475 



m 

TCFINDVC 


3226 

547 

2 

138 

529 


STOpHORl 

12* ?06l 

408 

4 

A07 

AOB 


m 

SaTANg 

22*7116 

475 

- 

- 

- 


m 

TCNOvAC 


3223 

547 

1 

529 



stophor 

3A,7515 

454 

2 

394 

40tt 


m 

sxtmark 

14,6406 

204 

A 

210 

430 


m 

TCDAST 


1556 

26 

5 

128 

609 


STORl 

A701 

52 

2 

7l 

72 


m 

sxtnb 

22*6732 

47 O 

6 

359 

432 



TCSl 


4524 

49 

4 

56 

Bl 


SrORADR 

AOAA 

38 

1 

52 



m 

sxttr 

12*7747 

425 

2 

408 



m 

TC5UBTR 

03 

,67 54 

85 

1 

84 



STORDAC 

53A7 

62 

4 

6 1 

75 


m 

SySFAlL 

10,7324 

183 

2 

183 



m 

TCSwRET 

13 

,6707 

138 

2 

137 

138 


STORES 

4552 

49 

1 

49 



m 

SYS TEST 

05.6752 

257 

1 

235 



m 

TCTAG+1 

03 

*6753 

85 

2 

82 

65 


STOREPL 

1230 

26 

20 

394 

45 7 


m 

S(X)C{X) 

23*6311 

304 

1 

300 



m 

TCTSKOVR 


3225 

547 

1 

755 



S10RR5LT 

34 f 6660 

438 

3 

394 












tcurrent 

13 

f 66 O 7 

135 

1 

135 



ST0RTE5T 

5473 

65 

1 

44 



m 

T3DSP 

2233 

119 

2 

119 




TCUTOFF 


1462 

20 

9 

138 

609 

= 

STRAOUT 

32*6660 

569 

1 

569 




TbRjPT2 

2203 

118 

L 

1 19 



m 

TCwAIT 


3224 

547 

2 

135 

530 


ST REXIT 

33*6133 

592 

1 

593 



m 

T3RJPT 

2177 

I IB 

1 

35 



ft 

TDEC 


1266 

24 

8 

327 

546 


STRTE5T 

33*6002 

589 

L 

508 



m 

TARJPT 

2630 

159 

1 

35 



m 

tdecay 


1560 

28 

1 

593 


- 

STJFMODE 

13 1 6 7 6 6 

261 

1 

262 




tarjpta 

10,6115 

161 

2 

159 



« 

TDELTAV 


1114 

23 

3 

319 

326 

- 

STZI 

4700 

52 

2 

A6 

52 


M 

tablnth 

1 0 f 6 6 0 2 

172 

1 

173 



m 

TE 


1033 

22 

2 

22 



5UBET A2 

30*7015 

704 

1 

704 



m 

tabtflag 

0055 

19 

1 

599 


= 

m 

TEL 


1350 

30 

5 

350 

392 

- 

SUBETA 

30*7007 

704 

1 

704 



m 

TABTMA5K 

32.6772 

572 

1 

587 



m 

TELCOUNT 


0670 

19 

4 

149 

176 


SUBTR 

03*67A5 

85 

1 

8 5 



m 

tagi 

0075 

14 

10 

43 

72 

= 

m 

TEMIO 


0107 

15 

16 

15 

222 


suchk 

11 *62aO 

269 





m 

TAG 

4722 

53 

12 

43 

72 


m 

TEMll 


0064 

14 

17 

14 

228 


5UMADRS 

11*6006 

26 5 

1 

27B 




TAGIT 

03,6727 

84 

1 

85 



m 

TEMlB 


1420 

29 

9 

708 

724 

- 

SUMPOIMT 

33*6125 

592 

1 

591 



m 

TANCHECK 

25,7124 

647 

1 

643 



m 

TEM2 


0102 

15 

56 

15 

376 


SUMSUMl 

34*7574 

455 

1 

455 



m 

TAR IPOS 

1100 

26 

A 

432 

435 



TEM3 


0101 

15 

2 

96 


- 

SUMSUM 

12*7456 

419 

1 

455 



m 

TAR 3 ETI 

1402 

30 

8 

30 

435 



TEM A 


0103 

15 

25 

15 

8l 


SVCT3 

04 * 6003 

99 

1 

119 



m 

T A ^ sE T 

24,6037 

555 

- 


- 


m 

TEM5 


0104 

15 

18 

15 

78 


SVCT3X 

04*6525 

114 

1 

99 



m 

targjob 

24,6000 

554 

1 

554 



m 

TEM6 


0105 

15 

2 

66 


z 

SwADOR 

4272 

44 

1 

43 



m 

TARoSM 

34,6552 

435 

I 

392 



m 

TEM a 


0105 

15 

19 

15 

81 


SwADRS 

11*6703 

275 

1 

276 




TARgTASk 

32,6025 

553 

3 

129 

554 


m 

TEM9 


0106 

15 

15 

15 

222 


SwApLOC 

30 f 656 3 

3e5 

A 

382 

3 q 5 


m 

TASOOUT 

32,6331 

560 

4 

560 

575 



TEMDELV 


1572 

27 

4 

42 7 

428 


Sw A YPUL5 

1102 

369 

5 

366 

36 / 


m 

TASCAQUT 

32*6556 

568 

1 

569 



m 

tempt 


0117 

136 

4 

136 

138 

* 

SwAYROTY 

22 *6024 

366 

3 

366 

36 f 


m 

T AS<OvER 

2256 

119 

103 

114 

750 


m 

TEMD2 


0104 

15 

7 

90 

97 



i^^y. symbqls Defined by eqJals are flagged =, others are normally defined e^^ePt those flagged; 


U undefined 

N nearly defined by = 


E failed leftover erase 
J failed leftover wuRO 


M MULTiPtT Defined 

0 oversize- or ill-defined 


T wrong Memory type 

c conflict in Memory 


MM multiple errors 
X MI5C, trouble 
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symbol table listing* imCljding Page number of definition* and number of references with first and Last page numbers 


symbol h 

deF Ini t Ion 

ReFeRen 

CeS 

F 

• 

m 

symbol h 

definition 

ReFfReNCeS 

F 

symbol ri 

Definition 

References f 

TEMQ3 

0076 

14 

4 

58 

92 


w 

m 

thetad 

0700 

19 

34 

158 

729 


TMiMARKLR 

0675 

19 

10 

149 

748 

TEMQ 

0103 

15 

3 

90 

91 


m 

THETAE 

1456 

30 

4 

339 

347 

mm 

TMONITOR 

1570 

31 

4 

556 

Z 

TLMQS 

0071 

14 

17 

202 

53 5 


m 

THETAH 

1110 

25 

8 

546 

745 

Z 

tmove 

03,7463 

97 

1 

47 


TEMx 

1031 

22 

3 

741 

743 


m 

thetaman 

1454 

28 

26 

602 

680 

z 

TNUv 

1122 

23 

6 

23 

326 = 

TEMxY 

103A 

22 

6 

741 

743 


m 

thetasth 

1454 

30 

5 

339 

344 

z 

TQPl 

21,6000 

332 

4 

124 

349 

temy 

1032 

22 

3 

74l 

r43 

£ 

m 

thetax 

1452 

30 

6 

340 

353 

z 

T0P2 

21,6100 

334 

1 

349 


TEMZ 

1033 

22 

3 

7A1 

743 


m 

THETAY 

1446 

30 

15 

334 

356 

z 

TOP33 

21*6060 

333 

1 

333 


TEN 

3232 

548 

10 

148 

613 

z 

m 

ThETAz 

1450 

30 

4 

341 

353 

z 

T0P3 

21*6036 

3 33 


- 


TENDPTCH 

1566 

31 

2 

556 


z 

« 

thetrig 

25,6012 

628 

3 

596 

657 


TORK 

12,6245 

395 

1 

401 


tengon 

U62 

28 

2 

568 


z 

m 

third 

22*7l7l 

476 

• 

* 



torqgyhs 

05,6454 

251 

1 

235 


tenms 

11*6333 

270 

1 

270 



m 

thirteen 

3535 

626 

5 

356 

572 

s 

TORQGYRv 

05,6501 

251 

1 

251 


tentry 

1350 

29 

3 

699 

744 

z 

m 

THIRTN 

3535 

626 

2 

626 

698 


TPACIFI 

1627 

28 

I 

554 

= 

TERMEXTV 

0 5 * 6 0 6 A 

236 

9 

240 

251 


■ 

thirtyi 

3557 

626 

1 

553 



TPALIFC 

1536 

28 

2 

554 

582 ? 

TE5T2 

A300 

44 

1 

44 



• 

THIRTY2 

3560 

6 26 

1 

553 



TPAD 

33,6555 

602 

1 

602 


TE5TCADR 

05*7002 

257 

1 

257 



m 

thirty 

3556 

626 

3 

584 

626 


TPAGREE 

03,7154 

90 

10 

82 

511 

TE5T0EN 

31 ,63a1 

690 

4 

690 



m 

Three 

4473 

48 

24 

44 

622 


tperiod 

1110 

369 

1 

367 

- 

TESTGMP 

33*7116 

614 

1 

614 



m 

THREE/8 

23,6301 

303 

2 

303 

311 


TPITCH 

1564 

31 

1 

556 

= 

TE5TH5W 

31.7066 

709 

1 

709 



m 

timcalc 

22,6065 

367 

3 

367 



TPLEFT7 

06 ,7213 

519 

2 

510 

519 

TESTMORE 

13*7143 

263 

1 

262 



m 

T IMEl 

0036 

12 

30 

136 

697 

z 

TPSET 

4761 

53 

2 

54 


TESTNDX 

1232 

26 

19 

400 

456 

z 

m 

TIMEIgR 

1467 

30 

3 

157 

337 

z 

TpTlME 

12,7277 

4l5 

2 

39*t 

403 

TE5TNN 

07*6046 

498 

2 

497 

523 


m 

TiMElSAv 

1101 

23 

2 

253 

256 

= 

TRACEl 

06,7272 

524 

- 

- 

- 

TE5TN0 

1561 

27 

9 

395 

396 

z 

m 

T1ME2 

0035 

12 

16 

156 

554 

z 

TRACEIS 

06,7303 

524 

- 

- 

- 

TE5TNV 

05*7012 

257 

1 

257 



m 

T1ME2GR 

1466 

30 

4 

157 

554 

z 

TRAD 

4776 

54 

4 

46 

60 

TESTOFUF 

06*7235 

519 

4 

517 

523 


m 

TIME2SAV 

1100 

23 

2 

253 

256 


transear 

25,7214 

649 

- 

- 

- 

TE5TTET 

30*6067 

328 

3 

32fa 

330 


m 

TIME3 

0037 

12 

9 

111 

755 

z 

translun 

25,7264 

650 

- 

- 

- 

TESTTFF 

32.7463 

584 

• 

— 



m 

T1ME4 

0040 

12 

4 

147 

173 

= 

tresume 

1212 

24 

- 

« 

- = 

TESTTiME 

1215 

26 

5 

402 

453 

z 

m 

TIMEINCR 

12*6367 

397 

1 

396 



TKIGl 

22,6452 

463 

1 

463 


TE5TVB 

07.6037 

497 

• 

• 



m 

TiMESTEp 

23*7107 

31 ? 

2 

328 



TRIg2 

22,6465 

46 3 

1 

463 


TtSTXACT 

05*6047 

236 

8 

2 39 

251 


K 

tinythet 

30,7030 

704 

1 

702 



TRNSWON 

10, 7217 

182 

1 

180 


TET 

1146 

23 

4 

296 

542 

z 

U 

TlX 

03*6115 

72 

1 

47 



TROLL 

1562 

31 

3 

125 

557 s 

TFFO 

31* 6664 

696 

1 

695 



m 

T IXBR 

03*6130 

72 

1 

72 



TKuea 

03*6042 

71 

4 

56 

79 

TFF2D0WN 

24*6323 

611 

1 

611 



m 

TjL 

21,6457 

343 

2 

340 

349 


TRUNLOG 

30,6406 

380 

I 

47 O 


TFF2FLAG 

0003 

18 

1 

584 




I jlali 

34,6720 

441 

1 

441 



trygrab 

32,6360 

563 

1 

565 


TFF 

1456 

28 

16 

158 

696 


m 

tjlal 

34*6714 

441 

1 

456 



TS+-CHK 

11,6305 

270 

- 

- 

- 

tfflimit 

24*6355 

612 

1 

610 



m 

TLIFTOFF 

1462 

28 

4 

553 

554 

S 

tscale 

0033 

296 

3 

296 

322 = 

tffmax 

31*6456 

693 

4 

693 

695 


m 

TmIa/AIT 

11,6001 

265 

1 

270 



tselect 

05,6775 

257 

1 

257 


TFFMIN 

1676 

33 

3 

263 

5b4 


m 

tmalm 

2671 

479 

1 

479 


z 

tsgnabs 

03,7143 

90 

3 

80 

86 

TFFNOM 

1720 

33 

2 

562 

5b3 


m 

tmark 

1174 

26 

4 

431 

437 

- 

tskadrs 

11,6401 

271 

2 

265 

270 

TFFTESTl 

32*7513 

585 

2 

564 




tmcheck 

10*6701 

176 

4 

164 



tslc 

0 3 , 64 1 1 

77 

1 

46 


tfftest 

32*7453 

584 

1 

582 



& 

TmFAILI 

04,7464 

479 

- 

- 

- 


TSQ 

4561 

49 

1 

lU 


tg Ob I A s 

25*7154 

647 

1 

644 



'H 

TMFAIL2 

04,7457 

479 

2 

479 



tstab 

06,6422 

492 

1 

493 


THAT5ALL 

04,6777 

141 

1 

295 



m 

tmfail 

2571 

155 

4 

151 

479 


tstdsplk 

3274 

548 

2 

522 

550 

theta 

0024 

476 

5 

463 



m 

TMI NDEX 

067A 

19 

11 

151 

154 


TSTFORDP 

07*6457 

506 

1 

505 



key: symbols defined by equals Are flagged =. others are MORMALLY defined except those FLAGGED; 


u undefined e failed leftover erase 

N Nearly defined by = u failed leftover word 


M MULTIPLY defined T WRONG MEMORY TYPE 

0 oversize- or ill-defined c lonflict ir4 Memory 


MM multiple FRRoRS 

X wise, trouble 
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(YMBoL table 

listing 

* including Page 

symbol H 

Definition 

reFeRen 

cl^ 

T5TIMACT 

IA»67S7 

213 

3 

196 

199 

TST JUMP 

12*6721 

A06 

1 

A57 


TSTDUT 

11,7521 

286 

1 

208 


TSTUPLOK 

0A,7ASl 

A78 

2 

A78 


TSUI 

A773 

5A 

1 

46 


TTSl 

A552 

A9 

1 

A6 


TTUMON 

1572 

31 

2 

125 

558 

TUM8FLAG 

0037 

18 

- 

- 

- 

tumbjobi 

32 *6257 

559 

1 

559 


TUMBJOB 

2A ,60A6 

561 

1 

559 


tumbtask 

32,6300 

559 

1 

560 


tumbtski 

32,6250 

559 

3 

126 

558 

TUMTESTI 

32,6321 

560 

1 

559 


TUMTEST2 

32 ,6636 

569 

2 

568 

569 

TURNONZ 

2750 

192 

3 

192 


TwEAKGY 

10 * 7555 

231 

2 

231 

232 

T wEAKSP 

10,7533 

229 

1 

229 


Twelve 

353A 

626 

2 

558 

618 

TwENTYO 

3 544 

626 

A 

337 

6bO 

twentyi 

35 A5 

626 

1 

339 


TwENTy2 

35 A6 

626 

1 

569 


TwENTYS 

35A7 

626 

1 

569 


TwENTYA 

3550 

626 

2 

56 7 

568 

TrtENTYS 

3551 

626 

2 

567 

615 

T wENT y6 

3552 

626 

- 

- 

- 

Twenty? 

355 3 

626 

2 

559 

611 

TwENTYS 

355A 

626 

3 

535 

680 

TWENTY? 

3555 

626 

- 

- 

- 

T wENTy 

35AA 

626 

- 

- 

- 

Two 

5503 

65 

97 

Al 

756 

TwOSEC 

33*6253 

59A 

1 

593 


Two (-2) 

31*6673 

696 

10 

69A 

695 

ULES 

12,7AA1 

A19 

1 

A19 


ULRET 

Al7A 

Al 

1 

A2 


unajump 

AA53 

A7 

1 

39 


unalqad 

A152 

Al 

1 

39 


UNAPROC 

AlOA 

39 

1 

Al 


UNCOROVF 

10,7A17 

188 

1 

188 


UNE 

1220 

2A 


- 


UNI 

1561 

31 

3 

701 

723 

UN I T 

03,7212 

92 

1 

A7 


UNITD 

1366 

27 

2 

650 

651 


symbol h Definition references f 


5 with first and Last Page numbers 
symbol h Definition references f 


UNITF 

1366 

27 

2 

6A9 


£ 

m 

UPTHETA3 

27,7075 

729 

1 

730 



UNl THORZ 

137A 

27 

A 

6A1 

6A5 

= 

m 

upthet a 

27,7102 

729 


- 

** 


UNl TLOOP 

03,7222 

92 

1 

92 



m 

UPTIME 

1671 

33 

7 

263 

752 


UNITMDT 

lA02 

27 

2 

590 

591 

= 

m 

UPTSKLOC 

2^*6200 

577 

1 

577 



UNl TN 

1322 

27 

1 

6A8 


* 


USEMAxDT 

30,6131 

328 

1 

328 



unitr 

1015 

22 

29 

6A0 

7A9 

z 

m 

UVL 

1160 

2A 


- 

- 

z 

UNITRSM 

03,7216 

92 

1 

93 



■ 

UXNB 

1A76 

31 

1 

739 


z 

UNITRUPT 

03*7263 

93 

1 

92 



m 

UYNB 

150A 

31 

2 

739 

740 


UNITRXV 

1366 

27 

3 

6Al 

6AA 


m 

uznb 

1512 

31 

1 

7A0 


ss 

UNITS 

137A 

27 

2 

650 

651 

z 









UNI TV 

1567 

31 

1 

700 



m 

V01N30E 

34,7731 

458 

2 

A30 



UNITVG 

1352 

27 

2 

652 


z 

m 

V05N30E 

12*77A0 

425 

2 

392 

409 


UNl TW 

10A3 

22 

7 

355 

7 A 9 


m 

\/06N30P 

2 1 * 75A0 

364 

2 

358 

359 


UNl TX 

26,7572 

679 

8 

372 

680 


m 

V06NA0 

33,6157 

592 

1 

5g2 



UNITY 

26*7600 

679 

8 

372 

680 


m 

V06N62 

27,70A3 

727 

1 

727 



UNP 

1230 

2A 

» 

— 

* 

Z 

m 

\/06N66E 

3A,7730 

458 

1 

A 28 



UPBANk 

2075 

A79 

1 

36 



m 

\/07N30E 

12,7745 

425 

2 

39/ 

AO 9 


UPCADR 

27*6201 

716 

1 

716 




VI 

1364 

29 

20 

708 

721 

* 

UPCDNTRL 

27,6216 

717 

1 

716 



m 

VIOLD 

I 37 O 

29 

3 

709 

720 


UPOATl 

07*6353 

503 

1 

503 



m 

V1ST02S 

30,6623 

387 

3 

387 

63 O 


UpOATERT 

27,6151 

702 

1 

7 OA 



■ 

V21N2AG 

11,7723 

209 

1 

289 



UPDATFLG 

0022 

18 

3 

328 

75l 

z 

p 

V21N30E 

12,7742 

425 

2 

392 

395 


UPDATIME 

05*6511 

252 

2 

256 

263 


P 

V25T0D1S 

30,6663 

387 

1 

386 



UPDATNN 

07*6327 

502 

2 

53A 



■ 

V37BAD 

04,6703 

124 

5 

124 



UpDATRET 

0063 

lA 

5 

A97 

536 

z 

m 

yAOO 

25,7152 

647 

1 

642 



UPDATV6 

07 *63A6 

503 

9 

A9A 

535 


m 

V75TEMP 

06l6 

17 

3 

258 

260 

- 

UPDTDONE 

13,7066 

262 

1 

262 



m 

V 

1617 

31 

17 

546 

723 

- 

UPDWNT5T 

31»67A2 

707 

1 

706 



m 

VACl 

0217 

16 

- 




UP JOB 

2A,6225 

609 

2 

129 

609 


m 

VACIADRC 

04,7356 

150 

1 

lAB 



UPLAST 

OA, 7515 

A 79 

* 

- 



p 

VAC1U5E 

0216 

16 

A 

99 

204 


UPLINK 

OOAl 

12 

2 

lAB 

A78 

z 

m 

VAC2 

027 3 

16 



- 


UPLDCK 

06 A5 

18 

5 

A78 

A79 


m 

VAC2USE 

0272 

16 

3 

99 

204 


UPNDVER 

27*71A5 

730 

* 

- 

- 


m 

VAC3 

0347 

16 

- 

- 

- 


UPO< 

0A,7A36 

A78 

— 




m 

VAC3USE 

0346 

16 

3 

99 

204 


UPDLDMD 

1116 

25 

5 

157 

263 

= 

m 

VACA 

0423 

16 

* 

- 

- 


UPRPTl 

0A,7A2l 

A78 

I 

A78 



m 

VACAUSE 

0422 

16 

3 

99 

204 


UpRJPT 

2037 

36 

1 

35 



m 

VAC5 

04/7 

16 

- 

- 

- 


UPRJPTB 

0A,7375 

A 78 

1 

36 



m 

VAC5USE 

0476 

16 

3 

99 

204 


UPT 

23A1 

121 

1 

120 



m 

VAC 

OOAO 

13 

30 

1 3 

592 

= 

UP TASK 

2A*620l 

609 

2 

129 

577 


m 

VACADR 

I 3 O 2 

26 

3 

430 

43 1 

z 

UPTCADR 

0A*6652 

123 

1 

121 



m 

VACCOM 

5202 

59 

2 

59 

76 


UPTE5T 

0A,750l 

A79 

2 

A78 



m 

VACLOC 

0070 

14 

29 

50 

387 


upthetai 

27»7l0l 

729 

3 

130 

7AA 


m 

VACX 

0040 

13 

3 

383 

666 



kly 


symbols defined by equals Are flagged =• others Are normally defined except those Flagged: 


u undefined 
N nearly defined by = 


E FAILED leftover ERASE 
j FAILED Leftover word 


M multiply OEF INED 
0 OVeRSUE- or ILL-D£FINED 


T WRONG memory TYPE 

c conflict in Memory 


MM multiple errors 

X Ml sc, trouble 
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SYMboL table LlSTINCt InCLJDInC PftGE nUMBeR QF DEFINITION* AND NUMBER QF REFERENCES WlyH FIRST AND LaSt PAGE NUMBERS 


symbol h 

Definition 

ReFeREN 

CeS 

T 

P 

■1 

Symbol h 

Definition 

References 

f 

m 

m 

symbol h 

DeF inition 

ReFerenleS f 

vacy 

00a2 

13 





m 

VERECTC3 

2 1 1 6 7 6 4 

351 

2 

343 



m 

VSLTEST 

03,6513 

79 

1 

79 


VACZ 

ooaa 

13 

4 

383 

666 

- 

m 

veriflag 

0012 

18 


- 



m 

VSLTLOOp 

03,6502 

79 

1 

79 


VADl 

S221 

59 

3 

46 

59 


p 

VERTRECT 

34,6777 

443 

i 

456 



m 

vso 

03,6226 

74 

1 

47 


variance 

127A 

24 

- 

- 

- 


m 

VF 

1322 

27 

1 

649 


£ 

m 

VSqUARE 

1342 

29 

6 

700 

726 = 

VAVEGON 

1222 

24 

12 

157 

610 

z 

m 

VF I NAL 

30.7227 

738 

2 

706 

7 O 7 


m 

VSRl 

03,6275 

75 

2 

75 

92 

VAZ 

1352 

30 

3 

332 

333 

= 

m 

VG 

1352 

27 

8 

59 O 

652 

z 

m 

VSRTl 

5633 

69 

2 

46 

71 

Vb06N66 

12*7751 

425 

1 

412 



m 

VGALARM 

33*623A 

593 

1 

590 



m 

VSRT3 

5650 

69 

2 

69 


VB50 

1A,67A6 

212 

2 

212 



m 

vgcnti 

1261 

26 

2 

581 

586 


m 

vsui 

5211 

59 

1 

46 


VB51 

1A,6753 

212 

2 

211 

212 


m 

vgCntr 

1446 

28 

18 

564 

621 


m 

VTSl 

4622 

50 

1 

46 


VbARS 

1603 

31 

7 

710 

715 

z 

m 

VIGNTION 

1106 

23 

3 

587 

640 


m 

VXMl 

5306 

61 

1 

46 


VBCOARK 

05*6102 

237 

1 

235 



m 

VL 

1615 

31 

13 

710 

722 


m 

VXSCl 

5357 

62 

1 

46 


vbfandir 

07,61A5 

499 

1 

499 



m 

VLTEST 

27*6523 

722 

1 

7l7 



m 

VXSC2 

5372 

63 

2 

62 

65 

VBPROC 

06*7465 

530 

2 

499 

530 


m 

VMARK 

1176 

26 

3 

436 

460 

= 








VbRELDSP 

06*7475 

530 

2 

486 

500 



VMIN 

30,7105 

736 

1 

710 



m 


1561 

31 

4 

321 


vbrqexec 

07,7321 

529 

1 

499 



m 

VMDDE 

30.6373 

379 

1 

381 



m 

WAITI 

11,6356 

270 

1 

271 


VBRQWAIT 

07*7342 

530 

1 

499 



m 

vmove 

4024 

97 

1 

47 



m 

waitfuag 

5501 

184 

1 

183 


VBSPILD 

07*6715 

514 

2 

512 



m 

VNl 

1305 

26 

2 

747 

751 


m 

WAITLIST 

2173 

111 

128 

116 

756 

VB5P2LD 

07*6716 

514 

2 

512 



m 

VN 

0773 

22 

30 

157 

747 


m 

wake 

12,6316 

396 

1 

397 


VBSP3LD 

07*6717 

514 

1 

512 



m 

VNCDN 

1 1*6007 

265 

1 

278 



m 

WAKECADR 

12,6371 

397 

2 

396 


VBTERM 

06*7472 

530 

2 

500 

535 


m 

VNL DOC DU 

05*6406 

248 

1 

248 



m 

wAKEpRAD 

21,7003 

351 

- 

- 


VbUF 

0071 

14 

41 

14 

690 


m 

VIMLDDCDU 

05,6165 

240 

3 

240 

245 


m 

WAKEUP 

12,6313 

396 

1 

396 


vbzero 

05*6077 

236 

1 

235 



m 

VNLDDDT 

05,6544 

252 

1 

252 



m 

WART2ADR 

34,7630 

456 

2 

456 


VCAl 

4611 

50 

4 

42 

62 


m 

vnlddgyr 

05,6251 

242 

2 

242 

251 


m 

WARTZNEW 

34,7634 

456 

1 

456 


VCORLIM 

30*7117 

73 7 

2 

714 

737 


m 

VPI? 

0773 

22 

1 

700 


= 

m 

WARTMAL2 

12,7377 

417 

1 

399 


VCORR 

1577 

31 

9 

713 

714 


m 

VPR3J1 

5505 

65 

1 

46 



m 

WARTMAL3 

12,7403 

417 

1 

417 


VCR I T 

25.7156 

647 

1 

642 



p 

VUJIT 

30,7117 

737 

1 

723 



m 

^ ARTMAL4 

12,7361 

417 

2 

41 7 


VCSl 

4616 

50 

2 

59 

66 


m 

VRl 

1263 

26 

2 

581 

585 

z 

m 

wARTMAL 

12,7355 

417 

1 

399 


VCV 

1136 

23 


298 

319 


m 

VK 

1416 

27 

8 

581 

651 

z 

m 

WARTNEWI 

34,7631 

456 

1 

456 


VDl 

3227 

547 

6 

149 

526 



VRCAO 

32,6764 

572 

1 

571 



p 

WARTNEW 

3 4 1 7 6 2 0 

456 

1 

456 


VD2 

06.6211 

49 O 

1 

49 O 



m 

VRCADR 

1470 

28 

7 

564 

639 


m 

W ASK.5ET 

0727 

20 

28 

140 

545 

VDEF 

03*6160 

73 

1 

47 



m 

VRCDNT 

30*7171 

737 

1 

707 



m 

WASOPSET 

0730 

20 

13 

141 

493 

VLCCHECK 

5370 

62 

2 

62 

69 


m 

vreccmem 

1663 

33 

4 

606 

610 


P 

wc 

1322 

27 

17 

603 

600 : 

vecmove 

4632 

51 

2 

50 



p 

VRECT 

1106 

23 

17 

158 

6lO 

= 

P 

WCAuRTAb 

13,6001 

125 

3 

135 

136 

vecset 

4754 

53 

11 

59 

69 


m 

VRECTC3 

34*7750 

458 

1 

441 



m 

WDAGAIN 

07,7234 

525 

2 

525 

526 

vectab 

1210 

24 

2 

3 O 8 

324 

— 

m 

vref 

1623 

32 

4 

717 

718 

= 

m 

WDCNT 

0076 

15 

5 

524 

526 

vectem 

1374 

30 

2 

359 

360 


m 

VKEFER 

27*7203 

733 

6 

723 

724 


m 

WDRET 

0106 

15 

13 

238 

526 

VERB 

06.6252 

490 

1 

486 



m 

vrfail 

32,7656 

588 

1 

646 




WEIKPL 

12,6706 

405 

2 

406 


VERBFAN 

07.6130 

499 

8 

498 

501 


m 

VKTHRES 

31,6777 

707 

1 

707 



m 

WHIMPER 

3053 

295 

2 

295 


verbreg 

0602 

17 

20 

148 

522 


m 

VS 

1611 

31 

4 

710 

717 


m 

WIE 

21.7172 

355 

1 

355 


VERrTAB 

07.6150 

499 

1 

499 



m 

vscale 

0006 

296 

1 

319 


= 

m 

^ # 0 • ^ 1 

2545 

154 

1 

151 


verect 

21,6660 

348 

3 

343 

346 


m 

V3L1 

03,6516 

79 

3 

79 



m 

WLTE5T 

13,7205 

754 



- 

verectci 

21,6754 

351 

1 

348 




VSLTl 

5630 

69 

1 

46 



m 

wmatflag 

1303 

25 

3 

308 

326 

VLRECTC2 

21*6760 

351 

1 

348 



m 

VbLT2 

03,6477 

79 

1 

69 



m 

WOVIRPT 

11*6374 

271 

1 

270 



keY: symbols defined by equals are flagged =. others are normally defined except those flagged* 


u undefined 
N Nearly defined by 


F failed leftover erase m multiply defined t wrong Memory type mm multiple errors 

j failed leftover word 0 oversize- ok ill-defined c conflict in memory X MISC. trouble 


^8^57eA YUL 5Y5TEM FOR AGC^t REVISION 0 Of- PROGRAM 50LRUMS5 BY NASA 1021108-021 


UEC A, 1966 


page 789 
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symbol h 

Definition 

ReFeRen 

CeS 

F 

m 

symbol h 

Definition 

ReFeReNCeS 

F 

ft 

SYMBOL H 

Definition 

ReFeRenceS 

F 

wkdret 

0106 

15 

3 

494 

495 

• 

m 

m 

XsTDRE 

03*6074 

7i 

4 

71 

72 


ft 

ft 

ZEROLOOP 

23*7175 

319 

1 

319 



wtalarm 

0A,6523 

114 

1 

114 



m 

xstorex 

0032 

304 

4 

304 


Z 

ft 

zerooctr 

2670 

160 

1 

1 86 



WTCALL2 

1 3 f 664^ 

136 

2 

137 

136 


■ 

XSJ 

03*6147 

72 

1 

47 



ft 

ZEROPR 

21*7004 

351 

1 

339 



WTCALL 

13^6636 

136 

1 

135 



n 

XTRAINC 

2272 

119 

1 

118 



V 

ZEROSl 

21,6105 

334 

1 

334 



wtdttab 

13*6000 

125 

1 

135 




XVBDUT 

05*7146 

264 

10 

257 

260 



ZER0S2 

21,6114 

334 

1 

334 



WTEXIT 

0600 

17 

6 

17 

96 


m 

XVll 

21*7541 

364 

1 

362 



ft 

ZEROTEST 

0 4 f 7142 

14A 

2 

142 



WTLSTz 

04*6535 

115 

7 

113 

114 






^ » ft P 




ft 

ZEROVAC 

30*6270 

376 

7 

333 

595 


WTLST3 

04*6374 

111 

1 

111 



m 

Y 

0024 

7 32 

4 

726 


z 

ft 

ZEROVEC 

26,7574 

679 

3 

326 

658 


wtlsta 

04*6420 

112 

1 

115 



m 

YAiJ 

1316 

31 

- 

- 

- 


ft 

ZEROWC 

26,7373 

676 

1 

675 



WTLST5 

0A,645l 

113 

1 

112 



m 

YDC 

1504 

30 

6 

432 

447 

= 

ft 

ZLITBITS 

5070 

192 

A 

192 

239 

= 

wtmlcadr 

12.7402 

417 

2 

417 



m 

YUSMPR 

1504 

30 

1 

462 


z 

ft 

ZLITOFF 

2766 

192 

1 

192 










m 

YN3 

1504 

30 

7 

31 

634 

z 

ft 

ZLITON 

2773 

192 

2 

192 

193 


XI 

0046 

13 

14 

43 

746 


m 

YPI PBUF 

140^ 

29 

2 

699 

731 

z 

ft 

ZNB 

1512 

30 

9 

3l 

634 

s 

X2 

00A7 

13 

ll 

309 

6 70 

z. 

m 

YPIPSUM 

1376 

29 

* 

- 

- 

= 

ft 

ZPIPBUF 

1410 

29 

2 

699 

731 

z 

XACTO 

05*6067 

236 

2 

236 

249 


m 

yreg 

0605 

17 


- 

- 



ZPIPRUPT 

22*6121 

367 

L 

367 



XACTl 

05*6053 

236 

* 




m 

yreglp 

0610 

17 

- 

- 




ZPIPSUM 

1377 

29 

- 

- 

- 

z 

XACTALM7 

13*7203 

264 

2 

261 

262 



YSC 

1374 

27 

6 

604 

652 

- 

ft 

ZPRIME 

0026 

476 

7 

46l 

462 

z 

XACTALM 

05*6062 

236 

2 

236 

264 


m 

YSCD 

1418 

27 

7 

557 

633 

= 


ZREG 

0606 

17 

1 

498 



XAO 

03*6153 

72 

1 

47 



m 

YSM 

1432 

30 

21 

409 

468 

z 

ft 

ZREGLP 

0611 

17 

- 

- 

- 


XCHX 

0 3 * 6 1 4 1 

72 

1 

47 



m 

YSMCAOR 

12,7152 

410 

1 

409 




ZRUPT 

0024 

12 




= 

XDC 

1476 

30 

7 

432 

472 

s 

m 

YV 

1114 

23 

B 

317 

323 


ft 

ZRUPTCON 

11*6002 

265 

1 

271 



XD5MPR 

1476 

30 

5 

461 

462 

z 









ft 

zsc 

1402 

27 

7 

604 

676 


XKEP 

1150 

23 

13 

298 

319 

z 

m 

Z 

0002 

12 

1 

365 


z 

ft 

ZSCD 

1424 

27 

10 

558 

659 

z 

XNB 

1476 

30 

15 

31 

660 

z 

m 

ZDC 

1512 

30 

9 

432 

447 

Z 

ft 

ZSM 

1440 

30 

17 

421 

468 

Z 

XPIPBUF 

uoo 

29 

2 

699 

731 

z 

m 

2DSMPR 

1512 

30 

1 

462 


z 

ft 

zv 

1122 

23 

A 

320 

323 


XPIPSUM 

1375 

29 




z 

m 

ZERO 

5501 

65 

22 6 

37 

754 


ft 

ZVLOOP 

30,6271 

376 

1 

376 



xreg 

0604 

17 

3 

507 

515 



zerdattc 

1 4 1 6 0 3 3 

193 

1 

193 




ZYXR 

30,6337 

378 

1 

378 



XREgLP 

0607 

17 

3 

489 

515 


fe 

ZERDDP 

22*7173 

476 

9 

354 

696 


ft 

ZYXW 

30,6646 

387 

1 

387 



XSC 

1366 

27 

40 

595 

680 

z 


ZERODRVE 

14,6043 

1 94 

1 

193 



ft 

ZYXWV 

30 *6656 

387 

1 

307 



XbCO 

1410 

27 

18 

557 

660 

z 

m 

ZERDEXIT 

5410 

63 

1 

73 




HftftNftftftftliftft 


ftft ftftftft 

ftftftftftftftftftftft 


XSHIFT 

1041 

22 

4 

639 

746 



ZERDICTR 

2731 

191 

2 

185 

193 


ft 

(V) 

1314 

28 

5 

700 

701 


XSM 

1424 

30 

35 

359 

468 

z 


















keY; symbols Defined by equals are flagged =• others are normally defined except those flaggedj 

u undffinfo e failed leftover erase m multiped defined T wrong memory type mm multiple errors 

N nearly defined by = J failed leftover word 0 oveRSHe- or ill-defined c lonflict in Memory x misc. trouble 
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summary of symbol table listing 

712 DEFINED BY EQUALS 
2826 NORMALLY DEFINED 

total; 3538 


I 


I 


^b<:»b78A YUL SYSTEM FOR AGC^i: REVISION 0 OF PROGRAM SOLRUM55 


memory type 

6 AVAILABILITY DISPLAY 

UOOO 

TO 

0057 

special 3R nonexistent memory 

0060 

TO 

1726 

Reserved erasaule memory 

172 7 

TO 

1757 

available erasable memory 

1760 

TO 

1777 

Reserved erasable memory 

2000 

TO 

3575 

reserved fixed memory 

3576 

TO 

3777 

AVAILABLE FIXED MEMORY 

AOOO 

TO 

5766 

RESERVED FIXED MEMORY 

5767 

TO 

5776 

AVAILABLE FIXED MLMORy 

5777 

TO 

03,7466 

reserved fixed memory 

03,7A67 

TO 

03,7777 

AVAILABLE FIXED MEMORY 

0^ t6000 

TO 

04,7517 

reserved fixed MEMORY 

Oh, 7520 

TO 

04,7777 

AVAILABLE FIXED MEMORY 

05,6000 

TO 

05*7606 

Reserved fixed memory 

05,7607 

TO 

05,7777 

available fixed memory 

06,6000 

TO 

06*7633 

reserved fixed memory 

06,7634 

TO 

06,7777 

available fixed memory 

07^6000 

TO 

07 »7531 

RESERVED FIXED MEMORY 

07»7532 

TO 

07*7777 

Available fixed memory 

10*6000 

TO 

10,7742 

reserved fixed memory 

10*7743 

TO 

10*7777 

available fixed memory 

I i * 6000 

TO 

11 »7735 

reserved fixed memory 

1 1*7736 

TO 

11*7777 

Available fixed mlmory 

12*6000 

TO 

12*7761 

reserved fixed memory 

12 , T762 

TO 

12,7777 

AVAILABLE FIXED MEMORY 

13*6000 

TO 

13*7350 

Reserved fixed memory 

13*7351 

TO 

13,7777 

AVAILABLE FIXED MEMORY 

14,6000 

TO 

14,7574 

reserved fixed memory 
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14,7575 

TO 

14 

,77/7 

available fixed memory 

15*6000 

TO 

20 

,77/7 

special or nonexistent memory 

21*6000 

TO 

21 

,7566 

reserved fixed memory 

21,7567 

TO 

21 

,77/7 

available fixed memory 

22*6000 

TO 

22 

,7204 

reserved fixed memory 

22*7205 

TO 

22 

,7777 

available fixed memory 

23,6000 

TO 

23 

*7477 

reserved fixed memory 

23,7500 

TO 

23 

*7777 

available fixed memory 

2h,6000 

TO 

24 

*6513 

reserved fixed memory 

24 ,6514 

TO 

24 

,7777 

available fixed memory 

25,6000 

TO 

25 

,7544 

reserved fixed memory 

25,7545 

TO 

25 

,7777 

available fixed mlmory 

26 ,6000 

TO 

26 

, 7773 

reserved fixed memory 

26,7774 

TO 

26 

,7777 

available fixed mlmory 

2 r,6000 

TO 

27 

,7355 

Reserved fixed memory 

27*7356 

TO 

27 

,7777 

available fixed memory 

30*6000 

TO 

30 

*7756 

reserved fixed memory 

30,7757 

TO 

30 

,7777 

available fixed memory 

31,6000 

TO 

31 

,7536 

reserved fixed memory 

31 , ?537 

TO 

31 

,7777 

Available fixed memory 

32*6000 

TO 

32 

,77 h4 

reserved fixed memory 

32,7745 

TO 

32 

,7777 

Available fixed memory 

33*6000 

TO 

33 

,7447 

reserved fixed memory 

33,7450 

TO 

33 

,7777 

available fixed memory 

34,6000 

TO 

34 

,7771 

reserved fixed memory 

34,7772 

TO 

34 

,77/7 

available fixed memory 


^ti‘^b78A YUL SYSTiM FOR AGc**: REVlblON 0 Of- PROGRAM bOLRUMbS 


OCCUPIED 

LCiCAT 

Ions 

Page 

DCCJPiED 

locations 

PAGE 

2000 

TO 

2033 

35 

3521 

10 

3565 

626 

203^ 

TO 

2045 

36 

3 566 

ro 

3573 

62 7 

2046 

TO 

2100 

98 

3574 

TO 

3575 

759 

2 101 

TO 

2121 

IO 3 

9 OOO 

10 

4023 

37 

2122 

TO 

2123 

IO 5 

4 O 24 

10 

4064 

36 

2124 

TO 

2132 

106 

4065 

[0 

4112 

39 

2133 

TO 

2141 

IO 9 

4 II 3 

TO 

4l5l 

4 O 

2 1 4 2 

TO 

2172 

110 

4 1 5 2 

TO 

4202 

4l 

2173 

TO 

2176 

111 

4203 

TO 

4232 

42 

2177 

TO 

2232 

Uti 

4233 

TO 

4256 

43 

2233 

TO 

2275 

119 

4257 

TO 

4316 

44 

2276 

TO 

2333 

120 

431 7 

TO 

4367 

45 

2334 

TO 

2345 

121 

4370 

TO 

4432 

46 

2 346 

TO 

2376 

122 

44 33 

TO 

4472 

47 

2377 

TO 

2424 

151 

4473 

TO 

4523 

48 

2425 

TO 

2456 

152 

4524 

TO 

4566 

49 

2457 

TO 

2504 

153 

4567 

TO 

4631 

50 

2505 

TO 

2552 

154 

463 2 

TO 

4677 

51 

2553 

TO 

2575 

155 

4700 

TO 

4721 

52 

2576 

TO 

2627 

156 

4722 

TO 

4765 

53 

2630 

TO 

2667 

159 

4766 

TO 

5017 

54 

2670 

TO 

2675 

160 

5020 

TO 

5060 

55 

2676 

TO 

2742 

191 

5061 

TO 

5101 

56 

2743 

TO 

2777 

192 

5102 

TO 

5 1 4 O 

57 

3000 

TO 

3006 

284 

5l4l 

TO 

5201 

58 

3007 

TO 

3035 

293 

5202 

TO 

5233 

59 

3036 

TO 

3043 

294 

5234 

TO 

5301 

60 

3 044 

TO 

3070 

295 

5302 

10 

534 O 

6l 

3 O 7 I 

TO 

3077 

523 

5341 

TO 

5371 

6 2 

3100 

TO 

3126 

533 

5372 

TO 

5415 

63 

3127 

TO 

3135 

534 

5416 

TO 

5465 

64 

3136 

TO 

3167 

535 

5466 

TO 

5520 

65 



3170 

536 

5521 

TO 

5553 

66 

3I7I 

TO 

3231 

547 

5554 

TO 

5575 

67 

3232 

TO 

3301 

5A8 

5576 

TO 

5611 

68 

3302 

TO 

3322 

550 

5612 

TO 

5653 

69 

3323 

TO 

3361 

551 

5654 

TO 

5705 

2 90 

3362 

TO 

3372 

552 

5706 

TO 

5741 

291 

3373 

TO 

3446 

624 

5742 

10 

5764 

292 

3447 

TO 

3520 

625 

5765 

10 

5766 

759 
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57 77 

69 

04,6374 

TO 

04,6402 

111 

O 3 * bOOO 

TO 

03,6041 

7 O 

04 ,6403 

TO 

04,6450 

112 

03,6042 

TO 

0 3 , 6 1 1 4 

7l 

O 4 ,645 1 

To 

04,6506 

113 

03,6115 

TO 

O 3 , 6 1 5 7 

72 

04,6507 

TO 

04 , 6 534 

114 

03,6l60 

TO 

03,6225 

73 

04,6535 

TO 

04,6551 

II 5 

03,6226 

TO 

0 3 ,6260 

74 

04,6552 

TO 

04,6613 

ll6 

03,6261 

TO 

03,6322 

75 

04,6614 

TO 

04,6623 

117 

03,6323 

TO 

03*6363 

76 

04,6624 

TO 

04,6652 

123 

03,6364 

TO 

03,6433 

77 

04 ,66 5 3 

TO 

04,6704 

124 

03,6434 

TO 

03*64 76 

76 

04,6705 

TO 

04,6746 

uo 

03,6477 

TO 

03*6534 

79 

04,6747 

TO 

04,7004 

I4l 

03,6535 

TO 

O 3 *65t>7 

bo 

04,7005 

TO 

04,7055 

142 

03,6570 

TO 

03,6623 

6l 

04*7056 

TO 

04,7113 

143 

O 3 , 6624 

TO 

O 3 * 6654 

82 

04*7114 

TO 

O 4 ,7146 

144 

O 3 , 6655 

TO 

03,6701 

83 

04,7147 

TO 

04,7153 

I 45 

03,6702 

TO 

03,67^4 

84 

04,7154 

TO 

04,7177 

146 

03,6745 

TO 

03,6766 

85 

04,7200 

TO 

04, 7240 

147 

03,6767 

TO 

03,7032 

86 

04,7241 

TO 

04,7303 

148 

03,7033 

TO 

03,7057 

87 

04,7304 

TO 

04,7340 

149 

03,7060 

TO 

03,7117 

88 

04,7341 

10 

04,7362 

150 

03,7120 

TO 

03,7142 

89 

04,7363 

TO 

04 , 7374 

477 

03 , 7 1 43 

TO 

03,7174 

90 

04,7375 

TO 

04,7456 

478 

03,7175 

TO 

03,7211 

91 

04,7457 

TO 

04 ,7515 

479 

03,7212 

TO 

03,7262 

92 

04,7516 

TO 

04,7517 

759 

03*7263 

TO 

03*7317 

93 

05,6000 

TO 

05*6032 

235 

03, / 320 

TO 

03*7352 

94 

05*6033 

TO 

05,6100 

236 

03,7353 

TO 

03*7367 

95 

05*6101 

TO 

05,6104 

237 

03,7370 

TO 

03,7434 

96 

05*6105 

TO 

05,6125 

238 

03,7435 

TO 

03,7464 

97 

05,6126 

TO 

05,6141 

239 

03,7^65 

TO 

03 , 7466 

759 

05*6142 

TO 

05 , 6 166 

240 

04,6000 

TO 

04 ,6042 

99 

05 * b 167 

TO 

05,6217 

241 



04 ,6043 

100 

05*6220 

TO 

05,625? 

242 

04,6044 

TO 

04,6107 

101 

05*6253 

TO 

05,6261 

243 

04,6110 

TO 

04,6144 

102 

05 *6262 

TO 

05,6315 

244 

04,6145 

TO 

04 ,6206 

104 

05*6316 

TO 

05,6351 

245 

04,6207 

TO 

04,6255 

105 

05,6352 

TO 

O 5 ,6360 

246 

04,6256 

TO 

04,6273 

106 

05,6361 

TO 

05 , 6 3 6 6 

247 

04,6274 

TO 

04,632? 

107 

05,6367 

TO 

05 ,6406 

248 

O 4 ,6330 

TO 

04,6355 

108 

05,6407 

TO 

05,6443 

249 

04,6356 

TO 

04,6373 

IO 9 

05,6444 

TO 

05*6463 

250 
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TO 

05,6501 

251 

Os »6S02 

TO 

05,6544 

252 

OS ♦ 6 S AS 

TO 

O 5 , 6602 

253 

Os » 6 6 0 3 

TO 

05,6651 

254 

Os *6682 

TO 

05 ,6725 

255 

0Si6726 

TO 

05,6751 

256 

05,6752 

TO 

05,7015 

257 

05,7016 

TO 

05,7051 

258 

05,7052 

TO 

05,7103 

259 

05,7104 

TO 

05,7143 

260 

05,7144 

TO 

05,7152 

264 

05,7153 

TO 

05,7212 

540 

05,7213 

TO 

05,7263 

541 

05,7264 

TO 

05,7336 

542 

05,7337 

TO 

05,7416 

543 

05,7417 

TO 

05,7465 

544 

05 , ^466 

TO 

05,7536 

545 

05,7537 

TO 

05 , 7604 

546 

05,7605 

TO 

05,7606 

759 

06 , 6000 

TO 

06,6052 

486 

06,6053 

TO 

06,6112 

487 

06 , 6 1 1 3 

TO 

06,6174 

488 

06,6175 

TO 

06,6245 

489 

Ob ,6246 

TO 

06,6314 

490 

Ob ,6315 

TO 

06,6370 

491 

06,6371 

TO 

06,6443 

492 

06,6444 

TO 

06,6501 

493 

06,6502 

TO 

06,6554 

494 

06,6555 

TO 

06,6630 

495 

06 ,6631 

TO 

06,6644 

496 

Ob ,6645 

TO 

06 , 6676 

508 

06,6677 

TO 

06,6747 

509 

06,6750 

TO 

06,7014 

510 

Ob, / 0 1 5 

TO 

06,7053 

511 

06,7054 

TO 

06,7123 

Si 7 

Ob , 7 1 2 4 

TO 

0 

0 

5ie 

06,71 7l 

TO 

06,7236 

5l9 

06,7237 

TO 

06^72^0 

520 

06,7241 

TO 

06f72^3 

523 

06,72 44 

TO 

06 1 7 3 1 6 

524 
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06,7317 

TO 

06,7340 

525 

06,7341 

TO 

Ob ,7362 

526 

Ob , 7363 

TO 

06,7433 

527 

Ob ,7434 

TO 

Ob , 7^6^ 

528 

06 , 7465 

TO 

06,7502 

530 

06,7503 

TO 

06,7563 

531 

06,7564 

TO 

05,7577 

532 

Ob , 7600 

TO 

06,7621 

536 

Ob, 7622 

TO 

06 ,7631 

537 

06,7632 

TO 

06,7633 

759 

0 7,6000 

TO 

0 7 ,6044 

497 

07,6045 

TO 

07,6124 

498 

07,6125 

TO 

07,6203 

499 

O7 , 6204 

10 

07,6207 

500 

07,6210 

TO 

07,6256 

501 

07,0257 

TO 

07,6327 

502 

07,6330 

TO 

07,6357 

503 

O7 ,6360 

TO 

07,6434 

505 

07,6435 

TO 

07,6507 

506 

07,6510 

TO 

O7 ,6562 

507 



0 7 ,6563 

508 

07,6564 

TO 

0 7 , 6633 

512 

07,6634 

TO 

07*6711 

513 

07,6712 

TO 

0 7 ,6762 

514 

07,6763 

TO 

07,7032 

515 

O7 , 7O33 

TO 

07,7101 

516 

O7, 7102 

TO 

07,7133 

521 

07,7134 

ro 

07,7203 

522 

07,7204 

ro 

07,7224 

523 

07,7225 

TO 

07,7255 

525 

07,7256 

TO 

07,7272 

526 

07,7273 

TO 

07,7276 

528 

07, 7277 

TO 

07,7341 

529 

07,7342 

TO 

07,7353 

530 

07,7354 

TO 

07,7372 

533 

07,7373 

TO 

07,7A22 

534 

07,7423 

TO 

07,7433 

536 

07,743*, 

TO 

07,7461 

550 

07,7462 

10 

07,7500 

55 1 

07,7501 

TO 

07,7527 

552 
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O 7 , 1530 

TO 

07,7531 

759 

11 

,6032 

TO 

11,6102 

266 

10,6000 

TO 

10,60S3 

157 

11 

,6103 

TO 

11,6155 

267 

10,6054 

TO 

10,6114 

158 

11 

, 6 156 

TO 

11,6235 

268 

10,6115 

TO 

1 0 , 6 1 40 

1 6 1 

11 

,6236 

TO 

11, 6304 

269 

10,6141 

TO 

10,6162 

162 

11 

,6305 

TO 

11 ,6362 

27 O 

I0,6l63 

TO 

10,6222 

l63 

11 

,6363 

TO 

1 1,6437 

271 

10,6223 

TO 

10,6233 

164 

11 

,6440 

TO 

11,6511 

272 

10,6234 

TO 

1 0 ,62 7 7 

l65 

11 

,6512 

TO 

1 1 ,6567 

273 

10,6300 

TO 

10,6347 

1 66 

11 

,6570 

TO 

1 1 ,6644 

274 

10,6350 

TO 

10,6354 

l67 

11 

, 6645 

TO 

11,6706 

275 

10,6355 

TO 

10,6422 

168 

11 

,6707 

TO 

11 ,6762 

276 

10,6423 

TO 

10 ,6446 

169 

U 

,6763 

TO 

11,7036 

277 

10,6447 

TO 

10,6500 

170 

11 

,7037 

TO 

11,7112 

278 

10,6501 

TO 

10,6533 

I 7 I 

11 

,7113 

TO 

11 ,7166 

279 

10,6534 

TO 

10,6605 

172 

11 

,7l67 

TO 

11,7242 

280 

10,6606 

TO 

10,6630 

173 

11 

,7243 

TO 

11,7313 

281 

10,6631 

TO 

10,6646 

174 

11 

,7314 

TO 

11 .7374 

202 

10,6647 

TO 

10,6700 

175 

11 

,7375 

TO 

11,7376 

203 

10,6701 

TO 

10,6733 

176 

11 

,7377 

TO 

11,7420 

284 

10,6734 

TO 

10,7004 

177 

11 

,7421 

TO 

11,7466 

285 

10,7005 

TO 

10,7054 

178 

11 

,7467 

TO 

11,7533 

286 

10,7055 

TO 

10,7075 

I 79 

11 

, ^534 

TO 

1 1 • rtoy 

287 

10,7076 

TO 

10,7140 

180 

11 

,7610 

TO 

1 1 , ^657 

288 

10,7141 

TO 

10,7211 

181 

11 

,7660 

TO 

11,7724 

289 

10,7212 

TO 

10,7260 

182 

11 

,7725 

TO 

11,7733 

294 

10,7261 

TO 

10,7332 

183 

11 

, ^734 

TO 

11,7735 

759 

10,7333 

TO 

10,7336 

184 

12 

,6000 

TO 

12,6053 

3g2 

10,7337 

TO 

10,7357 

185 

12 

,6054 

TO 

12,6125 

393 

10,7360 

TO 

10,7376 

186 

12 

,6126 

TO 

12,6202 

394 

10,7377 

TO 

10,7407 

187 

12 

,6203 

TO 

12,6261 

395 

10,7410 

TO 

10, 74*,7 

188 

12 

,6262 

TO 

12,6343 

396 

10,7450 

TO 

10,7503 

U9 

12 

,6344 

TO 

12,6371 

397 

10,7504 

TO 

10,7552 

229 

12 

,6372 

TO 

12,6444 

398 

10,7553 

TO 

10,7554 

230 

12 

, 64*t5 

TO 

12,6510 

399 

10,7555 

TO 

1 0 , 76 1 4 

231 

12 

,6511 

TO 

12,6563 

400 

10,7615 

TO 

10,7667 

232 

12 

,6564 

TO 

12,6605 

401 

10,7670 

TO 

10,7671 

233 

U 

,6606 

TO 

12,6612 

402 

10, 7672 

TO 

10,77*t0 

234 

12 

,6613 

TO 

12, 66 7 O 

403 

10,7741 

TO 

10,7742 

759 

12 

,6671 

TO 

12,6705 

404 

1 1,6000 

10 

11,6031 

265 

12 

,6706 

TO 

12,6720 

405 
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12 »672 I 

TO 

12,6750 

406 

1 3, /I7 r 

1 D 

1 3 1 7204 

264 

12,6761 

TO 

12,7027 

4O j 

I3, 7205 

TO 

13,7232 

754 

12, ?a30 

TO 

12,7065 

40 0 

13,7233 

TO 

13,7257 

755 

12 , 7 0 66 

TO 

12,7144 

4O9 

1 3 . 7260 

10 

13,7307 

756 

12, M45 

TO 

12 ,7152 

410 

13,7310 

TO 

13,7331 

757 

12,7153 

TO 

12,7204 

4 1 1 

I3, 7332 

10 

13,7346 

758 

12,7205 

TO 

12,7254 

4l2 

1 3 , 7347 

1 0 

13,7350 

760 



12,7255 

4I3 

l4,6000 

10 

1 4 , 6^42 

193 

12,7256 

TO 

12,7276 

4I4 

1 4 ,6043 

TO 

I4 ,6103 

194 

12,7277 

TO 

12,7330 

4I5 

1 A , 6 104 

TO 

1 4 , 6 1 33 

195 

12,7331 

TO 

12,7354 

4l6 

1 4 , 6 1 34 

10 

l4,6l70 

196 

12,7355 

TO 

12,7405 

4I7 

14,617! 

TO 

1 4 ,6204 

197 

12,7406 

TO 

12,7415 

4le 

1 4 , 6205 

TO 

14,6215 

198 

12,7416 

TO 

12,7470 

4I9 

I 4 , 62 1 6 

TO 

14,6244 

199 

12,747! 

TO 

12,7512 

420 

14,6245 

TO 

14,6260 

200 

12,7513 

TO 

12,7574 

421 

1 4 , 6 2 6 1 

TO 

14,6326 

201 

12,7575 

TO 

12,7653 

422 

14,6327 

10 

14,636® 

202 

12,7654 

TO 

12,7734 

423 

1 4 , 6361 

TO 

14,6405 

203 

12,7735 

TO 

12,7737 

424 

1 4 , 6^06 

TO 

14,6452 

204 

12,7740 

TO 

12,7757 

425 

14,6453 

TO 

1 4 ,6460 

205 



12,7760 

759 

1 4 , 64 6 1 

TO 

14,6515 

206 



12,7761 

760 

14,6516 

10 

14,6542 

207 

13,6000 

TO 

13,6036 

125 

1 4 , 6543 

TO 

1 4 , 66 1 0 

208 

13,6037 

TO 

13,6106 

126 

1 4 , 6 6 1 1 

TO 

14,6650 

209 

13,6107 

TO 

13, 6157 

127 

1 4 , 665 1 

10 

14,6676 

210 

1 3 , 6 1 6 0 

TO 

13,6231 

128 

14,6677 

10 

14,6735 

211 

13,6232 

TO 

13,6303 

129 

14,6736 

TO 

14,6756 

212 

13,6304 

TO 

13,6357 

130 

14,6757 

TO 

l4, 7OI6 

213 

13 ,6360 

TO 

13,6427 

131 

14,7017 

10 

14,7054 

214 

13,6430 

TO 

13,6501 

132 

14,7055 

TO 

14,7060 

215 

13,6502 

TO 

13,6551 

133 

14,7061 

TO 

14,7116 

216 

13,6552 

TO 

13,6562 

134 

14,7117 

TO 

l4,7l44 

217 

13 ,6563 

TO 

13,6616 

135 

14, 7 I45 

TO 

14,7170 

216 

13,6617 

TO 

13,6647 

136 

l4,7l 71 

TO 

14,7215 

219 

13,6650 

TO 

13,6675 

137 

14,7216 

TO 

14,7236 

220 

13,6676 

TO 

13,6740 

138 

14,7237 

TO 

14,7260 

221 

13 ,6741 

TO 

13,6752 

139 

l4,726l 

1 0 

14,7324 

222 

13,6753 

TO 

13,7032 

261 

U, 7325 

TO 

14,7346 

223 

13,7033 

TO 

13,7114 

262 

14,7347 

TO 

14,7403 

224 

13,7115 

TO 

13 ,7l76 

263 

14 , 7404 

TO 

14,7432 

225 
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14,7433 

TO 

14,7501 

226 

21»7565 

TO 

21,7566 

760 

14,7502 

TO 

14,7523 

227 

22 ,8000 

TO 

22 ,6047 

366 

14,7524 

TO 

14,7547 

228 

22,6050 

TO 

22,6121 

367 

14,7550 

TO 

14,7564 

577 

22,6122 

TO 

22 ,6127 

368 

14,7565 

TO 

14,7572 

578 

22,6130 

TO 

22 ,6146 

369 

14,7573 

TO 

14,7574 

760 

22,6147 

TO 

22,6211 

370 

21,6000 

TO 

21,602 7 

332 

22,6212 

TO 

22,6260 

371 

21,6030 

TO 

21 ,60/3 

333 

22 ,6261 

TO 

22,6327 

372 

21 ,6074 

TO 

2 1 ,6137 

334 

22 ,6330 

TO 

22,6351 

373 

21,6140 

TO 

21,6203 

335 

22,6352 

TO 

22 ,641 1 

46l 

21,6204 

TO 

21,6210 

336 

22,6412 

TO 

22,6435 

462 

21,6211 

TO 

2 1 ,6254 

337 

22,6436 

TO 

22,6473 

463 

2 1 ,6255 

TO 

21 ,6265 

338 

22,6474 

TO 

22,6522 

464 

21 ,6266 

TO 

21 ,6332 

339 

22 ,6523 

TO 

22,6554 

465 

21,6333 

TO 

21,6376 

340 

22,6555 

TO 

22 , 6626 

466 

21,6377 

TO 

21, 6442 

341 

22,6627 

TO 

22 ,6642 

467 

21,6443 

TO 

21,6450 

342 

22 ,6643 

TO 

22,6712 

468 

21, 645 1 

TO 

2 1 ,65 1 3 

343 

22,6713 

TO 

22,6731 

469 

21,6514 

TO 

21,6565 

344 

22,6732 

TO 

22,6757 

47 Q 

21 ,6566 

TO 

21,6573 

345 

22 , 6760 

TO 

22,7002 

47 1 

2 1 ,6574 

TO 

21 ,6644 

346 

22,7003 

TO 

22,7042 

472 

21,6645 

TO 

2 1 ,6657 

34 7 

22 ,7043 

TO 

22,7112 

473 

2 1 , 6660 

TO 

21,6701 

348 

22,7113 

TO 

22,7115 

474 

21,6702 

TO 

21,6743 

349 

22,7116 

TO 

2 2, 7 1 6 6 

475 

21,6744 

TO 

21,6753 

350 

22,7167 

TO 

22,7202 

476 

21,6754 

TO 

21,7027 

351 

22,7203 

TO 

22,7204 

760 

21,7030 

TO 

21,7031 

352 

23,6000 

TO 

23,6025 

296 

21,7032 

TO 

21 ,7073 

353 

23,6026 

TO 

23,6064 

297 

21,7074 

TO 

21,7142 

354 

2 3 ,6065 

TO 

23,6141 

298 

21,7143 

TO 

21,7l73 

355 

23,6142 

TO 

23,6143 

299 

21,7174 

TO 

21,7245 

356 

23,6 144 

TO 

23,6215 

300 

21,7246 

TO 

21,7251 

357 

23,6216 

TO 

23,6267 

301 

21,7252 

TO 

21 ,7320 

358 

23,6270 

TO 

23,6276 

302 

21,7321 

TO 

21,7373 

359 

23,6277 

TO 

23,6310 

303 

21,7374 

TO 

21 ,7440 

360 

23,6311 

TO 

23,6347 

304 

21,7441 

TO 

21 ,74*t4 

36l 

23,6350 

TO 

2 3, 64 O 5 

305 

21 ,7445 

TO 

21,7473 

362 

23, 6406 

TO 

23,6457 

306 

21,7474 

10 

21,7537 

363 

23, 6460 

TO 

23,6471 

3 O 7 

21,7540 

TO 

21,7541 

364 

23,6472 

TO 

2 3 , 65 1 4 

308 

21,7542 

TO 

21 ,7564 

365 

23,6515 

TO 

23,6556 

3 O 9 
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23*6557 

TO 

23,66l6 

3lO 

23,6617 

TO 

23 ,6670 

311 

2 3 * 667 I 

TO 

23,6727 

3 I 2 

23,6730 

TO 

2 3 , 676 A 

3l3 

23,6765 

TO 

23,7013 

3l4 

23, 701A 

TO 

23,7056 

315 

23,7057 

TO 

23,7106 

3l6 

23, 7 IO 7 

TO 

23,7130 

3 I 7 

23,7131 

TO 

23,7U2 

3l8 

23,7U3 

TO 

23.7201 

3l9 

23,7202 

TO 

23,7245 

320 

23,7?A6 

TO 

23,7314 

321 

23,7315 

TO 

23,7344 

322 

23,73A5 

TO 

23,7375 

323 

23,7376 

TO 

23,7427 

324 

23,7A30 

TO 

23,7475 

325 

23 , 7 A 76 

TO 

23,7477 

760 

24,6000 

TO 

24,6017 

554 

24,6020 

TO 

24,6045 

555 

24,6046 

TO 

24,6111 

561 

24,6112 

TO 

2A,6ll3 

562 

24,6114 

TO 

24,6l55 

576 

24,6156 

TO 

24,6200 

577 

24 ,6201 

TO 

24,6244 

6 O 9 

24,6245 

TO 

24 ,6314 

6l0 

24,6315 

TO 

24,6353 

6ll 

24 ,6354 

TO 

2A,6356 

612 

24,6357 

TO 

24,6362 

620 

24,6363 

TO 

24 , 6426 

621 

24 , 6A 27 

TO 

24,6A67 

622 

24 ,6A70 

TO 

24,6511 

623 

24,6512 

TO 

24 ,6513 

760 

25 f 6000 

TO 

25,6042 

628 

25,6043 

TO 

25,6070 

629 

25,6071 

TO 

25,6106 

630 

25,6107 

TO 

25,6l52 

631 

25,6153 

TO 

25t6l65 

632 

25,6166 

TO 

25,6211 

633 

25,6212 

TO 

2 5 ,624 1 

634 

25,62a2 

TO 

25,6277 

635 
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25,6300 

TO 

25,6337 

636 

25 , 6340 

TO 

25,6373 

637 

25,6374 

TO 

25,6417 

638 

25,6420 

TO 

25,6453 

639 

25.6454 

TO 

25,6527 

640 

25,6530 

TO 

25,6576 

64 1 

25,6577 

10 

25,6651 

642 

2 5 ,6652 

TO 

25,6726 

643 

25,6727 

TO 

25,7001 

644 

25,7002 

TO 

25,7054 

645 

25,7055 

TO 

25,7122 

646 

25,7123 

TO 

25 ,7l67 

647 

25,7170 

TO 

25,7213 

648 

25,7214 

TO 

25,7263 

649 

25,7264 

TO 

25,7331 

650 

25 , 7332 

TO 

25,7400 

651 

25,7401 

TO 

25,7A45 

652 



25,7446 

653 

25,7447 

fO 

25,7513 

654 

25 , 7514 

TO 

25,7520 

655 

25,7521 

TO 

25 ,7542 

656 

25,7543 

TO 

25,7544 

760 

26,6000 

TO 

26,6036 

657 

26,6037 

TO 

26 , 6 1 06 

658 

25,6107 

TO 

2 6 ♦ 6 1 6 1 

659 

2 6 , 6 1 62 

TO 

26,6226 

660 

25,6227 

TO 

26,6270 

661 

25,6271 

TO 

26, 6340 

662 

26 ,6341 

TO 

26, 64 1 0 

663 

26,6411 

TO 

26,6453 

664 

26,6454 

TO 

26,6524 

665 

26,6525 

TO 

26,6576 

666 

26,6577 

TO 

26, 6650 

667 

26,6651 

TO 

26 ,6716 

668 

26,6717 

TO 

26,6771 

669 

26,6772 

TO 

26*7042 

670 

26 , 7 O 43 

TO 

26,7116 

67 1 

26, 7117 

TO 

26,7l72 

672 

25 , 7 I 73 

TO 

26,7243 

673 

26, 7244 

TO 

26,7315 

674 
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26,7316 

TO 

26,7370 

675 

30,6140 

TO 

30,6l7A 

329 

26,7371 

TO 

26,7436 

676 

30,6175 

TO 

30,62A0 

330 

26,7A37 

TO 

26,7510 

677 

30,6241 

TO 

30,6251 

331 

26,7511 

TO 

26,7561 

678 

30,6252 

TO 

30 ,6263 

374 

26,7562 

TO 

26,7640 

679 

30,6264 

TO 

30,6267 

375 

26,7641 

TO 

26,7704 

680 

30,6270 

TO 

30,6302 

376 

26,7705 

TO 

26,7710 

68l 

30,6303 

TO 

30,6323 

377 

26,7711 

TO 

26,7754 

751 

30 ,6324 

TO 

30,63AA 

378 

26,7755 

TO 

26,7771 

752 

30,6345 

TO 

30,6A02 

379 

26,7772 

TO 

26,7773 

760 

3 0 ,6403 

TO 

30 , 6A 1 A 

380 

27,6000 

TO 

27,6032 

698 

30 ,641 5 

TO 

30,6A35 

381 

27,6033 

TO 

27,6057 

699 

30 ,6A36 

TO 

30,6502 

382 

27,6060 

TO 

27,6122 

700 

30,6503 

TO 

30,6551 

383 

27,6123 

TO 

27,6150 

7 OI 

30,6552 

TO 

30,6562 

384 

27,6l5l 

TO 

27,6176 

702 

30,6563 

TO 

30,6605 

385 

27,6l77 

TO 

27,6200 

703 

30 ,6606 

TO 

30,6622 

386 

27 ,6201 

TO 

27,6215 

716 

30,6623 

TO 

30,6700 

387 

27,6216 

TO 

27,6271 

7l7 

30,6701 

TO 

30,6715 

388 

27,6272 

TO 

27 ,6346 

7l8 

30,67lb 

TO 

30 ,67l7 

389 

27,6347 

TO 

27,6375 

719 

30,6720 

TO 

30,6767 

39 O 

27,6376 

TO 

2? ,6450 

720 

30,6770 

TO 

30,6771 

391 

27,6451 

TO 

27,651? 

721 

30,6772 

TO 

30,70A0 

7 O 4 

27,6520 

TO 

27,6543 

722 



30,70A1 

705 

27,6544 

TO 

27,6616 

723 

30,7042 

TO 

30,7114 

736 

27,6617 

TO 

27,6672 

724 

30 , 7 1 I 5 

TO 

30, 7l7A 

737 

2^,6673 

TO 

27,6736 

725 

30,7175 

TO 

30,7242 

738 

27,6737 

TO 

27,7004 

726 

30,7243 

TO 

30 , 7305 

739 

27 , 7005 

TO 

27,70‘t3 

727 

30,7306 

TO 

30,7312 

7A0 

27,7044 

TO 

27,7074 

7 28 

30,7313 

TO 

30,7361 

74 I 

27,7075 

TO 

27,7141 

729 

30,7362 

TO 

30,7363 

7A2 

27,7142 

TO 

27,7146 

730 

3 0 , 7 3 6 A 

TO 

30,7427 

743 

27,7147 

TO 

27,7177 

731 

30 , 7 A 30 

TO 

30,7501 

744 

27,7200 

TO 

27,7202 

732 

30 , 7502 

TO 

30,7523 

745 

27,7203 

TO 

27,7256 

733 

30, 752A 

TO 

30,7547 

746 

27,7257 

TO 

27,7334 

73A 

30,7550 

TO 

30,7617 

7 A 7 

27,7335 

TO 

27,7353 

735 

30, 7620 

TO 

30, 7663 

748 

27,7354 

TO 

27,7355 

760 

30, 766A 

TO 

30,7735 

749 

30,6000 

TO 

30 , 6 O 4 A 

326 

30,7736 

TO 

30,7754 

75O 

30,60A5 

TO 

30, 6066 

327 



30,7755 

760 

30,6067 

TO 

30,6137 

328 



30, 7756 

76l 
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31*6000 

TO 

31 ,6096 

689 

31,6097 

TO 

3 1 , 6 1 1 6 

685 

3 1 , 6 1 1 7 

TO 

31 ,6l7l 

686 

31 *6l72 

TO 

31,6290 

687 

3 I * 6 2 9 1 

TO 

31,6311 

688 

31,6312 

TO 

31,6322 

689 

31,6323 

TO 

31 ,6 363 

690 

31 , 6 3 6 A 

TO 

31,6935 

69l 

31 ,6A36 

TO 

3 1 ,699 1 

692 

31,6992 

TO 

31,6519 

693 

31,6515 

TO 

31,6565 

699 

3 1 ,6566 

TO 

31 ,6637 

695 

31 ,6690 

TO 

31,6676 

696 

31 ,6677 

TO 

31 ,6736 

706 

31,6737 

TO 

31,7005 

7 O 7 

31 ,7006 

TO 

31 , 7059 

708 

31,7055 

TO 

31,7125 

7O9 

31,7126 

TO 

31,7200 

710 

31 , 7201 

TO 

31,7296 

7II 

31 , 7297 

TO 

31,7321 

7I2 

31 , 7322 

TO 

31,7375 

7I3 

31 ,7376 

TO 

31,7995 

71-9 

31 , 7996 

TO 

31,7513 

7I5 

31 , 7519 

TO 

31,7517 

7l6 

31,7520 

TO 

31,7539 

753 

31 , 7535 

TO 

31,7536 

761 

32,6000 

TO 

32,6095 

553 

32, 6096 

TO 

32,6065 

559 

32 ,6066 

TO 

32,6133 

556 

32,6139 

TO 

32,6203 

55 7 

32,6209 

TO 

32 ,6297 

558 
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32,t,250 

TO 

32,6312 

559 

32,6313 

TO 

32,6335 

560 

32 ,6336 

10 

32,6376 

563 

32,6377 

TO 

32,6991 

569 

32,6992 

TO 

32,6503 

56 5 

32,6509 

TO 

32,6510 

566 

32,6511 

TO 

32,6559 

567 

32,6555 

TO 

32,6621 

568 

32,6622 

TO 

32,6665 

569 

32, 6666 

TO 

32,670? 

57 O 

32 ,6710 

TO 

32,6755 

57I 

32,6756 

TO 

32,7021 

572 

32,7022 

TO 

32, 7 O 66 

573 

32,7067 

TO 

32,7131 

579 

32,7132 

TO 

32,7151 

575 

32 ♦ 7152 

TO 

32,7215 

579 

32,7216 

TO 

32,7261 

580 

32,7262 

TO 

32,7330 

581 

32,7331 

TO 

32,7376 

582 

32, 7377 

TO 

32 ,7992 

583 

32 , 799 3 

TO 

32,7510 

589 

32,7511 

TO 

32,7559 

585 

32,7555 

TO 

32,7601 

586 

32,7602 

TO 

32 ,7699 

587 

32,7695 

TO 

32,7706 

588 

32,7707 

TO 

32,7792 

589 

32,7793 

TO 

32,7799 

76l 

33,6000 

TO 

33,6005 

589 

33 ,6006 

TO 

33,6051 

59 O 

33,6052 

TO 

33,6129 

59I 

33,6125 

TO 

33,6l75 

592 
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33,6176 

TO 

33 ,6295 

593 

39,6323 

to 

39,6902 

931 

33,6296 

TO 

33,6259 

599 

39,6903 

to 

39,6993 

932 

33,6255 

TO 

33.6321 

595 

39 ,6999 

to 

39,6519 

93 3 

33,6322 

TO 

33,63/2 

596 

39,6515 

TO 

39,6551 

939 

33,6373 

TO 

33,6903 

597 

39,6552 

to 

39,6571 

935 

33 , 6909 

TO 

33 ,6932 

598 

39,6572 

TO 

39,6611 

936 

33,6933 

TO 

33,6975 

599 

39,6612 

to 

39,6632 

93? 



33,6976 

600 

39,6633 

TO 

39,6706 

938 

33,6977 

TO 

33,6529 

601 

39,6707 

TO 

39,6710 

939 

33,6525 

TO 

33,6566 

602 

39,6711 

TO 

39,6713 

99 O 

33,6567 

TO 

33 , 6620 

603 

39,6719 

TO 

39,6731 

991 

33,6621 

TO 

33,6656 

609 

39,6732 

TO 

39,6776 

992 

33,6657 

TO 

33,6712 

605 

39,6777 

TO 

39 , 7^36 

993 

33,6713 

TO 

33 , 6760 

606 

39,703? 

TO 

39,7111 

999 

33,6761 

TO 

33,7025 

6 O 7 

39,7112 

TO 

39,7120 

995 

33, r026 

TO 

33,7036 

608 

39,7121 

TO 

39,7179 

996 

33,7037 

TO 

33,7079 

613 

39,7175 

TO 

39 ,7206 

997 

33,7075 

TO 

33,7193 

6 1 9 

39, 720? 

TO 

39,7290 

998 

33,7199 

TO 

33,7206 

615 

39,7291 

TO 

39,7257 

999 

33,7207 

TO 

33 , 72^3 

6l6 

39, /260 

TO 

39,7391 

950 

33,7229 

TO 

33,7257 

6l7 

39,7392 

TO 

39 , 7369 

951 

33,7260 

TO 

33,7325 

6l8 

39,7365 

TO 

39,7996 

952 

33,7326 

TO 

33,7359 

6l9 

39,7997 

TO 

39, 7519 

953 

33,7355 

TO 

33,7906 

620 

39,7515 

TO 

39,7531 

959 

33,7907 

TO 

33,7995 

697 

39,7532 

TO 

39,7575 

955 

33,7996 

TO 

33,799/ 

76l 

39,7576 

TO 

39,7657 

956 

39,6000 

TO 

39 , 6060 

926 

39,7660 

TO 

39,7667 

957 

39 ,6061 

TO 

39,6192 

927 

39,7670 

TO 

39, / 75 I 

958 

39 , 6 1 93 

TO 

39,6229 

928 

39,7752 

TO 

39,7753 

959 

39,6225 

TO 

39,6290 

929 

39,7759 

TO 

39,7767 

960 

39,6291 

TO 

39,6322 

930 

39,7770 

TO 

3A ,7771 

76l 
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RlA 

SENSE 

line 

SET 

3 

(WIRES 

49-64) 

STICK 

it 

SiB 

SENSE 

line 

SET 

0 

(WIRES 

1-16) 

STICK 

it 

SIB 

Sense 

line 

set 

1 

(WIRES 

17-32) 

STICK 

it 

SlB 

Sense 

line 

SET 

2 

(WIRES 

33-48) 

STICK 

it 

SlB 

SENSE 

line 

SET 

3 

(WIRES 

49-64) 

STICK 

it 

S2A 

Sense 

LINE 

SET 

0 

(WIRES 

1-16) 

STICK 

it 

S2A 

SENSE 

LINE 

SET 

1 

(WIRES 

17-32) 

STICK 

it 

S2A 

sense 

line 

SET 

2 

(WIRES 

33-48) 

STICK 

it 

S2A 

Sense 

line 

SET 

3 

(WIRES 

49-64 ) 

STICK 

it 

52B 

sense 

line 

SET 

0 

(WIRES 

1-16) 

STICK 

it 

S2B 

SENSE 

LINE 

SET 

1 

(WIRES 

17-32) 

STICK 

it 

S2B 

SENSE 

LINE 

SET 

2 

(WIRES 

33-48) 

STICK 

a 

52B 

sense 

LINE 

SET 

3 

(WIRES 

49-64) 

STICK 

0 

SlA 

SENSE 

LINE 

SET 

0 

(WIRES 

1-16) 

STICK 

0 

5iA 

SLNSE 

LINE 

SET 

1 

(WIRES 

17-32) 

STICK 

0 

SlA 

Sense 

line 

Set 

2 

(WIRES 

33-48) 

STICK 

0 

SlA 

SENSE 

line 

SET 

3 

(WIRES 

49-64) 

SI ICK 

0 

TlB 

SENSE 

line 

set 

0 

(WIRES 

1-16) 

STICK 

0 

TIB 

SENSE 

line 

SET 

1 

(WIRES 

17-32) 

STICK 

0 

TIB 

SENSE 

line 

SET 

2 

(WIRES 

33-46) 

STICK 

0 

TlB 

SENSE 

LINE 

SET 

3 

(WIRES 

49-64) 

STICK 

0 

T2A 

SENSE 

line 

SET 

0 

(WIRES 

1-16) 

STICK 

0 

T2A 

Sense 

line 

SET 

1 

(WIRES 

17-32) 

STICK 

0 

T2A 

SENSE 

line 

SET 

2 

(WIRES 

33-48) 

STICK 

0 

T2A 

SENSE 

LINE 

SET 

3 

(WIRES 

49-64) 


4e^578A YUL SYSTEM FOR AGC^: REVISION 0 OF RRjGRAM SoLRUMSS BY 


PARAGRAPHS GENEt^ATED FOR |HlS ASSeMBLY; AODReSS LlMljS AND r^E 


13 

f bOOO 

TO 

13 

6377 

PARAGRAPH 


054 

MODULE 

324 

13 

<6400 

TO 

13 

6777 

Paragraph 


055 

MODULE 

B24 

13 

♦ ?000 

TO 

13 

7377 

paragraph 

0 

056 

MODULE 

B24 

1^ 

t6000 

TO 

14 

6377 

PARAGRAPH 

0 

060 

MODULE 

323 

14 

<6400 

TO 

14 

6777 

PARAGRAPH 

0 

06l 

MODULE 

B23 

14 

<7000 

TO 

14 

7377 

PARAGRAPH 

# 

062 

module 

323 

l4 

< ?400 

TO 

14 

7777 

PARAGRAPH 


063 

MODULE 

323 

21 

♦ 6000 

TO 

21 

6377 

PARAGRAPH 

* 

104 

MODULE 

328 

21 

♦ 6400 

TO 

21 

6777 

paragraph 

# 

105 

module 

328 

21 

.7000 

TO 

21 

7377 

PARAGRAPH 

0 

106 

module 

328 

21 

.7400 

TO 

21 

7777 

paragraph 

0 

107 

module 

328 

22 

*6000 

TO 

22 

6377 

paragraph 

0 

110 

module 

B29 

22 

*6400 

TO 

22 

6777 

paragraph 

0 

111 

module 

329 

22 

*7000 

TO 

22 

7377 

paragraph 

0 

112 

module 

329 

23 

*6000 

TO 

23 

6377 

paragraph 

0 

114 

module 

B29 

2 3 

.6400 

TO 

23 

6777 

PARAGRAPH 

0 

115 

MODULE 

829 

23 

,7000 

TO 

23 

7377 

paragraph 

0 

116 

MODULE 

329 

23 

, 7400 

TO 

23 

7777 

paragraph 

0 

117 

module 

329 

24 

*6000 

TO 

24 

6377 

PARAGRAPH 

0 

120 

module 

328 

24 

.6400 

TO 

24 

6777 

PARAGRAPH 

0 

121 

module 

B28 

25 

,6000 

TO 

25 

6377 

PARAGRAPH 

0 

124 

module 

321 

25 

.6400 

TO 

25 

6777 

PARAGRAPH 

0 

125 

module 

321 

25 

*7000 

TO 

25 

7377 

PARAGRAPH 

0 

126 

module 

321 

25 

.7400 

TO 

25 

7777 

ParaGraph 

0 

127 

Module 

B21 

26 

,6000 

TO 

26 

6377 

PARAGRAPH 

0 

130 

module 

B22 

26 

,6400 

TO 

26 

6777 

paragraph 

0 

131 

MODULE 

B22 

26 

*7000 

TO 

26 

7377 

paragraph 

0 

132 

module 

322 

26 

*7400 

TO 

26 

7777 

PARAGRAPH 

0 

133 

MODULE 

622 

27 

*6000 

TO 

27 

6377 

PARAGRAPH 

0 

134 

MODULE 

B22 

27 

.6400 

TO 

27 

6777 

paragraph 

0 

135 

MODULE 

322 

27 

*7000 

TO 

27 

7377 

PARAGRAPH 

0 

136 

MODULE 

322 

30 

.6000 

TO 

30 

6377 

paragraph 

0 

140 

MODULE 

321 

30 

. 6400 

TO 

30 

6777 

paragraph 

0 

141 

module 

B21 

30 

.7000 

TO 

30 

7377 

PARAGRAPH 

0 

142 

MODULE 

621 

30 

.7400 

TO 

30 

7777 

paragraph 

» 

143 

MODULE 

B21 

31 

.6000 

TO 

31 

6377 

paragraph 

0 

144 

MODULE 

323 

31 

.6400 

TO 

31 

6 777 

paragraph 

0 

145 

module 

323 

31 

, 7000 

TO 

31 

7377 

paragraph 

0 

146 

module 

323 

31 

.7400 

TO 

31 

7777 

paragraph 

0 

147 

module 

323 
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hanufactJRing Location coi>e are shown for each. 


SI ICK 

0 

T2B 

SENSE 

LINE 

SET 

0 

(WIRES 

1-16) 

STICK 

0 

T2B 

Sense 

line 

SET 

i 

(WIRES 

17-32) 

STICK 

0 

T2B 

Sense 

LINE 

SET 

2 

(WIRES 

33-48) 

STICK 

0 

TlA 

SENSE 

line 

SET 

0 

(WIRES 

1-16) 

stick 

0 

TIA 

Sense 

line 

set 

1 

(WIRES 

17-32) 

STICK 

0 

TlA 

SENSE 

LINE 

set 

2 

(WIRES 

33-48) 

stick 

0 

TlA 

SENSE 

line 

SET 

3 

(WIRES 

49-64 ) 

STICK 

0 

RlB 

Sense 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

RIB 

SENSE 

LINE 

SET 

5 

(WIRES 

81-96) 

STICK 

0 

RlB 

SENSE 

line 

SET 

6 

(WIRES 

97-112) 

STICK 

0 

RIB 

SENSE 

LINE 

SET 

7 

(WIRES 

1 13-128) 

STICK 

0 

R2A 

Sense 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

R2A 

SENSE 

LINE 

SET 

5 

(WIRES 

81-96) 

SI ICK 

0 

R2A 

SENSE 

line 

SET 

6 

(WIRES 

97-112) 

STICK 

0 

R2B 

Sense 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

R2B 

SENSE 

line 

SET 

5 

(WIRES 

81-96) 

STICK 

0 

R2B 

SENSE 

line 

SET 

6 

(WIRES 

97-112) 

STICK 

0 

R2B 

SENSE 

line 

SET 

7 

(WIRES 

113-128) 

ST I CK 

0 

RlA 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

RlA 

SENSE 

line 

set 

5 

(WIRES 

81-96) 

STICK 

0 

SlB 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

SlB 

SENSE 

LINE 

SET 

5 

(WIRES 

81-96) 

STICK 

0 

SlB 

SENSE 

line 

set 

6 

(WIRES 

97-112) 

STICK 

0 

SIB 

SENSE 

line 

set 

7 

(WIRES 

113-128) 

STICK 

0 

S2A 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

52A 

SENSE 

line 

SET 

5 

(WIRES 

81-96) 

STICK 

0 

S2A 

Sense 

line 

set 

6 

(WIRES 

97-112) 

stick 

0 

52A 

SENSE 

line 

SET 

7 

(WIRES 

113-120) 

STICK 

0 

S2B 

SENSE 

LINE 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

S2B 

SENSE 

LINE 

set 

5 

(WIRES 

81-96) 

STICK 

0 

S2B 

SENSE 

LINE 

SET 

6 

(WIRES 

97-112) 

STICK 

0 

SiA 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

SlA 

SeNSe 

line 

Set 

5 

(WIRES 

61-96) 

STICK 

0 

Si A 

SENSE 

line 

SET 

6 

(WIRES 

97-112) 

STICK 

0 

SlA 

SENSE 

line 

SET 

7 

(WIRES 

1 13-128) 

STICK 

0 

TIB 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

0 

TIB 

SENSE 

line 

SET 

5 

(WIRES 

81-96) 

STICK 

0 

TlB 

SENSE 

line 

set 

6 

(WIRES 

97-112) 

STICK 

0 

TIB 

SENSE 

LINE 

SET 

7 

(WIRES 

113-128) 


^b<»b78A YUL system KOR AGc^J REVISION 0 OE PROGRAM SOLRUMS5 BY 


ParaGraphs gene^^atei^ for this assembly; address limits and tHe 


3^: »6000 

TO 

32*6377 

paragraph 

W 

150 

MODULE 

B2 

3 *6400 

TO 

32*6777 

paragraph 


151 

module 

B2 

3^! *7000 

TO 

32*7377 

PARAGRAPH 

# 

152 

MODULE 

B2 

32*7400 

TO 

32*7777 

PARAGRAPH 

0 

153 

MODULE 

B2 

33*6000 

TO 

33*6377 

PARAGRAPH 

0 

154 

MODULE 

B2 

33*6400 

TO 

33*6777 

PARAGRAPH 

0 

155 

MODULE 

B2 

33*7000 

TO 

33*7377 

PARAGRAPH 

0 

156 

MODULE 

B2 

33 * 7400 

TO 

33*7777 

PARAGRAPH 

0 

157 

MODULE 

B2 

3h * 6000 

TO 

34*6377 

PARAGRAPH 

0 

160 

module 

B2 

34 * 6400 

TO 

34*6777 

paragraph 

0 

161 

MODULE 

32 

34*7000 

TO 

34*7377 

PARAGRAPH 

0 

162 

MODULE 

B2 

34*7400 

TO 

34*7777 

Paragraph 

0 

163 

MODULE 

B2 


A 

tf 

A 

A 

4 

4 

4 

3 

3 

3 

3 
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manufacturing 

lqcai Ion 

CoDe, 

ARE 

shown For 

: each. 

stick 


T2A 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 


T2A 

Sense 

line 

SET 

5 

(WIRES 

81-96) 

STICK 


T2A 

SENSE 

line 

SET 

6 

(WIRES 

97-112) 

stick 


T2A 

SENSE 

LINE 

set 

7 

(WIRES 

113-128) 

STICK 

it 

T2B 

SENSE 

LINE 

SET 

4 

(WIRES 

65-80) 

STICK 

a 

T2B 

Sense 

LINE 

set 

5 

(WIRES 

81-96) 

STICK 

§ 

T2B 

SENSE 

LINE 

SET 

6 

(WIRES 

97-112) 

STICK 

§ 

T2B 

SENSE 

line 

set 

7 

(WIRES 

113-128) 

STICK 

it 

TlA 

SENSE 

line 

SET 

4 

(WIRES 

65-80) 

STICK 

a 

TIA 

SENSE 

LINE 

SET 

5 

(WIRES 

81-96) 

STICK 

a 

TlA 

SENSE 

LINE 

SET 

6 

(WIRES 

97-112) 

STICK 

if 

TIA 

SENSE 

line 

Set 

7 

(WIRES 

113-128) 


^b/+b7BA YUL SYSTEM FOR AGC^; REVISION 0 Of- PROGRAM SOLRUMSS bY 


OCTAL listing of PARAGRAPH # 0OA» wITH PARITY BIT IN BINARY AT 

ALL VALID Words are basic instructions except those marked "I” 


2000 


50026 

0 


30001 

0 

30027 

1 


02177 

2010 


50026 

0 


30001 

0 

30027 

1 


02630 

2020 


50026 

0 


30001 

0 

3DO27 

1 


02037 

2030 


20017 

0 


32075 

1 

5OOI5 

0 


07305 

20a0 


30015 

0 


07375 

1 

32045 

1 


30015 

2O5O 


02065 

0 


ObOO^t 

0 

50577 

1 


30001 

2060 


50573 

0 


10001 

1 

5 0 6 0 0 

1 


02071 

2070 


5O573 

0 


32075 

1 

30015 

0 


5O572 

2100 


00001 

0 


20017 

0 

32075 

1 


30015 

2110 


50123 

1 


4OOO 1 

i 

06145 

1 


10066 

2120 


30120 

1 


06l A5 

1 

5OOI5 

0 


00062 

2130 


32075 

1 


50015 

0 

06267 

1 


2ODI7 

21A0 


30015 

0 


063 5 6 

i 

C; 03000 

1 

c: 

05000 

2150 

c; 

uooo 

1 

C: 

15000 

0 

C: 16000 

0 

c; 

17000 

2160 

c: 

25000 

0 

C: 

26000 

0 

c; 27000 

1 

c: 

30000 

2170 

Ct 

35000 

1 

Cl 

36000 

1 

C: 37300 

0 


50577 

2200 


50030 

1 


30034 

0 

50031 

0 


45501 

2210 


30560 

1 


3055 { 

0 

30556 

1 


30555 

2220 


60001 

0 


50003 

1 

02226 

0 


30571 

2230 


3A516 

1 


60037 

0 

02272 

1 


42260 

22a0 


3056A 

0 


30563 

i 

30562 

0 


30561 

225O 


02252 

0 


00577 

1 

30577 

1 


7A606 

2260 

Cf 

6777A 

1 

C: 

76000 

0 

30031 

0 


50034 

227O 


30026 

0 


20025 

1 

5OO37 

0 


02233 

2300 


506A2 

1 


20000 

□ 

3OOOO 

1 


50601 

2310 


02321 

0 

C; 

77377 

1 

20017 

0 


30001 

2320 


aoooi 

1 


20601 

1 

50655 

1 


4OOOO 

233O 


02341 

0 


45503 

0 

6A516 

1 


30642 

23aO 


OOOOl 

0 


20601 

1 

36651 

0 


05662 

2350 


30001 

0 


20000 

0 

40000 

0 


60612 

2360 


20001 

1 


OOOOl 

0 

20001 

1 


30000 

2370 


30001 

0 


50115 

1 

06003 

1 


30116 
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the RIGHT OF EACH wQRDi «e*' DENOTES UNUSED FIXED MEMORY. 

(Interpretive operator wordS) or "C" (Constants), 


1 


50026 

0 


30001 

0 


30027 

1 

02034 

1 

0 


50026 

0 


30001 

0 


30027 

1 

02042 

0 

1 


50026 

0 


30001 

0 


30027 

1 

02377 

0 

0 


03007 

0 

C; 

01101 

0 


02266 

1 

32075 

1 

0 


0646 1 

1 

c; 

30461 

1 


50577 

1 

30001 

0 

0 


02065 

0 


35501 

0 


50574 

1 

06027 

1 

0 


06110 

1 


50600 

1 


20000 

0 

30000 

1 

1 


OOOOl 

0 

C; 

1 OOO4 

1 


50015 

0 

20600 

0 

0 


40000 

0 


50061 

0 


30123 

1 

74606 

1 

0 


OOOOl 

0 


20017 

0 


32075 

1 

50015 

0 

0 


32075 

1 


5OOI5 

0 


06256 

0 

50120 

1 

u 


50577 

1 


40001 

1 


50120 

1 

32O75 

1 

1 

C; 

07000 

0 

C; 

11000 

1 

C ; 

12000 

1 

C; 13000 

0 

1 

c: 

21000 

1 

c; 

22000 

1 

CI 

23000 

0 

c: 24O00 

1 

1 

C: 

31000 

0 

c; 

32000 

0 

Cl 

33000 

1 

c: 34000 

0 

1 


30001 

0 


02065 

0 


06374 

1 

3O015 

0 

1 


50571 

1 


30037 

0 


50001 

0 

34520 

1 

1 


30554 

0 


30553 

1 


30552 

0 

64476 

0 

1 


34516 

1 


30571 

1 


30037 

0 

10000 

0 

0 


3O57O 

0 


30567 

0 


30566 

1 

30565 

1 

0 


50015 

0 


50577 

1 


72667 

0 

10000 

0 

1 


20000 

0 


06000 

1 


10571 

0 

02203 

1 

0 


30030 

1 


5OOI5 

0 


30027 

1 

50001 

0 

1 


50571 

1 


02233 

1 


30001 

0 

20017 

0 

0 


73220 

0 


30601 

0 


25777 

1 

42311 

1 

0 


50642 

1 


20000 

0 


30000 

1 

50601 

0 

0 


20601 

1 


30647 

1 


10000 

0 

02332 

1 

1 


64516 

1 


5OOOI 

0 


30642 

1 

200lfc 

1 

0 


355OI 

0 


U2333 

0 


34516 

1 

60001 

0 

1 


10000 

0 


OOOOl 

0 

c; 

00017 

1 

OOOOl 

0 

1 


50612 

1 


33314 

1 


30015 

0 

50116 

1 

1 


50015 

0 


20115 

0 


OOOOl 

0 

10670 

1 



YUU SYSTEM FOR A6C4: REVISION 0 OF PROGRAM SOLRUM55 BY 


octal listing of paragraph # oo 5 » WITH parity bit in binary At 
all valid words are basic instructions except those marked til» 


2A00 


02A07 

0 

02571 

0 


44505 

1 


700U 

2A10 


00673 

0 

10676 

1 


02541 

0 


32553 

2A20 


aoooo 

0 

50671 

I 


74302 

0 


64170 

2A30 


S0673 

0 

34473 

0 


50676 

0 


32563 

2AA0 


02517 

0 

32555 

0 


50673 

0 


10676 

2AS0 


5067A 

1 

20000 

0 


22612 

1 


40000 

2A60 


50673 

0 

32564 

1 


50674 

1 


34473 

2A70 


64335 

0 

20000 

0 


40000 

0 


40000 

2500 


10674 

0 

0251? 

0 


32560 

0 


50673 

2510 


4OOOO 

0 

40000 

0 


50014 

1 


445O6 

2520 


32570 

1 

3OOI5 

0 


5OO3O 

1 


10671 

2 530 


40000 

0 

50014 

1 


44 5O6 

1 


70011 

25A0 


00001 

0 

50676 

u 


355OI 

0 


30675 

255O 


64 506 

0 

50011 

1 


02266 

1 

C; 

02425 

2560 

c: 

02411 

1 

C: 00032 

0 

C; 

00015 

0 

c; 

00025 

2570 

c; 

2006 7 

X 

44513 

0 


70011 

0 


64513 

2600 

C! 

OOOA7 

1 

C: 00647 

1 

c: 

00646 

0 

c; 

00645 

2610 

C: 

00036 

1 

Cj 00035 

1 

Ct 

00725 

1 

c: 

OO724 

2620 

c: 

00717 

0 

C: 0071b 

1 

C: 

00715 

1 

Cl 

00714 

2630 


35501 

0 

50010 

0 


10033 

0 


02643 

26A0 


50040 

0 

02266 

1 


35362 

0 


50033 

2650 

Cj 

20115 

0 

C; 37774 

1 

C: 

04025 

1 

C; 

10003 

2660 

c; 

34034 

1 

C; 40023 

1 

C: 

44035 

1 

c; 

50037 

2670 


35501 

0 

50052 

0 


42675 

0 


50053 

2700 


50572 

1 

4OO35 

0 


50573 

0 


10000 

2710 


50572 

1 

00001 

0 


30006 

1 


3000b 

2720 


50600 

1 

40000 

0 


60577 

1 


lOOOO 

2730 


00001 

0 

35501 

0 


50047 

1 


50050 

27A0 


40573 

1 

30644 

1 


00001 

0 


30001 

275O 


02773 

0 

0057 7 

1 


64516 

1 


74516 

2760 


02766 

1 

02 750 

I 


64516 

1 


74503 

277O 


64500 

0 

50723 

1 


00577 

1 


45070 
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the right of each word; "e« denotes unused fixed memory, 
(Interpretive operator words) or 'tc*' (Constants), 


0 


64505 

0 


5001 1 

1 


02266 

1 


50670 

0 


50673 

0 


32561 

1 


50674 

1 


40672 

0 


02545 

1 


10674 

0 


O25O5 

0 


32554 

0 


5O67A 

1 


10675 

1 


02536 

0 


10674 

1 


02541 

0 


32556 

0 


50673 

0 


32562 

0 


02511 

0 


10674 

0 


O245O 

1 


32557 

0 


50676 

0 


32570 

1 


30015 

0 


30671 

0 


30671 

1 


5OOI5 

0 


10675 

1 


02536 

0 


02411 

1 


50674 

1 


20000 

0 


22576 

1 


70011 

0 


50011 

1 


02266 

1 


50674 

0 


60674 

1 


20000 

0 


20001 

1 


40000 

0 


50011 

1 


02264 

0 


10676 

1 


02541 

0 


62565 

0 


50014 

1 


44506 

1 


70011 

0 

C: 

02435 

1 

C; 

02443 

0 

C; 

02455 

1 

C; 

02476 

0 

c: 

00040 

0 

c: 

74000 

1 

C: 

06067 

0 

CI 

06001 

1 


50011 

1 


OOOOl 

0 

c: 

00051 

0 

C! 

00050 

0 

c: 

00011 

1 

c: 

00007 

0 

C! 

00006 

1 

c: 

00004 

0 

C: 

00723 

1 

c: 

00722 

0 

c; 

00721 

0 

C; 

00720 

0 

C; 

00713 

1 

CJ 

00712 

0 

CJ 

00711 

0 

c; 

00710 

1 


02642 

0 


64516 

1 


50033 

1 


32651 

1 


32650 

0 


3001 5 

0 


50030 

1 


O6U5 

0 

C; 

14031 

0 

C: 

20033 

0 

c; 

24017 

1 

c; 

30036 

0 

C; 

54000 

0 

Cl 

60000 

1 

CJ 

64000 

0 

c; 

70000 

1 


00001 

0 

c; 

16037 

1 


20017 

0 


40035 

0 


OOOOl 

0 


10000 

0 


OOOOl 

0 


4OO35 

1 


72356 

1 


50577 

1 


30006 

1 


72356 

0 


30600 

1 


OOOOl 

0 


30000 

1 


30577 

1 


50051 

0 


OOOOl 

0 


40572 

0 


30643 

0 


50577 

1 


10731 

0 


02752 

0 


02756 

0 


10000 

0 


02750 

1 


10732 

0 


02762 

1 


10000 

0 


02750 

1 


45O7O 

1 


70723 

1 


70723 

0 


65070 

0 


50723 

1 


OOOOl 


0 

0 

1 

0 

1 

1 

1 

0 

0 

1 

0 

0 

0 

0 

0 

1 

0 

1 

1 

1 

1 

1 

0 

0 

0 

I 

1 

0 

J 

0 

0 

0 


^04578* YUU SYSTEM FDR AGC^t! REVISION 0 OF PROGRAM S0LRUMS5 BY 


UC-TaL listing qF paragraph # 006 i with parity Bit in binary at 
ALL VALID Words are basic instructions except those marked "I" 


3000 


10215 

0 


07377 

0 


11762 

1 

06045 

3010 


30001 

0 


50577 

1 


11763 

0 

0302 1 

3020 


00001 

0 


6466A 

1 


51763 

1 

03015 

3O3O 


02052 

1 

C; 

23725 

0 


21763 

0 

30000 

30A0 


6A516 

1 


50011 

1 


OOOOl 

0 

c: 00531 

30S0 


11763 

0 


0305A 

0 


03056 

1 

03053 

3060 


S1763 

1 


03053 

1 


3OOOI 

0 

51764 

3070 

C; 

10777 

1 


33077 

1 


70625 

1 

SOllO 

3100 


SOHO 

1 


3A513 

1 


706A5 

1 

lOOOO 

3110 


03127 

0 


3312D 

1 


30015 

0 

50072 

3120 

C: 

1735A 

0 


30001 

0 


64516 

1 

50071 

3130 


20017 

0 


70626 

1 


64500 

0 

50626 

3U0 


30015 

0 


5OO72 

1 


O57O6 

0 

03265 

3150 

Cl 

05777 

0 


3355A 

0 


50613 

0 

05654 

3160 


50071 

1 


10632 

1 


03167 

1 

03140 

3170 


00001 

0 

C: 

00016 

0 

C: 

00011 

1 

C; 00004 

3200 


A0020 

1 


30020 

0 


OOOOl 

0 

5OO22 

3210 


30022 

1 


OOOOl 

0 


60000 

1 

60000 

3220 

C; 

00037 

0 

C: 

017AO 

0 

C; 

76000 

0 

02052 

323O 

C: 

00021 

1 

C: 

00025 

0 

C; 

00012 

1 

20017 

3 2 AO 


20016 

1 


OOOOl 

0 


20017 

0 

44512 

3250 


20017 

0 


AA5U 

1 


7OOII 

0 

64514 

3260 


20017 

0 


7O6A5 

1 


50645 

0 

20016 

3270 


6A513 

1 


306A5 

0 


20016 

1 

OOOOl 

3300 


20001 

1 


OOOOl 

0 


10630 

0 

OOOOl 

3310 


3A606 

0 


70001 

1 


60015 

0 

05720 

3320 


05720 

1 

C; 

16002 

1 

C; 

06003 

1 

30001 

3330 


0333A 

0 


03062 

0 


03351 

0 

03351 

33A0 


5OIU 

0 


10000 

0 


03344 

1 

03351 

3350 


50630 

1 


445 1 4 

1 


7OOII 

0 

50011 

3360 


20017 

0 


03351 

0 


3OOOI 

0 

50113 

3370 


20016 

1 


00113 

1 

C: 

00257 

1 

20001 


' V t 
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thl right of bach word; denotes Unused fixed memory. 
(Interpretive operator words) or "C** (Constants). 


0 


03000 

1 

06045 

0 

06045 

0 


20017 

0 

1 


03024 

1 

305 77 

1 

20016 

1 


20000 

0 

0 


30577 

1 

51763 

1 

03036 

1 


32172 

1 

1 


31763 

1 

O3OI6 

0 

44516 

0 


7001 1 

0 

0 


20017 

0 

20001 

1 

iOOOO 

1 


50577 

1 

1 


64664 

1 

03060 

1 

03036 

1 


30577 

1 

0 


03044 

1 

Cl 01103 

1 

30001 

0 


05720 

1 

1 


03121 

0 

03076 

0 

02124 

1 

C: 

O77OO 

1 

0 


OOOOl 

0 

30001 

0 

64516 

1 


50071 

1 

1 


05706 

0 

30062 

0 

50631 

0 


06000 

1 

1 


03111 

0 

30631 

0 

05662 

0 


44500 

1 

0 


20016 

1 

OOOOl 

0 

30001 

0 


50071 

1 

0 


30062 

0 

50627 

1 

02127 

1 


02124 

1 

0 

C: 

16345 

1 

05720 

1 

c; 15472 

1 


30001 

0 

1 


00071 

1 

20071 

0 

00002 

0 


20071 

0 

0 


50020 

0 

40020 

1 

40020 

1 


4OO2O 

1 

1 


4OO22 

0 

4OO22 

0 

4OO22 

0 


4OO22 

0 

1 


60000 

1 

60000 

1 

60000 

1 


OOOOl 

0 

1 


02173 

0 

02256 

1 

02046 

1 

c; 

00023 

0 

0 


445 1 2 

1 

70011 

0 

64512 

0 


50011 

1 

1 


70011 

0 

50011 

1 

20016 

1 


OOOOl 

0 

0 


50011 

1 

20016 

1 

OOOOl 

0 


44513 

0 

1 


OOOOl 

0 

44513 

0 

20017 

0 


70645 

1 

0 


34513 

1 

70645 

1 

IOOOO 

0 


OOOOl 

0 

0 


34516 

1 

50630 

1 

20001 

1 


OOOOl 

0 

1 

C: 

16001 

1 

43322 

0 

60001 

0 


6OOI5 

0 

0 


50113 

1 

34335 

0 

60630 

1 


IOOOO 

0 

0 


35501 

0 

30634 

0 

30635 

1 


30636 

1 

0 


30114 

0 

20017 

0 

02060 

0 


345 1 6 

1 

1 


03257 

1 

00113 

1 

30001 

0 


50113 

1 

1 


20017 

0 

33372 

1 

02173 

0 

c; 

17501 

0 

1 


40000 

0 

2OOI7 

0 

70725 

0 


20001 

1 



4bA57aA yul System for agc^*: revision o oi- solrumss by 


octal listing oF paragraph # 007» with parity bit in binary At 
All valid words are basic instructions except those marked "I" 


3400 


60000 

1 


50725 1 


20016 

1 


20001 

3410 


70725 

0 


64500 0 


50 725 

1 


20016 

3420 


20017 

0 


70646 1 


20001 

1 


60000 

3430 


20001 

1 


40000 0 


20017 

0 


70646 

3440 


20001 

1 


40000 0 


20017 

0 


70647 

34S0 


20001 

1 


00001 U 


20001 

1 


40000 

3460 


20001 

1 


OOOOl 0 


20001 

1 


40000 

3470 


50645 

0 


20016 1 


20001 

1 


OOOOl 

3500 


50645 

0 


20016 1 


20001 

1 


OOOOl 

3510 


60000 

1 


50647 1 


20016 

1 


20001 

3520 


40000 

0 


50700 0 


40050 

0 


40000 

3530 


20016 

1 


OOOOl 0 

C; 

00011 

1 

C; 

00013 

3540 

c: 

00020 

0 

c: 

00021 1 

c: 

00022 

1 

c: 

00023 

3550 

c; 

00030 

1 

C{ 

00031 0 

C; 

00032 

0 

C: 

00033 

3560 

c: 

00040 

0 

C: 

00050 1 

C: 

00062 

0 

c; 

00074 

3570 

c; 

00764 

1 

C; 

01130 1 

C; 

01750 

1 

c; 

03720 

3600 


§ 





d 



8 

3610 





§ 





8 

3620 





s 


§ 



9 

3630 


§ 



& 


§ 



a 

3640 


§ 



e 


S 



S' 

3650 


§ 





8 




3660 







8 




3670 







8 



i 

3700 


& 





8 



9 

3710 





& 


§ 



g 

3720 





@ 


8 



8 

3730 





& 


a 



8 

3740 


& 



@ 


8 



8 

8 

3750 


@ 



Q 


8 



3760 


§ 



& 


8 



3 

8 

3770 





a 


a 
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the right of each word? "fi" Denote^ unuseD fixed memory, 
(Interpretive operator woRdS) or "c (ConstantSj. 


1 


OOOOl 0 


20001 

1 


40000 

0 


20017 

1 


20001 1 


OOOOl 

0 


20001 

1 


40000 

1 


50646 0 


20016 

1 


20001 

1 


OOOOl 

1 


50646 0 


20016 

1 


20001 

1 


OOOOl 

0 


20001 1 


60000 

1 


50647 

1 


20016 

0 


20017 0 


70647 

0 


50647 

1 


20016 

0 


20017 0 


70645 

1 


20001 

1 


60000 

0 


20001 1 


40000 

0 


20017 

0 


70645 

0 


43515 1 


20017 

0 


70647 

0 


20001 

1 


OOOOl 0 

C; 

00177 

0 


20017 

0 


40047 

0 


50701 1 


40051 

1 


40000 

0 


50702 

0 

C: 

00014 1 

C: 

00015 

0 

C; 

0001^ -0 

C; 

00017 

0 

c: 

00024 1 

c: 

00025 

0 

CJ 

00026 

0 

c: 

00027 

1 

C; 

00034 0 

c; 

00035 

1 

c: 

00036 

1 

C! 

00037 

1 

C: 

00144 0 

c: 

00310 

0 

c; 

00454 

1 

c; 

00620 

1 


03574 1 


03575 

0 

CK5M 

4 1444 

0 


8 



@ 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


§ 



8 



8 



8 


& 



8 



8 



8 


& 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 



8 


8 



8 



8 


0 

0 

0 

0 

1 

1 

1 

1 

1 

0 

1 

1 

1 

0 

0 


^b^578A YUL SYSTEM FOR AGC4; HEVISIJN 0 OF PRJGKAM 50LRUM55 BY 


qctaL LiSfiNG 0^^ Paragraph 0 010* »jith parity bit in binary at 
all valid Words are basic instructions except those marked nit* 


aOOO 


loooi 

1 


50121 

0 

A0015 1 

50D61 

AGIO 


SOO66 

1 


60121 

0 

50120 1 

20000 

AO2O 


60120 

1 


50121 

0 

35501 0 

04072 

AO3O 


10063 

0 


04200 

1 

20120 0 

40001 

aoao 


AOOOl 

1 


10000 

0 

0A317 0 

C; 00042 

AO5O 


60000 

1 


50020 

0 

3A302 1 

70076 

A060 

C: 

AAOOO 

1 


AA50<» 

0 

60076 0 

50076 

AO7O 


30120 

1 


7A720 

1 

30063 I 

25777 

AlOO 

C; 

000A3 

0 


10023 

1 

0A36A 1 

04113 

Alio 


70020 

1 


20000 

0 

UAA53 1 

20000 

AI2O 


0A1A5 

0 

c: 

A2000 

1 

0A12A 1 

04143 

Also 


0A13b 

1 


6A121 

1 

AOOOO 0 

50076 

aIaO 


0A1A3 

0 


A0076 

1 

OAIAA 1 

60067 

A 1 50 


20000 

0 


OAA33 

1 

34720 0 

70020 

A 1 60 


AOOOO 

0 


6 A 650 

0 

50065 L 

45501 

AI7O 


60000 

1 


3002 0 

0 

50023 0 

04215 

A200 


35501 

0 


30063 

1 

OA075 1 

5OO6 6 

A210 


0A611 

0 


10066 

0 

0A17A 1 

40061 

A220 


0A35A 

1 


0A353 

0 

30121 0 

64516 

A230 


10000 

0 

C: 

5OIIA 

0 

04257 0 

30076 

A2aO 


2007s 

1 


AOO A 6 

1 

60021 1 

30076 

A250 


0A362 

1 


0A253 

1 

04362 1 

64517 

A260 


6A50A 

1 


10000 

0 

6 A 5 I 7 0 

04300 

A270 


3A500 

0 


60076 

u 

50015 0 

50076 

A300 


lOOOO 

0 


0A361 

1 

C; 03777 0 

30076 

A310 


0A313 

1 


OA7A7 

1 

50015 0 

34720 

a320 


50062 

0 


20065 

0 

64475 0 

50123 

A330 


3A720 

0 


70020 

1 

64340 1 

lOOOO 

A3A0 

c: 

77775 

1 

C: 

77 774 

0 

45502 1 

64 3 40 

A3S0 


50123 

1 


50062 

0 

00112 0 

04364 

A360 


0A35A 

1 


30076 

0 

60067 0 

04304 

A370 


05612 

1 


05357 

0 

05211 0 

06000 


NASA 1021108-021 
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page 80 a 


the 

right oF each 

word; 

denotes 

unused Fixed 

memory. 


(Interpretive 

operator WORDS) or «c« 

(CoNStANtSI 

• 


0 

04007 

1 

40061 

1 

50015 0 

34516 

1 

0 

40000 

0 

64335 

0 

50063 1 

74720 

1 

0 

10215 

0 

02113 

0 

40061 1 

5OOI6 

0 

1 

10000 

0 

O4O65 

0 

O4O37 1 

20121 

1 

1 

50076 

0 

04364 

1 

34043 1 

60065 

1 

i 

30076 

0 

64060 

0 

10000 0 

04233 

1 

0 

04257 

0 

50063 

1 

30120 1 

64 5 1 6 

1 

i 

445O7 

0 

50020 

0 

10020 1 

04215 

0 

0 

10066 

0 

04152 

0 

34720 0 

50015 

0 

0 

40000 

0 

645 1 6 

1 

50076 0 

10000 

0 

0 

62261 

0 

10000 

0 

64516 1 

O4I3I 

0 

0 

04145 

0 

64517 

0 

10000 0 

40076 

1 

0 

50062 

0 

34720 

0 

50015 0 

7OO2O 

1 

1 

lOOOO 

0 

O4I6O 

1 

45503 0 

O4I64 

0 

1 

50065 

1 

34500 

0 

?0020 1 

64100 

1 

0 

5OO66 

1 

30023 

0 

50020 0 

O4 1 06 

1 

1 

20065 

0 

04210 

0 

04633 0 

04537 

1 

1 

50015 

0 

20121 

1 

40001 1 

10000 

0 

1 

30121 

0 

50076 

0 

34500 0 

70020 

1 

0 

50021 

I 

30020 

0 

50022 1 

04722 

1 

0 

30022 

1 

50020 

0 

10076 1 

04257 

0 

0 

10000 

0 

30076 

0 

04272 1 

40076 

1 

0 

65473 

1 

10000 

0 

04356 0 

04270 

0 

0 

74606 

1 

64373 

1 

50062 0 

04305 

0 

0 

50062 

0 

34473 

0 

70020 1 

10000 

0 

0 

70020 

1 

20000 

0 

04367 1 

30123 

1 

1 

20065 

0 

04431 

0 

30001 0 

50112 

0 

0 

04345 

1 

C; 77776 

1 

04345 L 

10065 

0 

i 

O4347 

0 

20065 

0 

44475 1 

60123 

1 

1 

04326 

1 

O43O5 

0 

10121 1 

5OI2I 

0 

i 

34 5 1 6 

1 

60121 

0 

50121 0 

00001 

0 

i 

O47OO 

1 

05623 

0 

04766 1 

06014 

1 



YUL SYSTEM KOR A6C4: REVISION 0 OF PROGRAM SOLRUMSS BY 


octal listing of paragraph * 011» with parity bit in binary At 
all valid ^JqRDS are SASIC instructions except those marked "I" 




0A732 

0 


0 A ? 3 5 

1 


05061 

0 


06a02 

4A10 


0507S 

0 


05061 

0 


04/73 

0 


06213 

AA20 


0521A 

0 


05633 

1 


05630 

1 


O5OOA 

AA30 


0A556 

0 


0A622 

0 


0420a 

0 


06206 

AAAO 


061A1 

0 


06134 

1 


06153 

0 


05147 

A ASO 


06l7A 

0 


06A34 

1 


06341 

1 


07463 

*♦^60 


06316 

0 


067 55 

0 


06757 

1 


06620 

hATO 


0A02A 

0 


063 3 6 

1 


06160 

0 

C; 

00003 

A500 

c: 

AOOOO 

0 

C: 

20000 

u 

C; 

lOOOO 

0 

c: 

04000 

h510 

Cl 

00100 

0 

C: 

00040 

0 

c: 

00020 

0 

c: 

00010 

A520 

C: 

5777 7 

1 

C; 

77777 

0 

C: 

20000 

0 

c: 

00000 

A530 


A0077 

0 


50115 

1 


00001 

0 


20062 

h5AO 


50117 

0 


20062 

1 


40001 

1 


40000 

A550 


50115 

1 


04211 

1 


40117 

1 


40000 

A560 


20062 

1 


50001 

0 


40115 

0 


40000 

A570 


0A602 

1 


40061 

1 


50015 

0 


00121 

A600 


64335 

0 


64500 

0 


50015 

0 


74606 

A610 

c: 

05777 

0 


30001 

0 


50104 

1 


345OO 

A620 


34713 

0 


046l4 

0 


30062 

0 


30070 

A630 


50070 

0 


04005 

0 


50102 

1 


20062 

a6A0 


50005 

1 


20062 

1 


A0004 

1 


20102 

A650 


40003 

0 


20102 

0 


00000 

1 


20070 

A660 


00000 

1 


20070 

1 


50002 

0 


20062 

A670 


50001 

0 


20062 

1 


hOOOO 

0 


20102 

A700 


35501 

0 


20062 

1 


50000 

1 


4 006 1 

A710 


40001 

1 


lOOOO 

a 


04065 

0 


30000 

A720 

C{ 

00177 

0 


04044 

0 


10020 

1 


35501 

A730 


00001 

0 

C; 

00077 

1 


04/47 

1 


05055 

A7A0 


40117 

1 


soil? 

0 


^0116 

0 


50116 

A750 


50065 

1 


10065 

0 


04203 

1 


00001 

A760 


00001 

0 


A5503 

0 


50065 

1 


1 0066 

A770 


05020 

0 


04024 

0 

C: 

00115 

1 


04761 


NASA 1021108-021 
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PAGE yOS 


IHe right of EACH wqRD; denotes unused fixed memory. 


(Interpretive operator words) or "C'* (Constants), 


1 


05144 

0 


05141 

0 


04776 

0 


06411 

0 

1 


05316 

0 


05306 

1 


05221 

0 


oeOiG 

0 

0 


05234 

1 


O55II 

1 


O55O5 

1 


04552 

1 

0 


O6O72 

1 


O6O77 

1 


06104 

1 


06110 

1 

0 


06062 

0 


0606/ 

0 


06115 

1 


06352 

0 

1 


0AO2A 

0 


0 f 2 lZ 

1 


06261 

1 


06226 

1 

0 


06622 

1 


07453 

1 


06323 

0 


06325 

0 

1 

C: 

00002 

0 

c: 

00006 

1 

C: 

37777 

1 

c; 

00005 

1 

0 

c; 

02000 

0 

C: 

OlOOO 

0 

c: 

00400 

0 

CJ 

00200 

0 

0 

c: 

00004 

0 

c; 

00002 

0 

c; 

OOOOl 

0 

c: 

76057 

1 

1 


40101 

0 


50117 

0 


40100 

1 


50116 

1 

1 


40002 

1 


40000 

0 


04540 

1 


35501 

0 

0 


50116 

1 


20062 

1 


40000 

0 


40000 

0 

0 


20062 

1 


5OOO2 

0 


40116 

0 


40000 

0 

0 


20062 

1 


50000 

1 


04005 

0 


30076 

0 

0 


40061 

1 


50015 

0 


20121 

1 


30000 

1 

1 


64610 

1 


04001 

1 

C; 

01777 

1 

C; 

00777 

0 

0 


04632 

1 


OOIO4 

1 


30001 

0 


5OIO4 

1 

0 


50062 

0 


34500 

0 


04632 

1 


30062 

0 

1 


AOOO5 

0 


20102 

0 


00000 

1 


20070 

1 

0 


00000 

1 


20070 

1 


50004 

0 


20062 

1 

1 


50003 

1 


20062 

1 


40002 

1 


20102 

0 

1 


aoooi 

1 


20102 

0 


00000 

1 


20070 

1 

0 


00000 

1 


20070 

1 


50000 

1 


OOOOl 

0 

1 


50015 

0 


10063 

0 


04200 

1 


20120 

0 

1 


20121 

1 


40001 

1 


lOOOO 

0 


O4OO5 

0 

0 


10000 

0 


34516 

1 


60067 

0 


50075 

0 

1 


04767 

0 


04747 

1 


04742 

1 


04767 

0 

1 


40115 

0 


501 15 

1 


OOOOl 

0 


445 l6 

0 

0 


45501 

1 


50065 

1 


10066 

0 


04203 

1 

0 


04203 

1 


00001 

0 


04747 

1 


34772 

1 

0 


05055 

1 


04777 

1 


04761 

0 


O5OOI 

0 


^U^378A YUL system FQR AGC^: REVISION 0 0*- H^oGRAM SqLRUMSS BY 


OCTAL listing 

OF PARAGRAPH 

X 

0 

parity bit in 

BINARY AT 

all valid WqRDS ARe BASIC 

Instructions 

except those 

marked *'i" 

sooo 

04024 0 

30001 0 

50104 1 

34772 

5010 

60002 0 

20102 u 

50002 0 

35501 

5O2O 

50102 1 

20102 0 

30001 0 

20062 

5030 

20102 0 

6000D 1 

20062 1 

60000 

5040 

OOOOl 0 

50105 0 

20000 0 

40000 

5050 

40001 1 

40000 0 

20102 0 

50001 

5 060 

OOOOl 0 

04747 1 

30062 0 

65777 

5O7O 

40020 1 

10020 i 

34^72 1 

05443 

5100 

06232 1 

04024 0 

50102 1 

20102 

5110 

30034 0 

20103 1 

4OOOO 0 

30034 

5120 

50101 1 

2OIO3 I 

4OOOI 1 

30034 

5130 

40000 0 

3003A 0 

60003 1 

30100 

5U0 

OOOOl 0 

04^47 1 

345I6 1 

05145 

5I5O 

34731 0 

50102 1 

30062 0 

05041 

5160 

50104 1 

20000 0 

3OOOO 1 

50103 

5170 

OOOOl 0 

30001 0 

50104 1 

20000 

5200 

20104 0 

OOOOl 0 

30001 0 

50104 

5210 

04620 1 

04754 0 

05055 1 

05222 

5220 

05222 0 

04754 0 

30070 0 

5OO7O 

5230 

05242 0 

05412 U 

05020 0 

04024 

5240 

50065 1 

04024 0 

30062 0 

65503 

5250 

34731 0 

30062 0 

65777 0 

5OIO3 

5260 

05102 1 

30077 1 

50115 1 

30100 

527O 

05412 0 

O5IO2 1 

05001 0 

05302 

5300 

05001 0 

00105 0 

30103 0 

6 0064 

5310 

50 107 1 

35503 1 

50106 0 

34475 

5320 

50107 1 

34475 0 

5OIO6 0 

05246 

5330 

50107 1 

50062 0 

U5250 0 

35476 

5340 

05250 0 

35475 i 

50062 0 

6 5502 

5350 

40115 0 

20103 i 

50000 1 

4 0116 

5 360 

04754 0 

10065 0 

C: 000O7 0 

C; 77762 

5370 

04611 0 

34231 0 

5OLO3 0 

4OO7O 

f 

t 

1 . ^ 

' -1 k *‘r •> 


• 

• 

■1 n 1 4 A % . 

•-* 
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Page bos 


tHe right of each WORD; «e» Denotes unused fixed memory. 
(Interpretive operator words) or "C” (Constants). 


I 

50102 

I 

20000 

0 

3OOO2 0 

20062 

1 

0 

20102 

0 

60001 

0 

05023 0 

00104 

1 

1 

60001 

0 

20102 

0 

50001 0 

35501 

0 

1 

20102 

0 

50000 

1 

OOOOl 0 

50122 

0 

0 

40000 

0 

20102 

0 

50000 1 

20105 

1 

0 

OOOOl 

0 

30062 

0 

65777 0 

50062 

0 

0 

50103 

0 

34772 

1 

05102 1 

04524 

0 

1 

04024 

0 

O4747 

1 

50015 0 

06042 

1 

0 

40001 

1 

50034 

0 

20103 1 

4OOOI 

1 

0 

60003 

1 

30100 

0 

20102 0 

4OOOO 

0 

0 

3O1OO 

0 

6OOO3 

1 

3OIOI 1 

20103 

1 

0 

60100 

0 

30100 

0 

30034 0 

5OO77 

1 

1 

04747 

1 

50110 

1 

35553 1 

50076 

0 

1 

35501 

0 

5001 5 

0 

06776 1 

30001 

0 

0 

34772 

1 

O5IO2 

1 

04524 0 

20104 

0 

0 

30000 

1 

50062 

0 

34772 1 

O5O2O 

0 

1 

40070 

1 

40000 

0 

30062 0 

60103 

0 

0 

04754 

0 

O52O2 

1 

30103 0 

50062 

0 

0 

05020 

0 

05242 

0 

05412 0 

O5O2O 

0 

0 

04754 

0 

05246 

1 

04740 0 

44516 

0 

1 

50062 

0 

OOOOl 

0 

355O3 1 

60064 

0 

0 

30001 

0 

50105 

0 

30070 0 

5OO7O 

0 

0 

50116 

1 

30101 

1 

50117 0 

05302 

0 

0 

3OO7O 

0 

5OO7O 

0 

65502 0 

O5IO2 

1 

0 

50103 

0 

OOOOl 

0 

04754 0 

40062 

1 

0 

05247 

0 

05324 

I 

O4754 0 

40062 

1 

1 

35475 

I 

05347 

1 

40107 0 

60 1 06 

0 

1 

05347 

1 

3OIO7 

1 

60106 0 

50062 

0 

0 

05347 

1 

046 1 1 

0 

04024 0 

50103 

0 

0 

20103 

1 

50001 

0 

OOOOl 0 

10066 

0 

1 

05370 

0 

30062 

0 

65777 0 

05372 

1 

1 

4OOOO 

0 

05102 

1 

05442 0 

05466 

0 


YUL SYSTEM FOR AGC<»: REVISION 0 OE PROGRAM SOLRUMsS BY 


octal listing oF paragraph # 013* rtlTH PARITY BlJ IN BINARY AT 
ALL VALID WORDS ARg BASIC INSTRUCTIONS EXCEPT THOSE MARKED " 1 •' 


SAOO 


05A12 

0 

05102 1 


D5AAA 

0 

05A66 

S A 1 0 


A5501 

1 

052A0 1 


30102 

1 

65503 

SA20 


A0117 

1 

30117 0 


30116 

1 

25777 

SA30 


30117 

0 

30115 1 


25777 

1 

A0116 

S A aO 


50115 

1 

00001 0 


3A731 

0 

50105 

SASO 


5003A 

0 

00001 0 


20105 

1 

60001 

bA60 


60000 

1 

20105 1 


50000 

1 

OOOOl 

SAtO 


50000 

1 

AOlOO 1 


20102 

0 

50001 

bSOO 

C: 

00002 

0 

C: 00000 1 

C; 

OOOOA 

0 

C; 00002 

bSlO 


05371 

1 

0A75A 0 


3A?3i 

0 

30062 

3520 


35503 

1 

50107 1 


20107 

0 

35500 

5530 


65A75 

1 

50105 0 


50102 

1 

05A66 

55A0 


20*107 

0 

35501 0 


60070 

0 

05102 

5550 


35A75 

1 

50062 0 


0A6 1 6 

1 

0A02A 

5560 


50100 

0 

30115 1 


50071 

1 

30116 

5570 


30000 

1 

50107 1 


6 0001 

0 

6AA73 

5600 


30062 

0 

6A3A0 1 


50062 

0 

0A526 

5610 

C; 

50070 

0 

00106 0 


A0061 

1 

30121 

5620 


50052 

0 

10062 1 


OAOOl 

1 

10122 

5630 


0A75A 

0 

50015 0 


06A77 

0 

0 A75A 

56A0 


10000 

0 

05650 1 

C: 

77761 

1 

05 6A A 

5650 


20000 

0 

3A501 1 


30116 

1 

055A6 

5660 


20000 

0 

27777 0 


50071 

1 

30015 

5670 


72667 

0 

10000 0 


0567A 

1 

05676 

5700 


20062 

1 

00000 1 


30072 

1 

50015 

5710 


50062 

0 

62165 1 


5003A 

0 

OOOOl 

5720 


30001 

0 

20000 0 


30000 

1 

50015 

5730 


501 lA 

0 

30015 0 


3011A 

0 

7A606 

57A0 


3011A 

0 

OQOOl 0 


50637 

0 

30001 

5750 


506A1 

1 

30015 0 


506A0 

0 

30001 

5760 


06000 

1 

3O6A0 0 


50015 

0 

306AO 

5770 


§ 


§ 


§ 


s 


NASA 1021108-021 


DEC 1966 


PAGE b07 


THE right OF each WoROi ”6" DENOTE^ UNUSED FIXED MEMqRY. 


(Interpretive 

operator 

WORDS! OR 

t'C" (CONSTANTS), 



0 

05A12 

0 

05102 

1 

0 5 A A A 

0 

05A66 

0 

1 

50102 

1 

OOOOl 

0 

30117 

0 

25777 

1 

1 

A0U6 

0 

5003A 

0 

30003 

1 

60117 

0 

0 

3003A 

0 

6OOO3 

1 

30116 

1 

3003a 

0 

0 

355OI 

0 

20105 

1 

30002 

0 

bOOOO 

1 

0 

20105 

1 

50001 

0 

OOOOl 

0 

20105 

1 

0 

50122 

0 

OOOOl 

0 

AOO77 

0 

20102 

0 

0 

OOOOl 

0 

00071 

1 

00073 

0 

OOO75 

0 

0 

Cl 77777 

0 

0A75A 

0 

052A6 

1 

OA7A2 

1 

0 

65777 

0 

5OIOA 

1 

65503 

1 

50103 

0 

1 

6OO7O 

0 

O5IO2 

1 

20107 

0 

35502 

0 

0 

20107 

0 

355OO 

1 

6010A 

1 

50103 

0 

1 

30105 

0 

05020 

0 

10107 

0 

05521 

1 

0 

35610 

0 

50103 

0 

35501 

0 

50077 

1 

1 

50072 

1 

3A772 

1 

50102 

1 

20001 

1 

0 

50106 

0 

05601 

0 

50107 

1 

O5IO3 

0 

1 

05021 

1 

IOIO7 

0 

6A335 

0 

05576 

0 

0 

rA606 

1 

60121 

0 

6 A5 1 6 

1 

20067 

1 

1 

05626 

0 

0A02A 

0 

50122 

0 

0A567 

1 

0 

50116 

1 

50015 

0 

060A2 

1 

65363 

1 

1 

20062 

1 

3A500 

0 

50115 

1 

05371 

1 

0 

50062 

0 

300U1 

0 

6A516 

1 

50001 

0 

0 

50072 

1 

30001 

0 

3007 1 

1 

501 lA 

0 

0 

A0015 

1 

6A3 ?3 

1 

6011 A 

0 

30062 

0 

0 

30072 

1 

00071 

1 

35501 

0 

60071 

1 

0 

3 00 3 A 

0 

60072 

1 

50062 

0 

OOOOl 

0 

0 

7A606 

1 

30001 

0 

20001 

1 

06000 

1 

1 

20000 

0 

36000 

1 

301 lA 

0 

5OOI5 

0 

0 

6A516 

1 

50001 

0 

20000 

0 

27777 

0 

0 

306A1 

1 

7A606 

1 

30637 

0 

20637 

1 

0 

006A1 

1 

05765 

0 

05766 

0 CK5M 

6AO00 

0 


e 


§ 



c: 

A7777 

0 


^ii4b78A yul System fom agc^: revision o of- program solrumss by 


octal listing of paragraph 0 014t ^ITH PAKItT bit in binary at 
All valid WORpS are basic instructions except those marked "I” 


03,6000 

06021 

1 

04703 

1 

04703 

1 

0A567 

03,6010 

06021 

1 

04703 

1 

04567 

1 

O47O3 

03*6020 

0A567 

1 

30001 

0 

50111 

0 

10115 

03*6030 

OOlll 

0 

06033 

1 

06036 

1 

10117 

0 3 * 6 0 A 0 

60U1 

0 

00000 

1 

40067 

1 

60062 

03 ,6050 

06052 

0 

0402 a 

0 

20065 

0 

06056 

03,6060 

6A335 

0 

05637 

0 

04 rzz 

1 

A0076 

03,6070 

30076 

0 

06074 

1 

04 722 

1 

A0076 

03*6100 

20062 

1 

40000 

u 

aoooo 

0 

06074 

03*6110 

0A722 

1 

20075 

1 

40046 

1 

AOOOO 

03*6120 

20075 

1 

600 A 6 

0 

5OIO2 

1 

10000 

03,6130 

20075 

1 

5OOA6 

0 

40076 

1 

0A602 

03*6 1 aO 

06074 

1 

04722 

i 

20062 

1 

30000 

0 3 * 6 1 5O 

20062 

1 

40000 

0 

06136 

0 

04722 

03,6160 

35501 

0 

60070 

0 

5OIO2 

1 

34772 

03,6170 

05A12 

0 

04325 

1 

05041 

1 

05AIO 

0 3 ,6200 

40000 

0 

40000 

0 

04602 

1 

20067 

03,6210 

03062 

0 

40076 

i 

05662 

0 

20062 

03*6220 

20062 

1 

10001 

i 

04024 

0 

0402A 

03,6230 

50062 

0 

05235 

0 

64516 

1 

3OOO1 

03,62A0 

64516 

1 

06251 

1 

06244 

0 

06251 

03 , 62 5O 

00104 

1 

30115 

1 

30116 

1 

30117 

03,6260 

00104 

1 

06263 

0 

05237 

1 

30001 

03*6270 

6OO7O 

0 

053A7 

1 

04740 

0 

07322 

03*6300 

6OO7O 

0 

07301 

1 

30064 

0 

6A3A0 

03*6310 

O73OI 

1 

00106 

0 

06021 

1 

0A7A0 

03*6320 

04024 

0 

047AO 

0 

0A024 

0 

3A231 

03*6330 

06331 

0 

O52O2 

1 

OA024 

0 

04740 

03*63A0 

04024 

0 

10020 

1 

10121 

1 

06347 

03,6350 

345I6 

1 

06362 

0 

10121 

1 

50121 

03*6360 

50065 

1 

05072 

1 

5OO66 

1 

04024 

03,6370 

60116 

1 

60116 

i 

5OII6 

1 

35501 


NASA 1021108-021 


DEC A, 1966 


PAgE 808 


thl right of each kvoRD; Denote^ unused fixed memory, 

(INTERPRETIVE OPERATOR WORdS) OR "C (CONSTANTS), 


1 

06021 

1 

04567 

1 

04567 

1 

Q4703 

1 

1 

101 15 

0 

O47O3 

L 

04567 

1 

04703 

1 

0 

00111 

0 

06027 

1 

06036 

1 

10116 

0 

1 

OOlll 

0 

06037 

0 

34516 

1 

64516 

1 

0 

50062 

0 

lOOOO 

0 

00001 

0 

03062 

0 

1 

05100 

0 

05100 

0 

40062 

1 

50062 

0 

1 

20075 

1 

30050 

1 

O47O3 

1 

04722 

1 

1 

20075 

1 

30046 

0 

04703 

1 

04722 

1 

1 

04722 

1 

20062 

1 

40000 

0 

O6O74 

1 

0 

OA7OI 

0 

04722 

1 

20075 

1 

40050 

0 

0 

30102 

1 

06130 

0 

O47O3 

1 

04703 

1 

1 

04722 

1 

40076 

1 

2OO75 

1 

60046 

0 

1 

20075 

1 

3 OO4 6 

0 

O47OI 

0 

04722 

1 

1 

20062 

1 

40000 

0 

4OOOO 

0 

06136 

0 

1 

05041 

1 

05412 

0 

04326 

1 

O5O4I 

1 

1 

10020 

1 

06203 

0 

O3O62 

0 

20062 

1 

1 

40052 

1 

06113 

1 

10020 

1 

04571 

0 

1 

10000 

0 

O4O24 

0 

06220 

1 

06325 

0 

0 

06325 

0 

04024 

0 

4OO7O 

1 

40000 

0 

0 

50104 

1 

lOOOl 

1 

65363 

1 

10000 

0 

1 

4OOOO 

0 

20000 

0 

34515 

1 

O5AI6 

1 

0 

35501 

0 

30115 

1 

10000 

0 

06236 

0 

0 

5OIO7 

1 

06275 

1 

05246 

1 

455O2 

1 

0 

OOIO7 

1 

30001 

0 

50106 

0 

35502 

0 

1 

07301 

1 

30064 

0 

64340 

1 

50062 

0 

0 

04024 

0 

04024 

0 

06021 

1 

O4O 2 4 

0 

0 

05064 

0 

40065 

0 

60000 

1 

20000 

0 

0 

04024 

0 

06333 

1 

35501 

0 

50116 

1 

1 

20067 

1 

30052 

0 

04602 

1 

50121 

0 

0 

10020 

1 

355OI 

0 

06362 

0 

44 5 1 6 

0 

0 

30117 

0 

60000 

1 

50117 

0 

35501 

0 

0 

60115 

1 

60115 

1 

50115 

1 

00001 

0 


<t8Ab78A YUL SYSTEM FOR AGCi»: REVISION 0 OP PROGRAM SOLRUM 55 BY 


octal LISTiNtJ OF PARAGRAPH 015i with PAKllY Blj IN BINARY AT 
all YALID words are basic instructions E^LePT those marked "I” 


03 t 6400 


50122 

0 


oooai 

0 


060 A 2 

1 


06 a 06 

03 f 6 A 1 0 


0 A 02 A 

0 


35501 

0 


50102 

1 


06021 

03 ♦bAZO 


50000 

1 


06 A 23 

1 


06 A 30 

0 


30102 

03 * 6 A 30 


A 0102 

0 


20062 

1 


5 OOOO 

1 


0 AD 2 A 

03 ♦ 6 A aO 


25777 

1 


AA 50 A 

0 


50105 

0 


20062 

03 * 6 A 5 0 


706 A 5 

1 


5 OIOA 

1 


10020 

1 


0 A 3 6 A 

03 * 6 A 60 


lOlOA 

0 


OA 7 O 3 

1 


0 A 57 A 

0 


OA 7 O 3 

03 * 6 A 7 O 


A 06 A 5 

1 


70103 

i 


60001 

0 


20105 

03*6500 


060 A 2 

1 


06513 

0 


50062 

0 


35501 

03*6510 


06516 

0 


05 A 12 

u 


06516 

0 


10062 

03*6520 


bOOOU 

1 


20102 

0 


5 OOOI 

0 


35501 

03.6530 


20102 

0 


50000 

1 


00001 

0 


50122 

03 * 65 AO 


06761 

1 


065 A A 

1 


30001 

0 


50105 

03*6550 


AOl 15 

0 


50073 

0 


5 OIO 2 

1 


60000 

03 * 6560 


30102 

1 


60102 

1 


60102 

1 


50115 

03*6570 


AOllb 

0 


5 OO 7 A 

1 


3 A 231 

0 


50103 

O 3 * 66 OO 

C; 

00010 

0 

C; 

6333 b 

1 

C; 

AO A 52 

0 

C: 

2 A 527 

03 * 66 1 0 

c; 

06306 

1 

c; 

775 A 1 

i 

c: 

A 5020 

1 


05157 

03 * 6620 


065 A 2 

1 


0 AO 2 A 

0 


06535 

1 


0 A 02 A 

03*6630 


3011a 

0 


30001 

0 


50113 

1 


0715 A 

03 * 66 A 0 


3 A 502 

1 


50115 

1 


OOllA 

0 


0&731 

03.6650 

c; 

01301 

1 


06655 

1 


50115 

1 


50116 

03 * 6660 


AOII 5 

0 


50073 

0 


6 A 522 

0 


6 A 522 

03*6670 


60116 

1 


6 A 5 1 6 

1 


50116 

1 


07320 

03,6700 


30115 

1 


50073 

0 


0555 A 

0 

C; 

OOOlb 

03,6710 

c: 

00350 

1 

C; 

00532 

0 

C: 

77575 

0 

c: 

A 5233 

03*6720 

c; 

00021 

1 

c: 

1 AA A 5 

1 

C; 

7777 A 

0 

c; 

66516 

03*6730 


00113 

1 


30116 

1 


60000 

1 


50116 

03 , 67 A 0 


0 A 7 A 2 

1 


3675 A 

1 


3011a 

0 


5 OO 75 

03,6750 


AOiie 

0 


50116 

1 


00075 

0 


06730 

03*6760 


0 A 02 A 

0 


AOllb 

0 


50116 

1 


A 0115 

03,6770 


30115 

1 


50077 

1 


30100 

0 


301 16 


NASA 1021108-021 
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PAGE BO9 


the right of each Word? "e» denotes unused fixed memory 


( interpretive 

operator 

! WORDS) OR 

11 c 

« (CONSTANTS), 



0 

50062 

0 


0636A 

C 


10062 

1 


U640a 

1 

1 

06 A 1 6 

1 


06430 

0 


AO 115 

0 


60000 

1 

1 

64516 

1 


5OIO2 

1 


06364 

0 


06416 

1 

0 

40076 

1 


50062 

0 


77210 

1 


30062 

0 

1 

3AA77 

1 


5OIO3 

0 


20017 

0 


2OIO5 

1 

1 

06A57 

1 


40103 

1 


06464 

1 


20OI6 

1 

1 

20105 

1 


7O6A5 

1 


50001 

0 


20105 

1 

1 

50645 

0 


20016 

1 


OA7O3 

1 


50116 

1 

0 

6OO7O 

0 


50102 

1 


06516 

0 


05412 

0 

1 

06502 

0 


0A02A 

0 


20102 

0 


30001 

0 

0 

20102 

0 


60000 

1 


20102 

0 


60000 

1 

0 

00001 

0 


30001 

0 


50105 

0 


07143 

0 

0 

06731 

1 


50115 

1 


06550 

1 


0A742 

1 

1 

50001 

0 


06570 

0 


20000 

0 


44521 

1 

1 

AOl 16 

0 


50116 

1 


40115 

0 


5OO73 

0 

0 

34772 

1 


05102 

1 


0A526 

1 


05554 

0 

1 C: 

17013 

0 

C: 

65631 

0 

C; 

56501 

0 

C; 

02311 

0 

1 c: 

50072 

1 


06364 

0 


06364 

0 


OOIO5 

0 

0 

36753 

0 


64476 

0 


50000 

1 


36753 

0 

0 

10000 

0 


06643 

0 


06640 

0 


06740 

1 

1 

30115 

1 


64520 

1 


10000 

0 


O3O A4 

1 

1 

OOllA 

0 


40116 

0 


50116 

1 


5OO7A 

1 

0 

50115 

1 


06673 

0 


34476 

0 


501 15 

1 

1 

A007A 

0 


30116 

1 


50074 

1 


40073 

1 

0 C; 

07777 

1 

C; 

37777 

1 

Cj 

76720 

0 

C: 

55l63 

0 

1 C: 

00120 

1 

c: 

21555 

1 

C! 

77723 

1 

c; 

56072 

1 

0 

05157 

1 

c; 

50072 

1 


00114 

0 


06761 

1 

1 

35501 

0 


60115 

1 


60115 

1 


OOOOl 

0 

0 

06643 

0 


401 15 

0 


64522 

0 


501 15 

1 

0 

06745 

1 


0662 a 

1 


OA024 

0 


06627 

1 

0 

64602 

1 


50115 

1 


OOOOl 

0 


30077 

1 

1 

50100 

0 


OOOOl 

0 


50117 

0 


07143 

0 


4b^578A YUL SYSTEM’ FOR AGC«t; REVISION 0 Of- RROGRAm SOLRUMSS bY 


octal LI St I no 

oF Paragraph 

# 016, with 

parity bit 

IN 

BINARY AT 

ALL valid 

WORDS are Basic 

instructions 

except those 

MARKeO "I" 

03f 7000 


50102 

1 

06767 1 

07143 

0 

60102 

03,7010 


50102 

1 

lOUO 0 

06767 

I 

40077 

03,7020 


07132 

0 

40100 1 

60116 

1 

10000 

03,7030 


35501 

0 

60115 1 

07046 

1 

30001 

03 ,7 0^,0 


50100 

0 

35501 0 

60077 

1 

6OO77 

03,7050 


07036 

0 

O7O53 0 

O7O6O 

0 

30100 

03 , 7060 


30077 

1 

25777 i 

SOUS 

1 

50034 

03,7070 


eOlOO 

0 

50000 1 

07075 

1 

25777 

03,7100 


O7IO2 

0 

64516 1 

25777 

1 

60115 

03,7110 


30077 

1 

60000 1 

10000 

0 

30077 

03,7120 


50116 

1 

10102 0 

07130 

L 

40116 

03,7130 


3003if 

0 

O7I26 0 

10102 

0 

35503 

03,7 1 4O 


30003 

1 

50115 1 

07126 

0 

30001 

03,7150 


00104 

1 

04740 0 

44516 

0 

00104 

03,7160 


07165 

1 

44476 1 

5OIOI 

1 

4«i5l6 

03,7170 


50117 

0 

00103 0 

34476 

0 

50101 

03,7200 


35501 

0 

60 I 1 6 1 

60101 

1 

50116 

03,7210 

c 

; 00017 

1 

00103 0 

06263 

0 

06275 

03, 7220 


35503 

1 

50110 1 

5OII2 

0 

40115 

03,7230 


40116 

0 

40000 0 

20062 

1 

30001 

03,72A0 


06776 

1 

07242 1 

30115 

1 

20062 

03,7250 


30001 

0 

50116 1 

05242 

0 

10112 

03,7260 


34772 

1 

05041 1 

04024 

0 

40061 

03,7270 


02101 

0 

4OII7 1 

5OO6I 

0 

20067 

03,7300 


34772 

1 

50064 U 

20000 

0 

30000 

03,7310 


20064 

1 

30001 0 

50021 

1 

30021 

03,7320 


35501 

0 

50117 0 

30001 

0 

50104 

03,7330 


10115 

0 

03044 1 

Cl 01302 

1 

07331 

03,73AO 


50022 

1 

10022 0 

07300 

0 

07405 

03,7350 


O73OO 

0 

07374 0 

07362 

1 

30117 

03,7360 


07336 

0 

06364 0 

34516 

1 

60062 

03,7370 


10022 

0 

10022 0 

07361 

1 

07405 


1 ^' 
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the right of Each word; denotes unused fixed memory. 
(Interpretive operator woros) or "C" (Constants), 


1 

10000 

0 

07010 

1 

07133 1 

07010 

1 

0 

60115 

1 

lOOOO 

0 

07030 0 

03062 

0 

0 

07030 

0 

03062 

0 

O7I32 0 

O7I32 

0 

0 

50076 

0 

O7O6O 

0 

30100 0 

60000 

1 

1 

50077 

1 

06367 

0 

50022 1 

IOO22 

0 

0 

30077 

1 

30116 

1 

50115 1 

O7O46 

1 

0 

25777 

1 

40116 

0 

60001 0 

40000 

0 

1 

60U5 

1 

50077 

1 

10000 0 

645 l6 

1 

1 

10000 

0 

64516 

1 

O7IIO 0 

O7II3 

0 

1 

07116 

0 

40077 

0 

25777 1 

50115 

1 

0 

50116 

1 

40034 

1 

50115 1 

00076 

0 

1 

64335 

0 

50122 

0 

25777 1 

44476 

1 

0 

50104 

1 

O7I54 

0 

10000 0 

64516 

1 

1 

30001 

0 

50103 

0 

06021 1 

07172 

1 

0 

07175 

0 

35501 

0 

50115 1 

50116 

1 

1 

34516 

1 

60117 

0 

60101 1 

50117 

0 

1 

35501 

0 

60115 

1 

60101 1 

50115 

1 

1 

10215 

0 

0 726 3 

1 

6OO7O 0 

50062 

0 

0 

40000 

0 

20062 

1 

30000 1 

5OO77 

1 

0 

50100 

0 

37241 

1 

50076 0 

35501 

0 

1 

30000 

1 

5OII5 

1 

30116 1 

20062 

1 

1 

07222 

1 

455O3 

0 

6OO7O 0 

50102 

1 

1 

50117 

0 

30120 

1 

20067 1 

50036 

1 

1 

30036 

1 

50120 

1 

35501 0 

07216 

0 

1 

25777 

1 

44522 

1 

20064 1 

50000 

1 

1 

60003 

1 

20064 

1 

50001 0 

0000 1 

0 

1 

07154 

0 

10000 

0 

07336 0 

00104 

1 

1 

50116 

1 

00104 

1 

50062 0 

4OII5 

0 

1 

07346 

1 

07353 

0 

67066 0 

10000 

0 

0 

30116 

1 

30115 

1 

60062 0 

65362 

0 

0 

50062 

0 

06364 

0 

50022 1 

40022 

0 

1 

374OI 

0 

25777 

1 

40115 0 

67402 

0 


^ti 4578 A YUL SYSTEM FOR AGc<»: REVISION 0 Oh PRjGRAM SOLRUM55 BY 


OCTaL listing 

oF paragraph 

# 017, 

WITH 

parity Bit 

IN 

binary at 

ALL valid Words are 

BASIC 

INSjRUCi loNS 

EXCEPT those 

marked •' I '• 

03»7A00 

07411 

1 

c; 32506 

0 

C; 04604 

1 

c: 22650 

03» ?AlO 

67404 

0 

30115 

1 

50077 

1 

50102 

03, ?A20 

25777 

1 

50115 

1 

50021 

1 

4OO21 

03,7A30 

30101 

1 

25777 

1 

44522 

1 

60115 

0 i, 7 AA 0 

O7445 

0 

3OOD3 

1 

60116 

1 

30116 

03 , 7 A 5 O 

10062 

1 

06236 

0 

00104 

1 

40065 

03 , 7 A 60 

04024 

0 

07322 

u 

04024 

0 

45503 

03, AA70 

§ 


e 




» 

W 

03*7500 

§ 


e 


§ 


& 

03,7510 

§ 


§ 


9 



03* /520 

§ 


€ 


& 


g 

03,7530 



is 





03*75A0 

& 




& 

hlii 


g 

03,7550 







g 

03* r560 

§ 






g 

03*7570 



€‘ 




& 

03*7600 



§ 




& 

03*7610 

§ 






§ 

03,7620 

§ 






g 

03*7630 



© 




g 

03,7640 

§ 


€ 


s 


9 

03*7650 



§ 


§ 


g 

03*7660 

& 


€ 




§ 

03*7670 

$ 




& 


g 

03 * ?700 

@ 




& 


& 

03*7710 

@ 


& 


s 



03,7720 

§ 






w 

03,7730 

§ 




§ 



03*7740 

€ 


§ 




g 

03*7750 

§ 




§ 


fe 

03,7760 

€ 


§ 


g 


0 

03*7770 

§ 


§ 


g 


0< 

1«i 
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the right qF each 

wqrOT "g” 

denote^ 

UnUSED 

FIXED 

memory. 


(Interpretive operator words) or «c 

" (CONSTANTS) , 



1 c: 06552 0 

374O3 

1 

25777 

1 

401 15 

0 

1 35501 0 

30116 

1 

50100 

0 

4 OO 77 

0 

0 60115 1 

5 OII 5 

1 

50101 

1 

O 7 O 33 

0 

1 50034 0 

O 744 I 

1 

34476 

0 

50116 

1 

1 30034 0 

50115 

1 

35501 

0 

5 OII 7 

0 

0 60000 1 

20000 

0 

07455 

1 

07320 

1 

0 05240 1 

07465 

1 

07466 

1 CKSM 

70243 

0 

g 

g 


& 


g 


@ 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


§ 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


g 


§ 

g 


g 


g 


g 

g 


g 


g 



^6^!)78A YUL 5Y5TLM FOR A3C^^: REVISION 0 OF RROGRAM 50LRUMS5 BY 


OCTAL listing oF PARAGRAPH # 020* wiTh PARITY BIT IN BINARY At 

ALL valid Words are basic instructions except those marked 


0 A * 6 000 

06705 

0 

07363 

0 

06653 

1 

06 52 5 

OAfbOlO 

103A6 

1 

06020 

0 

10a22 

1 

06020 

0A,6020 

65503 

1 

5057A 

1 

6O57 7 

1 

50577 

Oa,6030 

50601 

0 

10000 

0 

06037 

0 

AO573 

0 A * 6 0 AO 

1012A 

1 

06105 

0 

C; 00070 

0 

06105 

0 A f 6 0 S 0 

5012a 

0 

32261 

0 

70573 

1 

&O57A 

0 A f 6 0 6 0 

lOOOO 

0 

06063 

1 

06033 

1 

30573 

OA *6070 

50120 

1 

20215 

u 

A012A 

1 

60577 

0 A 1 6 1 00 

30572 

1 

02076 

1 

AOOOO 

0 

50215 

OAtSllO 

360A2 

1 

50601 

J 

lOOOO 

0 

20b0l 

0a*6120 

061A0 

1 

A0573 

1 

20601 

1 

60120 

0A,6l30 

3 A sO 6 

0 

20601 

1 

70123 

0 

5O57A 

0A,61A0 

AA513 

0 

60601 

0 

06111 

0 

50601 

0A,6l50 

3012A 

0 

20215 

0 

3012A 

0 

5012A 

0 A f 6 1 6 0 

A0061 

1 

60123 

1 

20215 

0 

30123 

0At6l70 

60123 

1 

50061 

Q 

A0121 

1 

60000 

0A,6200 

50021 

1 

7AA73 

1 

6A3A1 

0 

50065 

0A,6210 

06212 

0 

0621a 

0 

a0063 

0 

06215 

0 A * 6 2 2 0 

lOOOO 

0 

35501 

0 

06226 

1 

A 0 0 6 3 

0 A * 6 2 30 

20215 

0 

30115 

1 

50115 

1 

30116 

0A*62A0 

20215 

0 

30117 

0 

50117 

0 

355OI 

OAf 6250 

35501 

0 

0A026 

1 

6A5l6 

1 

50062 

0 A * 6 2 6 0 

50100 

0 

3012A 

0 

7A607 

0 

10000 

0A*6270 

A012A 

1 

5012A 

0 

A5501 

1 

50100 

Oa i6300 

lOlAA 

1 

063A1 

1 

03062 

0 

0630a 

Oa *6310 

1 0 1 6 A 

0 

06341 

1 

□ 3062 

0 

0631A 

0A,6320 

1020^ 

0 

063 A 1 

1 

C: 67653 

0 

0632a 

0A*6330 

10077 

0 

06333 

1 

062A5 

1 

20000 

Oa 1 63 ao 

061A5 

1 

50101 

1 

6 0 1 00 

0 

10000 

0A»6350 

00002 

0 

5007 7 

i 

AOlOl 

0 

50100 

0 A * 6 3 6 0 

30123 

1 

7A6O5 

1 

50123 

1 

34607 

0At6370 

50100 

0 

35501 

0 

5OO77 

1 

06274 
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PAGE b12 


THE 

right of each 

ttOKDt 

denotes 

unused 

FIXED 

MEMORY. 


(Interpretive 

operator WORDS) OR 

n C 

(CONSTANTS) 



0 

10216 

0 

06020 

0 


10272 

1 


06020 

0 

0 

10A76 

0 

06020 

0 


O3OAA 

1 

C 

; 01201 

0 

1 

355OI 

0 

2057A 

0 


47777 

0 


360A2 

1 

i 

06067 

0 

0304A 

1 

C • 

1 

01202 

0 


20601 

1 

0 

20601 

1 

50122 

0 


60577 

1 


20601 

1 

1 

20601 

1 

50123 

1 


36316 

0 


70573 

1 

0 

74606 

1 

64373 

1 


AOOOO 

0 


20601 

1 

1 

10000 

0 

A0601 

1 


06102 

1 


06100 

0 

1 

06100 

0 

A4513 

0 


6060 1 

0 


06030 

1 

1 

1012A 

1 

061A0 

1 


061A3 

1 


06121 

0 

1 

10000 

0 

OslAO 

1 


03062 

0 


06lA0 

1 

1 

20601 

1 

A012a 

1 


5057 7 

1 


O6OA7 

1 

0 

06100 

0 

20215 

0 


30120 

1 


50120 

1 

0 

74607 

0 

50067 

0 


6A511 

0 


5OO7O 

0 

i 

50123 

1 

74606 

1 


30123 

1 


AOOOO 

0 

1 

6 0 OOO 

1 

60065 

1 


20215 

0 


30121 

0 

1 

40021 

0 

A0021 

0 


5OI2I 

0 


10122 

1 

1 

30063 

1 

20215 

0 


30122 

0 


50063 

1 

0 

50063 

1 

34 5 1 6 

1 


50122 

0 


301 15 

1 

1 

20215 

0 

30116 

1 


50116 

1 


3011? 

0 

0 

50066 

1 

50215 

1 


20016 

1 


10120 

0 

0 

A0061 

1 

02122 

1 


20017 

0 


A5501 

1 

0 

20000 

0 

50000 

1 


0627A 

0 


20017 

0 

0 

1013A 

0 

063A1 

1 


03062 

0 


06300 

1 

0 

1015A 

0 

06341 

1 


03062 

0 


06310 

0 

1 

1017A 

1 

06341 

1 

c; 

70000 

0 


06320 

0 

1 

IO2IA 

1 

06341 

1 


03062 

0 


06330 

1 

0 

27777 

0 

66322 

1 


50215 

1 


30120 

1 

0 

30001 

0 

06351 

0 


30000 

1 


20001 

1 

0 

20077 

0 

00002 

0 


AOOOO 

0 


50061 

0 

1 

7012A 

1 

60577 

1 


50 1 2 A 

0 


AOOOO 

0 

0 

A0037 

1 

66376 

0 


10000 

0 


6 A66A 

1 


48^578^ YUL system FOR AGC4; REVIbIjN 0 Ot- PROGRAM SOLRUM55 BY 


octal list INC OF PARAGRAPH 


021, MTH 

parity Bit 

IN 

binary at 

all valid 

WORDS ARE BASIC 

instructions 

except those 

marked «Ih 

04 » 6A 00 

40000 

0 


6456 1 

1 


60577 

1 

10000 

04,6A10 

64522 

0 


64522 

0 


30037 

0 

64563 

04,6A20 

30552 

0 


30553 

1 


30554 

0 

30555 

04,6A30 

20577 

0 


06432 

1 


30561 

0 

30562 

04 *6^40 

3056/ 

0 


30570 

0 


62260 

1 

10000 

04 , 6^ SO 

02076 

1 


lOOOO 

0 


60553 

1 

06457 

04,6^60 

60554 

0 


06465 

u 


64516 

1 

06535 

04 tSAyO 

64516 

1 


06535 

1 

C; 

U0003 

1 

10000 

0A,6500 

C; 00004 

0 


10000 

0 


60557 

0 

06507 

04,6510 

60560 

1 


06515 

0 


64516 

1 

06535 

04,6520 

64516 

1 


06535 

1 

C; 

0000 7 

0 

0 3 O 44 

04,6530 

06531 

0 


32170 

0 


02052 

1 

C: 31261 

04,6540 

50577 

1 


34516 

1 


60001 

0 

20577 

04,6550 

20577 

0 


06420 

1 


30001 

0 

51466 

04,6560 

61460 

1 


61460 

1 


51460 

1 

06565 

04,6570 

51461 

0 


35501 

0 


6 1460 

1 

64476 

04,66 00 

41461 

1 


51461 

0 


11460 

0 

06613 

04,6610 

02173 

0 

C: 

10622 

0 


06 617 

1 

51460 

04,6620 

3 1 466 

1 


00000 

1 


31467 

0 

05/23 

04,6630 

44516 

0 


70645 

1 


60001 

0 

50645 

04 ,6640 

20016 

1 


05/02 

i 


05706 

0 

30062 

04 ,6650 

05723 

1 

C: 

10647 

0 

C: 

10652 

1 

20017 

04,6660 

06670 

0 


02346 

1 

C; 

00002 

0 

O 67 O 3 

04,6670 

64335 

0 


10000 

0 


06703 

0 

03062 

04,67 00 

02046 

1 

C; 

42000 

1 


02124 

1 

03233 

04,6710 

50612 

1 


51075 

1 


34513 

I 

50726 

04,6720 

50077 

1 


44516 

0 


20077 

0 

50650 

04,6730 

06720 

1 


50011 

1 


51762 

0 

3 45 00 

04,6740 

50727 

0 


34512 

0 


02173 

0 

C; IO 77 I 

04,6750 

37360 

0 


50645 

0 


37361 

1 

50646 

04,6760 

10000 

0 


067 64 

1 


03007 

0 

C; 00301 

04,6770 

07135 

1 


37343 

1 


5 O 727 

0 

34505 


NASA 1021108-t^2l 


DEC 4* 1966 


PAGE Bl3 


the right oF each WQRDt ”6'' DENOTES UNUSED FIXED MEMORY, 


{ INT eRPRETIVE 

operator 

; WORDS) OR 

tiC 

" (CONSTANTS). 



0 

60552 

0 


06451 

1 


06407 

1 


40577 

0 

0 

60577 

1 


50577 

1 


35501 

0 


30577 

1 

1 

30556 

1 


30557 

0 


30560 

1 


30573 

0 

0 

30563 

1 


30564 

0 


30565 

1 


30566 

1 

0 

03044 

1 

C; 

OI 2 O 3 

1 


06444 

0 


30572 

1 

1 

64516 

1 


06535 

1 

c; 

00001 

0 


loooo 

0 

1 C; 

00002 

0 


10000 

0 


60555 

1 


06473 

1 

0 

60556 

1 


06501 

0 


6451 6 

1 


06535 

1 

0 

64516 

1 


06535 

1 

c; 

00005 

1 


10000 

0 

1 C; 

00006 

1 


lOOQO 

0 


06523 

0 


30000 

1 

1 C: 

01204 

0 


10647 

0 


022 56 

1 


02256 

1 

0 

02256 

1 


30001 

0 


20000 

0 


30000 

1 

0 

60551 

0 


20577 

0 


50551 

0 


40001 

1 

1 

31461 

0 


60000 

1 


51461 

0 


35501 

0 

1 

06564 

0 


34516 

1 


6146 1 

0 


64476 

0 

0 

51460 

1 


03062 

0 


34501 

1 


25777 

1 

0 

1 l46l 

1 


O 66 O 7 

0 


06622 

1 


31461 

0 

1 

34501 

1 


O 2 I 73 

0 

C; 

10602 

1 


36534 

0 

1 

20017 

0 


40645 

1 


74516 

0 


50001 

0 

0 

lOOOl 

1 


06642 

1 


36651 

0 


02060 

0 

0 

50117 

0 


36651 

0 


02127 

1 


30117 

0 

0 

64341 

0 


10000 

0 


06703 

0 


03062 

0 

0 

32150 

1 


02046 

1 

c: 

43262 

0 


02124 

1 

0 

06703 

0 


10612 

0 


06703 

0 


34501 

I 

0 

02124 

1 


20017 

0 


355 OI 

0 


51763 

1 

1 

35501 

0 


51765 

1 


07200 

1 


34477 

1 

1 

40000 

0 


20077 

0 


50656 

1 


10077 

0 

0 

50724 

0 


5 O 725 

1 


37344 

0 


50723 

1 

1 

3 OOO 7 

0 


30007 

0 


77342 

1 


50730 

0 

0 

37362 

1 


50647 

1 


40726 

0 


74512 

1 

0 

07135 

1 


32160 

1 


02046 

1 

C; 

67411 

1 

0 

02173 

0 

c; 

30201 

1 


02256 

1 


51764 

0 


^b4b7BA YUL SySTlM FOR AGC4: RtViSION 0 Oh pROGf^^M SOLRUM55 BY 


octal listing of paragraph # 022* with parity bit in binary At 
All vAlID WORoS are basic instructions except those MARkEO "I'* 


0A*7000 


2001 7 

0 

37003 

0 


06713 

1 

Cl 

00030 

OA * ^010 


A 1776 

1 

AOOOO 

0 


21777 

0 


50001 

OA *7020 


3A512 

0 

706A6 

1 


10000 

0 


3A502 

OA *70 30 


3000A 

0 

773AI 

1 


67035 

0 


10000 

OA ♦70a0 


3AA7 7 

1 

5011 5 

L 


2 0000 

0 


A0650 

OA *70S0 


071A2 

1 

20115 

0 


A0656 

0 


70077 

OA ,7060 


50726 

1 

3A5l6 

1 


61075 

1 


51075 

OA , 7O7O 


30007 

0 

3000? 

0 


5O727 

0 


7 A 7 2 0 

OA, noo 


70727 

1 

10000 

0 


A5501 

1 


AOOOO 

0A,71 10 


07111 

1 

AA503 

1 


TO 730 

1 


50730 

Oa, 7120 


6 A5 1 6 

1 

50573 

0 


20000 

0 


106^7 

Oa,7130 


10120 

0 

O7II5 

u 


32172 

1 


02052 

OA, 71 AO 


05720 

1 

C: 23A15 

0 


10000 

0 


06717 

Oa , 7150 


07200 

1 

A55 0 1 

1 


5176A 

0 


07070 

0 A , 7 1 6® 


10000 

0 

07175 

0 


20120 

0 


37350 

0A,7l70 


50650 

1 

AOOOO 

0 


20120 

0 


50656 

Oa, 7200 


30001 

0 

50077 

1 


3AA76 

0 


50037 

0*+ , 7210 


50556 

1 

50555 

1 


5O55A 

0 


5O553 

0a,7220 


50566 

1 

50565 

1 


5O56A 

0 


50563 

O A , 7^30 


501 AA 

0 

5015A 

I 


5OI6A 

1 


5017A 

OA,72aO 


5O7O3 

0 

37356 

0 


5O2I6 

1 


67 35 7 

0a,7250 


50A22 

0 

67357 

1 


50A76 

1 


3A505 

OA, 7260 


20115 

0 

50710 

1 


10115 

0 


07256 

0A,7270 


50215 

1 

50627 

1 


50613 

0 


50633 

0 A , 7300 


50603 

1 

5063A 

0 


50635 

1 


50636 

OA , 7310 


50761 

1 

50762 

1 


50763 

0 


50731 

0*,,7320 


50735 

0 

A0036 

0 


5IO77 

0 


3AA75 

0A,7330 


50672 

1 

373A7 

0 


5O7O7 

1 


A73A6 

04i73A0 


00077 

1 

C; AOO37 

1 

C: 

35000 

1 

C; 

00050 

0 A , 7 3 5 0 

C: 

0212A 

1 

C; 26563 

0 

C: 

26563 

0 

c; 

26563 

Oa » 7360 

c; 

013AO 

1 

C; 00000 

1 

C: 

00000 

1 


73220 

OA ,7370 

c; 

IA006 

1 

306A2 

1 


2O6OI 

1 


50115 


NASA 1021108-021 


dec a, 1966 


the right of each word; "e” denotes unused fixed Memory. 


(Interpretive operator woRoS) or (constants). 


1 

C; 

00120 

1 


11760 

0 


07010 

1 


07020 

1 

0 


A1775 

1 


AOOOO 

0 


21777 

0 


50000 

1 

1 


50011 

1 


35503 

1 


50726 

1 


07200 

1 

0 


0 

0 

0 

1 

c: 

37755 

1 


O7OAO 

1 


06717 

0 

0 


50077 

1 


AOOOO 

0 


20115 

0 


70656 

0 

0 


071A2 

1 


10115 

0 


O7OAI 

0 


514A3 

0 

1 


AA5OO 

1 


TO725 

0 


64500 

0 


50725 

1 

1 


3O727 

0 


77342 

1 


50730 

0 


37OOA 

1 

0 


50677 

1 


lOOOA 

1 


07114 

1 


O7II4 

1 

0 


3AA77 

1 


50120 

1 


20016 

1 


20017 

0 

0 


0715A 

0 


0 7 1 6 6 

1 


10000 

0 


O7I75 

0 

1 

C: 

23725 

0 


20016 

1 


05654 

0 

C{ 

I6OO3 

0 

0 


00001 

0 


06717 

0 


06717 

0 


20017 

0 

1 


6A516 

1 


50115 

1 


AA720 

1 


70115 

0 

0 


05662 

0 


07130 

1 


AA5 1 6 

0 


20120 

0 

1 


07130 

1 


355O3 

1 


50726 

1 


06717 

0 

0 


5OOAO 

0 


3A520 

1 


50560 

1 


50557 

0 

i 


50552 

0 


A2260 

0 


5O57O 

0 


50567 

0 

1 


50562 

0 


50561 

0 


A5501 

1 


5013a 

1 

0 


5O2OA 

1 


5021a 

0 


50033 

1 


50677 

1 

1 


50272 

0 


67357 

1 


503A6 

0 


67357 

1 

0 


5012A 

0 


33232 

1 


50115 

1 


AA503 

1 

1 


51760 

1 


500A1 

1 


50056 

1 


5O7O6 

0 

1 


50625 

0 


50626 

0 


50630 

1 


50602 

0 

1 


5O76A 

1 


50756 

0 


5O757 

1 


50760 

0 

1 


50732 

1 


50733 

0 


50734 

1 


50675 

0 

0 


50670 

0 


373A5 

1 


50673 

0 


32566 

0 

0 


7O6A5 

1 


50645 

0 


A3227 

1 


5O6IA 

1 

1 

Ci 

AOOlO 

1 

C; 

02Al3 

0 

C; 

OOOlA 

1 

c; 

00013 

0 

0 

C: 

26563 

0 

c; 

26563 

0 

CJ 

00216 

1 

c: 

000 5 A 

0 

0 


506A2 

1 


02736 

1 


32166 

1 


O2O52 

1 

1 


02264 

0 


50030 

1 


02677 

0 


35501 

0 


■£>* 


t 


I ' 







V 


4a'!*578A y\JL System for agca* revision o of program solrumss by 


octal LIStINO oF paragraph 023» rtlTH PARItT BIj IN BINARY AT 


all valid 

WQRdS are I 

BASIC 

Instructions 

EXCEPT those 

marked "I" 

Oa, 7 A 00 

300Ai 

1 

50600 1 

i07l7 X 

07 A 05 

OA WAIO 

lOOOO 

0 

07A21 1 

30571 1 

6 A 50 A 

Oa *7A20 

30000 

1 

33220 1 

70600 0 

30600 

Oa » 7A30 

67507 

X 

07501 1 

07A72 1 

73220 

OA *7AA0 

60600 

1 

10000 0 

07A51 0 

C: 00022 

Oa ,7A50 

07A55 

1 

3A515 1 

706^5 X 

10000 

0a,7A60 

AA515 

0 

706 A 5 1 

6A515 1 

5 O 6 A 5 

Oa *7A70 

50021 

1 

00001 0 

A0021 0 

AOO 2 I 

0A,7500 

00001 

0 

60600 1 

10000 0 

07A57 

0a,7510 

C: 03777 

0 

3070^ 1 

6A5X6 1 

50 70 7 

0 A 1 7520 

CKSM A6717 

1 

§ 


9 

0Ai7530 




V 

9 

0A» 75AO 



§ 

§ 

9 

OA * 7 550 



§ 


9 

0A»7560 

§ 




9 

0At7570 

§ 


§ 



0A»7600 



9 

9 

9 

0A*7610 

§ 


§ 

9 

g 

OAt7620 

§ 


9 

§ 

g 

0A»7630 

9 


& 

S 

g 

0At76A0 

9 


€- 

9 


0A»7650 

9 


9 

s 

g 

0A,7660 

& 


9 

9 

i 

0A»7670 

§ 


L 

a 

g 

0A»77O0 

9 


@ 

a 

W 

g 

0A»7710 

9 


9 

9 

g 

0At7720 

9 


9 

& 

a 

0A»7730 

9 


9 

g 

9 

0A»77A0 

9 


9 

& 

§ 

OA » 7750 

9 


9 

9 

9 

w 

0A»7760 

9 


9 

9 

& 

0A»7770 

9 


9 

g 

§ 


NASA 1021108-021 


DEC A, 1966 


page bis 


tH[- right of each ^oRd; "e*' denote^ unuseD fixed memory, 
(Interpretive operator woRp^i oR "C” (constant^). 


X 

37510 1 

6A5X6 X 

5 O 57 X i 

7A50A 0 

1 

AOOOO 0 

30 7 17 0 

lOOOO 0 

07511 0 

1 

30021 1 

50571 X 

07 A 72 1 

73220 0 

0 

AOOOO 0 

O 75 OI 1 

07 A 66 1 

A7AA3 1 

1 

07A51 0 

AA 5 I 5 0 

706A5 1 

506A5 0 

0 

0226A 0 

30600 X 

0736A 1 

O 7 A 66 1 

0 

0257X 0 

0226A 0 

3 O 57 I 1 

60000 1 

0 

A002X 0 

A0021 0 

A002X 0 

AOOOO 0 

0 

03062 0 

07A57 0 

OOOOl 0 

C; 777A0 1 

1 

20001 1 

OOOOl 0 

07516 1 

07517 0 


g 

g 

g 

g 


§ 

§ 

g 

g 


S 

g 

g 

g 


g 

g 

g 

g 



g 

g 

g 


g 


g 

g 


§ 

g 

g 

g 


e 

g 

g 

g 


g 

g 

g 

g 


e 

g 

g 

g 


@ 

g 

g 

g 


§ 

g 

§ 

g 


§ 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


§ 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


g 

g 

g 

g 


YUL system FOR A&C4 : REVlblUN 0 OF RRDGHAM SOLRUM&b BY 


octal listing oE paragraph 024t with parity bit in binary At 
ALL valid Words are basic instructions except those marked Miit 


0b»60O0 


0607 1 

1 


06102 

1 


06220 

1 


05253 

ObfOOlO 


0643 7 

1 


06437 

1 


06415 

1 


06444 

Ob *6020 


06545 

0 


06652 

0 


3 OOOO 

1 


30000 

Ob *6030 


0607b 

0 


06043 

0 


06045 

0 


30000 

Ob *60 a0 

C{ 

26761 

0 


05720 

1 

C; 

26753 

1 


05720 

0bt6050 


70645 

1 


lOOOO 

0 


06 062 

0 


445 I 4 

05 * 6060 


20016 

1 


00001 

0 


03233 

0 


02124 

Ob *6070 


20017 

0 


706A5 

1 


50645 

0 


20016 

Ob * 6 100 


06126 

1 


O 6 O 75 

0 


O 6 IO 5 

0 


06142 

0b*6ll0 


60603 

1 


10000 

0 


06116 

1 

C! 

00020 

0b*6l20 


lOOOO 

0 


06075 

0 

C; 

00055 

1 


06075 

Ob *6130 

C; 

30000 

1 


05654 

0 

C; 

30331 

0 


06134 

Ob * 6 1 aO 


b0723 

1 


06065 

1 


06047 

1 


O 33 O 2 

Ob ,6150 


03136 

0 


06064 

u 


06167 

1 


3 6 1 6 6 

Ob , 6 1 60 

C; 

30104 

1 


05654 

0 

C; 

30331 

0 


06065 

05*6170 


03100 

0 


03315 

0 


03136 

0 


06 064 

05*6200 


50115 

1 


36217 

0 


50077 

1 


355 O 3 

05*6210 

C; 

30361 

0 


10077 

0 


50077 

1 


10116 

Ob * 6 2 2 0 


06047 

1 


03302 

0 


03310 

0 


36251 

Ob *6230 


06231 

1 


36252 

1 


03100 

0 


03315 

05*6240 

C; 

30331 

0 


06065 

1 


36500 

1 


05654 

05*6250 


06065 

1 

C: 

02567 

1 

C: 

04200 

1 


0 6 0 4 7 

05,6260 


06065 

1 


06065 

1 


06047 

1 


03302 

05,6270 


03136 

0 


06064 

0 


06306 

1 


06177 

05*6300 


05654 

0 

C; 

30223 

1 


05654 

0 

C; 

30331 

05*6310 


03315 

0 


03136 

0 


06064 

0 


06274 

05*6320 


03310 

0 


36216 

1 


03100 

0 


03315 

05*6330 


36351 

0 


03100 

0 


03315 

0 


03362 

0b*63A0 


06065 

1 


06065 

1 


36165 

0 


03100 

05*6350 


06330 

1 

c: 

04500 

0 


06047 

1 


05654 

05*6360 


06065 

1 


05654 

0 

C: 

1236/ 

0 


05654 

0 5 *6370 


03310 

0 


36406 

0 


03100 

0 


03315 


NASA 1021108-021 
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THe right oE LACH word? denotes unused fixed memory. 
(Interpretive operator woRdsj or "C** (Constants), 


0 


06262 

1 


063l6 

0 


06352 

0 


06075 

0 

0 


06454 

1 


06502 

0 


O 7 OI 4 

0 


06752 

1 

1 


30000 

1 


30000 

1 


30000 

1 


3 OOOO 

1 

1 


06075 

0 


O 7 OI 6 

1 


06041 

i 


05720 

1 

1 

C; 

26757 

0 


05720 

1 

c; 

64477 

1 


34514 

0 

1 


20017 

0 


7064b 

1 


64514 

0 


50645 

0 

1 


03362 

0 


06067 

0 


02124 

1 


445 I 4 

1 

1 


00001 

0 


03233 

0 


06065 

1 


06105 

0 

0 


06367 

0 


30001 

0 


5 OIO 6 

0 


46113 

0 

0 


060/5 

0 


00106 

0 


46122 

1 


60603 

1 

0 


20106 

1 


OOOOl 

0 


06047 

1 


05654 

0 

1 


20017 

0 


45070 

1 


70723 

0 


64 500 

0 

0 


03310 

0 


36165 

0 


O 3 IOO 

0 


03315 

0 

0 


03100 

0 


03315 

0 


03362 

0 


05654 

0 

1 


06065 

1 

C; 

02522 

0 

c: 

O 4 IOO 

1 


36216 

1 

0 


06153 

0 


06177 

0 


06153 

0 


30001 

0 

1 


50116 

1 


20000 

0 


30621 

1 


05654 

0 

0 


06204 

1 


00115 

1 

C; 

02523 

1 

c; 

00702 

1 

1 


03100 

0 


O 33 I 5 

0 


03136 

0 


06064 

0 

0 


03362 

0 


05654 

0 

c; 

30143 

1 


05654 

0 

0 

C: 

31433 

1 


05654 

0 

c: 

30331 

0 


06065 

1 

1 


05654 

0 

c: 

30205 

0 


05654 

0 

C: 

30331 

0 

0 


03310 

0 


36216 

1 


03100 

0 


03315 

0 

0 


36315 

0 


03100 

0 


03315 

0 


03362 

0 

0 


06065 

1 


06065 

1 


36165 

0 


03100 

0 

0 


06274 

0 

C: 

04400 

1 


06047 

1 


03302 

0 

0 


03136 

0 


060 64 

0 


06342 

1 


O 6 I 77 

0 

0 


05654 

0 

c; 

30216 

1 


05654 

0 

c; 

30331 

0 

0 


03315 

0 


03136 

0 


06064 

0 


06330 

1 

0 

C; 

30134 

1 


05654 

0 

C: 

30331 

0 


06065 

1 

0 

C: 

30327 

1 


06065 

1 


06065 

1 


03302 

0 

0 


03136 

0 


06064 

0 


06377 

1 


36 1 66 

0 



YUL system for AGC^: revision 0 Of PROGRAM SOLRUMss BY 


OCTAL listing of PARAGRAPH # 02St wItH PARItV Blj IN BINARY AT 

all valid Words are basic instructions except those marked "I” 


Ob * 6 A 00 


03100 

0 


03315 

0 

03362 

0 


35501 

Ob » 6 A 10 

C; 

12415 

1 


0565 4 

0 

C: 30327 

1 


□ 6065 

Ob «6A20 


10000 

0 


06075 

0 

34516 

1 


02173 

0bt6A30 


06432 

1 


02124 

1 

20016 

1 


05654 

Ob f 6 AAO 

C: 

14003 

1 


0606 7 

U 

05720 

1 

c: 

16006 

Ob »6A50 


02124 

1 


A5501 

1 

50677 

1 


02124 

Ob t6A60 


03100 

0 


0331b 

0 

031 36 

0 


06064 

Ob *6^70 


03362 

0 


36500 

1 

05654 

0 

c; 

31433 

Ob *6500 

c: 

01520 

1 

C: 

05400 

0 

36544 

1 


50110 

Ob *6510 


02124 

1 


20017 

0 

35501 

0 


50117 

0b*b520 


60b 1 6 

0 


6003 b 

1 

30115 

1 


05654 

05*6530 


30036 

1 


10000 

0 

06534 

0 


06542 

Ob * 6 5 AO 


60035 

1 


30035 

1 

20016 

1 


02124 

05*6550 

c: 

12552 

0 


02124 

1 

30005 

1 


74516 

Ob * 65 60 


51103 

1 


30005 

1 

30001 

0 


40U35 

05*6570 


06603 

1 


06577 

1 

30572 

1 


51102 

Ob * 6 600 


02173 

0 

C: 

12561 

0 

02256 

1 


50573 

05 * 66 1 0 


345 1 6 

I 


70573 

1 

50032 

0 


34516 

05*6620 


0662a 

1 


03062 

0 

06624 

1 


00574 

05.6630 


A4507 

0 


30572 

1 

10000 

0 


34507 

Ob *66a0 


50572 

1 


30003 

1 

76651 

1 


50573 

0b*6650 


OOOOl 

0 

C; 

37600 

u 

20017 

0 


34516 

Ob 1 6660 


74516 

0 


50032 

0 

445 l6 

0 


71103 

05*6670 


35501 

0 


50036 

1 

50035 

1 


30001 

0b*6700 


40000 

0 


60573 

0 

51105 

1 


35501 

0b*b7l0 


64516 

1 


06713 

i 

06720 

1 


51104 

0b*6720 


645 l6 

1 


40000 

0 

64505 

0 


06713 

05*6730 


41101 

1 


61105 

1 

50116 

1 


35501 

0b,67A0 


06741 

0 


35501 

0 

50117 

0 


05654 

05*6750 


50616 

0 


06511 

1 

03302 

0 


03310 

05*6760 


37013 

1 


50117 

0 

37012 

0 


U3100 

05.6770 


2001/ 

0 


34501 

1 

02 046 

1 

c: 

12775 
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the right of Each word; "«•* denotes unused fixed memory. 
(Interpretive operator words) or mC'» (Constants), 


0 


50703 

0 

06065 

1 

c: 

02457 

0 

05654 

0 

1 


0 606 5 

1 

20017 

0 


40735 

1 

745O5 

1 

0 

c: 

30611 

1 

32261 

0 


7O735 

1 

10000 

0 

0 

c: 

14000 

1 

05720 

1 

c; 

30755 

0 

05654 

0 

0 


06105 

0 

06451 

1 


45501 

1 

50703 

0 

1 


06047 

1 

O33O2 

0 


03310 

0 

36251 

1 

0 


06465 

0 

36501 

0 


03100 

0 

03315 

0 

1 


05654 

0 

c: 30331 

0 


06^65 

1 

06065 

1 

1 


03121 

0 

02124 

1 


03136 

0 

02124 

1 

0 


30036 

1 

606l7 

1 


50116 

1 

35501 

0 

0 

C: 

07154 

0 

30115 

1 


30035 

1 

30116 

1 

1 


34516 

1 

60036 

1 


50036 

1 

06542 

1 

1 

C: 

02124 

1 

20017 

0 


34516 

1 

02173 

0 

0 


50032 

0 

445I6 

0 


71103 

0 

60032 

0 

0 


31101 

0 

40035 

0 


31100 

1 

30001 

0 

0 


30573 

0 

51 IO3 

1 


02256 

1 

345 1 6 

1 

0 


35504 

0 

50572 

1 


30001 

0 

50574 

1 

1 


71103 

0 

25777 

1 


60032 

0 

lOOOO 

0 

1 


30003 

1 

50032 

0 


30573 

0 

25777 

1 

1 


06636 

1 

445O7 

0 


60572 

1 

74607 

0 

0 


345I6 

1 

25777 

1 


40032 

1 

20574 

0 

1 


02173 

0 

C; 12657 

0 


02124 

1 

3OOO5 

1 

0 


60032 

0 

51103 

1 


30005 

1 

30001 

0 

0 


06603 

1 

06724 

0 


A4516 

0 

71103 

0 

0 


60572 

1 

25777 

1 


61102 

0 

10000 

0 

0 


32166 

1 

02052 

1 

C! 

12730 

0 

02256 

1 

1 


34516 

1 

02173 

0 

c: 

12666 

1 

02256 

1 

0 


61104 

0 

25777 

1 


61100 

1 

50115 

1 

0 

C: 

07154 

0 

30116 

1 


50617 

1 

30115 

1 

0 


10612 

0 

07146 

0 


02362 

1 

c: 00007 

0 

0 


03315 

0 

03136 

0 


07146 

0 

06760 

0 

1 


02124 

1 

35362 

0 


71225 

1 

20000 

0 


4b4578A YUL System for revision u Of- program SOLRUmSS By 


octal LISjING oE paragraph # 02b» with PARItT bit in binary at 


all valid ^oRps are basic Instructions except those marked "I" 


Os , 7 OOO 


37002 

1 


05723 

1 

C: 

12075 

0 

c: 

24SU 

Os ,7010 

c: 

23421 

1 

C; 

23534 

1 

c: 

02101 

0 

c: 

01225 

OS *7020 


37143 

0 


50117 

0 


37144 

1 


03100 

OS ty 030 


10616 

1 


07035 

0 


07020 

1 


07020 

os t 7040 


20616 

1 


07041 

0 


U7066 

0 


O 7 O 75 

0S*70S0 


O 7 O 2 O 

1 


07020 

1 


02346 

1 

c; 

00014 

05«7060 


lOOOD 

0 


07146 

0 


32160 

1 


02046 

OS t7070 


10000 

0 


07145 

0 


03373 

0 

C! 

40200 

OS t7100 


07145 

0 


03405 

0 

C; 

40200 

1 


07146 

OS f 71 10 


34515 

1 


70645 

1 


lOOOO 

0 


07146 

0S»7120 


02346 

1 

C: 

00002 

0 


07145 

0 


07107 

05*7130 


03373 

0 

C: 

4 O 4 O 0 

1 


20017 

0 


37142 

OS * 7 1 aO 

c: 

0007Q 

0 

C; 

77770 

1 

C; 

01750 

1 

Cl 

00616 

0S»7l50 


02362 

1 

C: 

00024 

1 


02124 

1 


30001 

0S»7l60 


20603 

0 


37331 

1 


50055 

1 


40603 

0S*7170 


07171 

1 


35503 

1 


50107 

1 


34606 

0S*7200 


50056 

1 


20001 

1 


37516 

1 


5 OO 57 

05,7210 


345 1 6 

1 


5 OIO 7 

1 


07206 

1 


20111 

0S*7220 


50111 

0 


00001 

□ 


20111 

1 


37431 

05*7230 


00001 

0 

C; 

00000 

1 

C; 

^tOOOO 

0 

c: 

40000 

05*7240 

C 

40000 

0 

C: 

00000 

1 

C 

00000 

1 

C: 

00000 

05*7250 

C 

00035 

1 

C: 00047 

1 

c 

00044 

1 

c: 

OO 7 OO 

05*7260 

c 

01762 

0 

C! 

006 1 6 

0 

c 

01763 

1 

c: 

01266 

OS * 7270 

Ci 

00621 

1 

Cl 

00616 

0 

c 

00000 

1 

c: 

00000 

05*7300 

c 

00000 

1 

c 

00000 

1 

c 

00000 

1 

c: 

00744 

OS * 7310 

c 

02005 

0 

c 

04007 

1 

c 

02012 

0 

c; 

04062 

05 * 7320 

c 

04027 

0 

c 

04032 

1 

c 

04035 

0 

c; 

04040 

OS * 7330 

c 

04057 

1 

c 

OOODO 

1 

c 

00040 

0 

c; 

00140 

05*7340 

c 

00302 

0 

c 

00000 

I 

c 

00000 

1 

c; 

ODOOO 

05*7350 

c 

00241 

0 

c 

O 4 IO 2 

0 

c 

04140 

0 

C; 

04102 

05*7360 

c 

00140 

1 

c 

0414 0 

0 

c 

04000 

0 

c ; 

00252 

OS . 7370 

C! 

1 04000 

0 

c 

04154 

0 

c 

00000 

1 

C; 

00000 


NASA 1021108-021 


DEC A, 1966 


page 818 


the right of each word; denote^ unused fixed Memory, 


(Interpretive operator woRd^) or "C (constants). 


1 

C: 

24606 

1 

C: 

24OOO 

1 

c; 

24372 

1 

C! 

24203 

0 

0 


05720 

1 

c; 

23025 

1 


03302 

0 


03310 

0 

0 


03315 

0 


03136 

0 


07146 

0 


07020 

1 

1 


07020 

1 


771A1 

0 


10000 

0 


07O20 

1 

1 


07104 

0 


07052 

1 


O7I24 

1 


U7O20 

1 

1 


07145 

0 


20017 

0 


34507 

1 


70646 

1 

1 

C! 

64336 

0 


O7IA6 

0 


37I4O 

0 


7O6I2 

0 

1 


07146 

0 


37140 

0 


70612 

0 


10000 

0 

0 


02346 

1 

c; 

OOOO4 

0 


07120 

0 


20017 

0 

0 


32157 

0 


02046 

1 

C; 

64000 

0 


07146 

Q 

0 


37140 

0 


7O6I2 

0 


10000 

0 


O7 145 

0 

1 


02173 

0 

C: 

50172 

0 


07146 

0 

c; 

77/15 

1 

0 

C; 

02101 

0 


03233 

0 


03362 

0 


02124 

1 

0 


5OO6O 

1 


2O6O3 

0 


37231 

0 


5OO54 

0 

0 


67167 

0 


10000 

0 


07210 

0 

C: 

00055 

1 

0 


70054 

1 


50001 

0 


20000 

0 


37515 

1 

0 


20001 

1 


37517 

0 


30060 

1 


OOOOO 

1 

1 


37463 

1 


50110 

1 


20111 

1 


37500 

0 

0 


50110 

1 


20111 

1 


37446 

0 


50111 

0 

0 

C: 

40000 

0 

C; 

40000 

0 

C; 

40000 

0 

c; 

40000 

0 

1 

c: 

00000 

1 

C: 

00000 

1 

c; 

77777 

0 

c; 

00035 

1 

0 

c: 

00621 

1 

C: 

006l6 

0 

C! 

00616 

0 

c; 

00616 

0 

1 

C: 

01146 

0 

c; 

01276 

0 

c; 

01314 

0 

c; 

006 1 6 

0 

1 

C: 

00000 

1 

c; 

00000 

1 

CJ 

OOOOO 

1 

c; 

OOOOO 

1 

0 

c: 

00747 

0 

c; 

00752 

1 

c; 

02000 

0 

c 

04002 

1 

1 

C; 

02016 

1 

c: 

02020 

1 

c; 

02022 

0 

c 

0402<» 

0 

1 

C: 

04043 

1 

c; 

04046 

1 

C! 

O4O5 1 

1 

c 

O4O54 

1 

1 

c: 

00102 

1 

c; 

00241 

0 

c; 

00200 

0 

c 

00203 

n 

1 

0 

C: 

00000 

1 

c: 

00000 

1 

c: 

OOOOO 

1 

c 

00200 

0 

C: 

04102 

0 

C; 

00200 

0 

c; 

001 40 

1 

c 

OOI4O 

1 

1 

C; 

00252 

1 

c: 

00350 

1 

CJ 

04102 

0 

c 

O4OOO 

0 

1 

c: 

00000 

1 

C! 

OOOOO 

1 

c: 

OOOOO 

1 

c 

OOOOO 

1 


4ti4^7aA yul System for agca: revision o of program solrumss by 


octal LISylNO Of-' PARAGRAPH # 027» wIjH PARI ft' Blj IN BINARY At 

All valid words are basic instructions except those marked ”1" 


OSt MOO 

C 

00000 

1 

c 

00003 

1 

c 

00000 

1 

c 

04144 

05 t 7410 

c 

00102 

1 

c 

00000 

1 

c 

00542 

1 

c 

00000 

05 t 7420 

c 

06143 

1 

c 

14306 

1 

c 

16347 

0 

c 

20410 

05 » 7430 

c 

22451 

1 

c 

00006 

1 

c 

00253 

0 

c 

00000 

05» 7440 

c 

00314 

1 

c 

23423 

0 

c 

00201 

1 

c 

01371 

05*7450 

c 

00000 

1 

c 

3O7O7 

1 

c 

02133 

1 

c 

30322 

05* 7460 

c 

34750 

1 

c 

03434 

1 

c 

04000 

0 

c 

05174 

05*7470 

c 

03216 

1 

c 

07237 

0 

c 

00120 

1 

c 

00321 

05*7500 

c 

13261 

0 

c 

3135 / 

1 

C: 

00000 

1 

c 

23146 

05*7510 

c 

26706 

1 

c 

14247 

0 

C; 

20305 

0 

c 

23146 

05*7520 

c 

14617 

1 

c 

10623 

1 

C; 

O47O4 

0 

c 

14705 

05*7530 

c 

06617 

1 

c 

00003 

1 

C: 

00000 

1 

c 

04052 

05*7540 

c 

; 10643 

1 

c 

06621 

1 

C 

02622 

0 

c 

06623 

05,7550 

c 

} 06740 

1 

c 

067A2 

0 

c 

06737 

1 

c 

O67AI 

05*7560 

c 

: 13160 

1 

c 

13162 

0 

c 

13164 

0 

c 

13266 

05f7570 

c 

; 17276 

1 

r 

I66l6 

1 

c 

16620 

1 

c 

16622 

05*7600 

c 

; 07617 

0 

c 

: 07110 

0 

c 

: 00300 

1 

c 

00000 

05* 7610 








§ 



£ 

05*7620 











& 

05*7630 


& 






d 



g 

05*7640 








& 



8 

05*7650 





6f 



8 



& 

05 * 7660 


§ 



§ 






8 

05*7670 


§ 






69 



& 

05*7700 


§ 









& 

05*7710 


§ 



§ 







05*7720 


§ 










05* 7730 


€ 



& 



e 

Vp 



8 

05,7740 


€ 



(& 



g 



8 

05* 7750 











hi 

■v* 

05*7760 





§ 



g 



S 

05*7770 


§ 



& 



a 

'W 



g 
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tH£ right of each word; Denote^ unused fixed memory. 
(Interpretive operator woRdS) or "C" (constants)* 


1 

c 

04145 

0 

c 

04145 

0 

C: 

00102 

1 

c; 

00102 

1 

c 

00002 

0 

c 

OOOO2 

0 

c: 

00001 

0 

C! 

00000 

0 

c 

22451 

1 

c 

OO4I2 

0 

c: 

20450 

1 

c: 

20410 

1 

c 

00021 

1 

c 

00001 

0 

C! 

00011 

1 

c; 

OOOO4 

0 

c 

00001 

0 

c 

00003 

1 

c 

03240 

1 

c; 

25124 

1 

c 

14021 

1 

c 

31463 

1 

c 

00000 

1 

C; 

30327 

0 

c 

27670 

0 

c 

00000 

1 

c 

01631 

1 

c; 

35753 

i 

c 

37441 

1 

c; 

05300 

1 

c 

34631 

1 

c; 

12172 

0 

c 

32323 

1 

c 

06400 

0 

c 

37776 

0 

CJ 

00000 

0 

c 

34121 

1 

c 

O4O52 

1 

c 

I4O53 

1 

C ; 

046l6 

0 

c 

OOOO7 

0 

c 

OO727 

0 

c 

00726 

1 

CS 

04616 

1 

c 

10035 

0 

c 

14053 

1 

c 

10035 

0 

c: 

12643 

0 

c 

11520 

0 

c 

11522 

1 

c 

11524 

1 

c: 

06736 

0 

c 

067A3 

1 

c 

17152 

1 

c 

17154 

1 

C; 

17156 

1 

c 

17276 

1 

c 

O73OO 

0 

c 

l66 1 6 

1 

c; 

12620 

0 

c 

12616 

0 

c 

12620 

0 

c 

12622 

1 

Cl 

IOO35 

1 

c; 00000 

1 


07605 

0 


07606 

0 

CKSM 

72^42 



g 



g 



g 



g 



§ 



g 



g 



g 



& 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



§ 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 



g 


1 

1 

0 

0 

I 

1 

0 

0 

1 

I 

1 

0 

0 

0 

0 

0 

0 


YUL SYSTEM FOR AGC<»: REVISION 0 OF PROGRAM SOLRUM55 By 


octal UlSTlf^ta 0^ PARAGRAPH # 030* WITH PARlyY Blj IN BINARY ftj 

ALL valid Words are basic instructions except those marked "I*- 


06 t 6000 


30001 

0 


50112 

U 


U7453 

1 


30001 

06 f 60 1 0 


50106 

0 


30115 

1 


50063 

1 


20000 

06f 6020 


06072 

1 


06072 

1 


06072 

1 


06072 

0 6 f 6 0 3 0 


074AO 

0 


07440 

0 


07440 

0 


07440 

06t60^0 


06057 

0 


07440 

0 


07440 

0 


07440 

06^60^0 


06302 

0 


06U55 

1 


07440 

0 


06501 

0 6 1 6 0 6 0 


05720 

1 

C: 

16136 

L 

C; 

00032 

0 


34473 

06 ♦ 6 0 7 0 


3550L 

0 


50063 

1 


10614 

0 


O6O77 

06 f 6 1 0 0 


10633 

0 


355OI 

0 


50633 

1 


06104 

0 6 f 6 1 1 0 


3061*4 

1 


50104 

1 


5 0 6 1 4 

1 


07341 

0 6 f 6 1 2 0 


20076 

1 


30fo02 

0 


50022 

1 


4OQ22 

0 6 f 6 1 3 0 


20076 

1 


30602 

u 


5OII5 

1 


35501 

0 6 1 6 1 ^ 0 


60063 

1 


50116 

1 


06146 

1 


60115 

06 f 6 1 5 0 


A06 1 *t 

0 


20076 

1 


66211 

0 


lOOOO 

06 t 6 1 60 


70615 

1 


10000 

0 


06165 

0 


4 0614 

06 t6l70 


06170 

1 


06175 

1 


05157 

1 

C; 

56217 

06 f 6 2 00 


20076 

1 


50605 

1 


30116 

1 


20076 

06f 6210 


02124 

1 

C; 

00022 

1 

C; 

00020 

0 

C; 

00012 

06^6220 

C: 

72603 

1 

Cl 

645 1 6 

i 


2061A 

0 


36226 

06f6230 

C! 

00004 

0 

C: 

00004 

0 

C: 

00004 

0 

c: 

00003 

0 6 ♦ 6 2 ^ 0 

c: 

00002 

0 

C: 

00002 

0 

c: 

00002 

0 

c; 

00002 

06 ♦ 6 2 5 0 

C; 

00000 

1 

C: 

00000 

1 


35501 

0 


50602 

06 f 6260 


07341 

0 


36211 

0 


5OIO4 

1 


35501 

06 1 62 7O 


50613 

0 


33147 

0 


50065 

1 


02124 

06^6300 


0662 1 

1 


0626 6 

0 


06357 

0 


06343 

0 6 t 6 3 1 0 


50615 

0 


10633 

0 


35501 

0 


50633 

Ob ? 6320 


34516 

1 


06305 

I 


3OOOI 

0 


50073 

0 b t 6 3 3 0 


64516 

1 


50064 

0 


355OI 

0 


5OIII 

06 f 6 3 4O 


30064 

0 


07426 

0 


00073 

0 


30001 

06 f 6350 


50064 

0 


645 1 6 

1 


50110 

1 


06332 

06 f 6 3 60 


50073 

0 


34473 

0 


7O6I5 

1 


10000 

06f 6370 


06374 

1 


43173 

0 


06374 

1 


02124 
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the right oE each word; denotes unused fixed memory. 
(Interpretive operator words) or "Ch (constants). 


0 


50112 

0 


07462 

0 


03265 

0 


745I3 

0 

0 


06015 

0 


O744O 

0 


O6O72 

1 


O6O72 

1 

1 


O6O72 

1 


06063 

1 


0606 3 

1 


O7440 

0 

0 


07440 

0 


06070 

0 


06252 

1 


06402 

1 

0 


07440 

0 


07440 

0 


07475 

0 


06316 

0 

0 


06274 

0 


05720 

1 

C; 

16007 

1 


36062 

0 

0 


70615 

1 


lOOOO 

0 


06072 

1 


07440 

0 

1 


06077 

1 


06076 

0 


02124 

1 


06222 

0 

1 


20063 

0 


32652 

1 


73220 

0 


50111 

0 

0 


34473 

0 


7O6I5 

1 


10000 

0 


06130 

0 

0 


4OO22 

0 


3OO22 

1 


60063 

1 


06146 

1 

0 


50116 

1 


33232 

1 


O54I6 

1 


30116 

1 

1 


50115 

1 


06165 

0 


20076 

1 


50602 

0 

0 


07440 

0 


O744O 

0 


06206 

0 


3447 3 

0 

0 


06207 

1 


34473 

0 


70615 

1 


20000 

0 

0 


06177 

0 


0515? 

1 

C; 

56215 

1 


30117 

0 

1 


50602 

0 


06163 

0 


10614 

0 


50614 

1 

1 

C: 

00005 

1 

C; 

00000 

1 

c; 

O5I74 

0 

c: 

13261 

0 

1 


50076 

0 


00001 

0 

c: 

00004 

0 

c: 

OOOOa 

0 

1 

C; 

00003 

1 

c: 

00003 

1 

c: 

00003 

1 

c; 

OOOO3 

1 

0 

C: 

00002 

0 


03062 

0 

c; 

00001 

0 

c: 

00001 

0 

0 


50111 

0 


33227 

0 


50614 

1 


50104 

1 

0 


50111 

0 


07341 

0 


35501 

0 


5O6I5 

0 

1 


355DI 

0 


50603 

1 


33230 

0 


50614 

1 

0 


35503 

1 


6O6I5 

0 


20076 

1 


64510 

1 

1 


06315 

0 


02124 

1 


06357 

0 


06322 

1 

0 


06222 

0 


20076 

1 


36352 

0 


50110 

1 

0 


30110 

1 


07426 

0 


345O4 

1 


50111 

0 

0 


50073 

0 


06222 

0 


20076 

1 


36352 

0 

0 

C: 

00005 

1 

c: 

OOOO3 

1 

c; 

00000 

1 


30001 

0 

0 


02124 

1 


43I7I 

1 


06374 

1 


43 I72 

1 

1 


6061 4 

1 


10000 

0 


00001 

0 


03062 

0 



^8h578A YUL system FDR AGC<t: RtViSIJN 0 OF PROGRAM SOLRUMbS BY 


OGTAL listing qF PARAGRAPH 031» rtllH PARIjY Bij IN BINARY Ay 


ALL VALID 

WORDS 

are basic instructions 

except THOSe 

marked «1m 

06 » 64U0 


00001 

0 

00073 

0 


44513 

0 

20017 

Oof 6A lO 


70011 

0 

64510 

1 


5OOII 

1 

46500 

06f 6A20 


TOOll 

0 

50011 

1 


33232 

1 

50063 

Op .6^30 


06435 

0 

64516 

1 


4OOOO 

0 

* 76477 

06 i6440 


20063 

0 

50710 

1 


20016 

1 

10063 

06,6450 


0p455 

0 

3000/ 

U 


30007 

0 

74720 

Op , 6 A pO 


06465 

0 

30007 

0 


30007 

0 

76475 

Op ,6470 


51764 

0 

50111 

0 


35362 

0 

07426 

06,6500 

c: 

40340 

1 

10614 

0 


64516 

1 

06505 

Op , d5 lO 


10633 

0 

Op 5 i 6 

0 


O55I4 

1 

06514 

Op ,6520 


06545 

0 

30613 

0 


666I7 

1 

50613 

06,6530 


50602 

0 

05654 

0 

C; 

16346 

1 

30073 

Op ,6540 


50633 

1 

02124 

1 


30001 

0 

50106 

06,6550 


OOOOl 

0 

03062 

0 


02124 

1 

OOOOl 

Op , 6 5 pO 


20076 

1 

50602 

0 


20076 

1 

50605 

06,6 5 7O 


76620 

1 

50615 

0 


20076 

1 

36610 

Op , ppOO 


50614 

1 

066 21 

i 


45 5O3 

0 

60614 

Op ,66 1 0 


50614 

1 

00106 

0 

C: 

00016 

0 

C: 00005 

Op ,6620 

c; 

77774 

0 

30001 

0 


50112 

0 

40614 

Op ,6630 


20021 

0 

30710 

1 


lOOOO 

0 

06640 

OP , 664O 


30707 

1 

64516 

1 


50707 

1 

20001 

06,6650 


06652 

0 

06700 

0 


06722 

0 

10115 

06,6660 


66742 

0 

501 15 

1 


06666 

1 

34600 

06,6670 


30115 

1 

66742 

0 


10000 

0 

06661 

06,6700 


20117 

1 

36737 

i 


50111 

0 

20117 

06,6710 


50106 

0 

10115 

u 


00106 

0 

00106 

06,6720 


20106 

1 

OOOOl 

0 


20117 

1 

36737 

06,6730 


05416 

1 

05171 

0 

Cl 

OOllO 

1 

06750 

06,6740 

C: 

2172? 

0 c: 

31463 

1 

C; 

16040 

1 

30111 

Op ,67 50 


05720 

1 c: 

16542 

0 


06764 

1 

30117 

06,6760 


06750 

0 

06764 

1 


07213 

0 

06750 

06,6770 


07025 

1 

20063 

0 


40056 

0 

40000 
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THL right of each word; denotes unused fixed MEMORY. 


(INTERPRETIVE 

operator 

WORDS) OR 

II C It 

(CONSTANTS), 


Q 

70645 

1 


60106 

0 


50645 

0 


44510 

0 

7O723 

0 


64500 

0 


50723 

1 


46476 

1 

20017 

0 


20063 

0 


IO7IO 

0 


64516 

1 

06440 

1 


40000 

0 


76477 

1 


AOOOO 

0 

06423 

1 


10727 

1 


06455 

0 


06455 

1 

50727 

0 


10 730 

1 


06465 

0 


06A65 

0 

5O73O 

0 


355OI 

0 


51763 

1 


50726 

0 

02124 

1 

C; 

35000 

1 

c; 

01131 

0 

c; 

73777 

1 

64516 

1 


20000 

0 


36226 

1 


50076 

1 

06545 

0 


06535 

1 


10076 

1 


5OO76 

0 

30076 

0 


50073 

0 


30602 

0 


64 33 6 

0 

50076 

0 


06542 

1 


34516 

1 


60633 

0 

06557 

0 


45503 

0 


60076 

0 


lOOOO 

0 

30001 

0 


50106 

0 


06222 

0 


35501 

1 

50111 

0 


20076 

1 


44510 

0 


7O6I5 

0 

50104 

1 


07341 

0 


20076 

1 


36613 

1 

50614 

1 


06621 

1 


20076 

1 


33167 

1 C; 

00004 

0 

c; 

00015 

0 

Cl 

00011 

1 

C; 

00003 

0 

40000 

0 


50021 

1 


46637 

1 


20017 

0 

03062 

0 


20016 

1 


00112 

0 

c: 

O4OOO 

1 

OOOOl 

0 


35501 

0 


50117 

0 


06707 

0 

30115 

1 


06660 

1 


06670 

0 


64335 

0 

60115 

1 


5OII5 

1 


35503 

1 


06646 

0 

03062 

0 


64516 

1 


40000 

0 


06661 

1 

36734 

i 


501 10 

1 


OOOOl 

0 


30001 

0 

06715 

1 


445OO 

1 


70115 

0 


50115 

1 

50116 

1 


20117 

1 


36734 

1 


30115 

0 C; 

05605 

1 

C: 

O27O2 

0 

c; 

16314 

0 

c; 

03656 

0 

50116 

1 


30110 

1 


30115 

1 


05416 

0 

30116 

1 


50115 

1 


06750 

0 


06764 

0 

30001 

0 


50122 

0 


20107 

0 


06767 

0 

74606 

1 


5OII7 

0 


20017 

0 


2OII7 


0 

0 

I 

0 

0 

0 

I 

1 

0 

0 

0 

1 

0 

0 

I 

0 

1 

1 

0 

0 

I 

0 

0 

0 

0 

I 

1 

1 

I 

I 

1 

1 


^b4&78A YUL SYSTEM FOR AGCifl REviSijN 0 OF PROGRAM SOLRUM55 BY 


octal Listing o^' paragraph # 032* ^vith pariiy bit in binary at 
all valid Words are basic instructions except those marked "I« 


06i7000 


AOOOO 

0 

40000 

06*7010 


10116 

0 

07014 

06*7020 


00122 

0 

2011 7 

0b*7030 


20107 

0 

07031 

06 * 7 Oi+ 0 


20624 

0 

4OUOI 

06*7050 


05654 

0 

C: 07154 

06*7060 


07062 

1 

445 O4 

06*7070 


07235 

1 

05654 

06*7100 


10122 

1 

07116 

Ob * 7 1 1 0 


74476 

1 

50115 

06*7120 


40000 

0 

07111 

06*7130 

C: 

50107 

1 

30117 

06*71A0 


07224 

1 

07235 

0fa,7l50 


30115 

1 

67126 

06*7160 


07066 

0 

05157 

Ofa , 7 I7O 


07226 

0 

07235 

06*7200 


50001 

0 

30116 

06*7210 

C; 

50107 

1 

07213 

06*7220 

C: 

06364 

0 

10110 

06*7230 


60115 

1 

50115 

Ob* 72 AO 


07442 

1 

30001 

06*7250 


06343 

0 

40116 

06*7260 


60115 

1 

soils 

06*7270 


33232 

1 

05416 

06 * 7 3 00 


30116 

1 

50115 

06*7310 


07267 

0 

43227 

06*7320 


50111 

0 

34473 

06*7330 


64516 

1 

5OII5 

06*73a0 


07267 

0 

30001 

06*7350 


34516 

1 

70104 

06*7360 


34501 

1 

70104 

06*7370 


IO7IO 

0 

07373 


0 


30115 

1 

20117 

0 


07021 

0 

07014 

1 


bOOOO 

1 

30115 

L 


07034 

1 

07442 

1 


4OOOO 

0 

30116 

0 


07315 

1 

00065 

0 


bOl l6 

1 

07226 

0 

C: 

06367 

0 

10115 

0 


07112 

1 

10U5 

1 


05720 

1 

C; 17053 

1 

C: 

26161 

0 

c: 3O7O7 

0 


30116 

1 

30115 

1 


07112 

1 

10115 

0 


50115 

1 

05157 

1 

C: 

5OIO7 

1 

30117 

1 


20107 

0 

O7I73 

L 


20001 

1 

5OOOI 

0 


07163 

1 

30001 

0 


07216 

0 

00111 

1 


00001 

0 

50122 

0 


50106 

0 

10115 

0 


07255 

1 

06322 

1 


07266 

1 

34476 

1 


20115 

0 

32652 

1 


30614 

1 

50104 

1 


50614 

1 

00106 

u 


07426 

0 

35502 

1 


06343 

0 

4 0116 

0 


5OII2 

0 

33220 

0 


lOOOO 

0 

07355 

0 


10000 

0 

35503 

1 


03062 

0 

64516 
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the right of Each ^ord; denoted* unused fixed memory. 


( iNTtPPf^ETlVE operator WORDS) OR wC'« <C0N5 tANtS) , 


1 


40001 

1 


20016 

1 

40000 

0 


30116 

1 

0 


05157 

1 

C; 

50107 

1 

05654 

0 

C: 

07154 

0 

1 


07014 

0 


40624 

0 

4OOOO 

0 


06775 

1 

1 


20624 

0 


4OOOO 

0 

40000 

0 


30115 

1 

1 


33171 

0 


50614 

1 

35501 

0 


50117 

0 

1 


05157 

1 

C; 

57121 

1 

10116 

0 


34504 

1 

0 


05654 

0 

c: 

06 36 7 

0 

05654 

0 

c: 

06367 

0 

0 


07100 

1 


O7IOO 

1 

40000 

0 


50115 

1 

0 


03062 

0 


07114 

1 

07107 

0 


30115 

1 

1 


44476 

1 


07111 

1 

40115 

0 


74476 

1 

1 

C; 

2l6l6 

0 

C: 

O7O7I 

0 

C: 71527 

1 


05157 

1 

I 


10000 

0 


07442 

1 

07140 

0 


07442 

1 

0 


07150 

1 


07150 

1 

07442 

1 


07442 

1 

1 

C; 

57123 

0 


345O3 

0 

60116 

1 


07226 

0 

0 


60000 

1 


50117 

0 

35501 

0 


601 1 6 

1 

0 


07205 

1 


30063 

1 

50063 

1 


60624 

1 

0 


07112 

1 


35501 

0 

07177 

1 


05157 

1 

0 


50111 

0 


34475 

0 

50110 

1 


05654 

0 

0 


30116 

1 


60000 

1 

50116 

1 


00001 

0 

0 


00001 

0 


10122 

1 

O7442 

1 


OOOOl 

0 

0 


07253 

1 


07253 

1 

64516 

1 


50115 

1 

1 


30116 

1 


67314 

0 

50116 

1 


35501 

0 

0 


50115 

1 


50116 

1 

35502 

0 


50076 

0 

1 


73220 

0 


50111 

0 

35501 

0 


3OII7 

0 

1 


10000 

0 


5 06 1 4 

1 

07341 

0 


10076 

1 

0 

C: 

02476 

0 


30001 

0 

50106 

0 


35501 

0 

0 


O7426 

0 


IOU5 

0 

07336 

0 


07336 

0 

0 


50116 

1 


07337 

1 

06322 

1 


33I72 

0 

1 


70104 

0 


50021 

1 

30021 

1 


5OIO2 

1 

0 


07365 

0 


30111 

0 

03212 

0 


50111 

0 

1 


645 1 6 

1 


50104 

1 

20017 

0 


20102 

0 

1 


50103 

0 


20104 

0 

77422 

0 


25777 

1 


^a4t)7HA YUL SYSTEM HOft AGc^tt REVISION 0 OF PROGRAM SOLRUM53 BY 


octal listing 

qf paragraph 

* 033* with 

parity Bit in 

BINARY At 

all valid Words are basic 

InStRUCi 1 ONS 

EXCEPT THQSe 

MARXeO ’'I'i 

06f ?aOO 

60111 0 

10000 

0 


07AOb 1 

03062 

06t7Al0 

70103 1 

60111 

0 


AOOOO 0 

20102 

06 » / A 2 0 

20016 1 

00112 

0 

C; 

00037 0 

C; 017AO 

06» 7A30 

5010a 1 

30001 

0 


50112 0 

07366 

O 61 7AA0 

331A7 0 

50065 

1 


03233 0 

A7AA7 

0b,7A50 

00065 1 

030AA 

1 

C; 

OI 5 OI 1 

3A50A 

06 f 7 A60 

5 OIOA 1 

07366 

0 


35501 0 

07A5A 

06 f 7 A 7 O 

06003 1 

07600 

0 


03127 0 

AA516 

06 »7500 

07A26 0 

03323 

0 


0212A 1 

3AA77 

06* 7510 

3010A 1 

50021 

1 


3 OO 2 I 1 

20000 

06* 7520 

2010a 0 

77A22 

0 


2 0 1 0 A 0 

0752A 

06.7530 

606iA 1 

10000 

0 


6 A5 1 6 1 

07535 

06*75A0 

63171 0 

10000 

0 


3061 A 1 

6A5l6 

06*7550 

20000 0 

10710 

0 


0755A L 

03062 

06*7560 

3757A 0 

07A26 

0 


A061A 0 

67576 

06*7570 

33171 0 

5061A 

1 


U655A 0 

00065 

06*7600 

10627 0 

07606 

0 


0212A 1 

07606 

06*7610 

20017 0 

02060 

0 


10632 1 

07630 

06* 7620 

60120 1 

20601 

1 


50120 1 

20016 

06*7630 

AA516 0 

07617 

0 


07632 1 

07633 

0 6 * 7 6 A 0 


e 




g 

06*7650 

§ 





g 

06*7660 

& 





g 

06*7670 

& 

€ 



e 

g 

06*7700 


§ 




9 

06*7710 

§ 




§ 

g 

06*7720 





e 

9 

06*7730 

§ 

d 




Q 

06 * 7 7 AO 

§ 

d 




g 

06*7750 


& 



g 

g 

06*7760 

§ 

§ 



s 

w 

$ 

w 

06*7770 


§ 



g 

g 
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the right oF each word? »&” DENOTES UNUSED FIXED MEMqRY. 


{INTLRPRETIVE 

operator WORDS) OR 

wCii (CONSTANTS), 



3 

07A06 

1 

07A20 

0 

20104 0 


A7A22 

0 

3 

30710 

1 

10000 

0 

066A0 0 


03062 

0 

3 C; 

02000 

0 

C; 037A0 

1 

50102 1 


35503 

1 

3 

073A1 

0 

37A37 

0 

05723 1 

c; 

17254 

1 

3 

60065 

1 

10000 

0 

00065 1 


03125 

1 

1 

50111 

0 

37A6A 

0 

50102 1 


35503 

1 

3 C: 

00011 

1 

3A5l6 

1 

50632 0 


03323 

0 

0 

07A66 

1 

35501 

0 

50111 0 


35362 

0 

1 

5O6 1 A 

1 

5 OIO 4 

1 

3A516 1 


7OIOA 

0 

0 

IO 7 IO 

0 

O 75 I 7 

0 

03062 0 


64516 

1 

0 

07526 

1 

0317A 

0 

50111 0 


AAA77 

0 

0 

03062 

0 

5010a 

1 

07341 0 


A06lA 

0 

1 

O 75 OA 

1 

3550 1 

0 

5 O 6 IA 1 


67576 

1 

0 

6 A 5 I 6 

1 

7A50A 

0 

50111 0 


20614 

0 

1 

10000 

0 

3061A 

1 

64516 1 


07546 

1 

1 C: 

00000 

1 

C; 00001 

0 

C: 00003 1 

C: 

00004 

0 

0 

50627 

1 

07624 

0 

35501 0 


30627 

1 

0 

0212A 

1 

076^6 

1 

45503 0 


20601 

1 

1 

03356 

1 

0212a 

1 

35501 0 


O 76 I 7 

0 

0 CkSM 

72UA 

0 

g 


g 


g 



g 


g 


g 


g 





g 


g 


g 



g 


g 


g 


g 



§ 


g 


g 


g 



§ 


g 


g 


g 



@ 


g 


g 


g 



e 


g 


g 


g 



e 


g 


g 


g 



g 


g 


g 


g 



g 


g 


g 


g 



g 


g 


g 


g 



g 


g 


g 


g 



^b^i^TaA YUL SYSTEM FOR AGC'*: REVISION 0 OT PROGRAM SOLRUMbS BY 


octal LlSjlNG qF paragraph ^ 03At WITH PARITY BIT IN BINARY AT 


all Valid words are basic instructions except those marke^^ "I" 


07*6000 


07354 

1 


07434 

0 

07456 

1 


30001 

0 7 * sO 1 0 


50633 

1 


3314? 

0 

50065 

1 


10613 

07*6020 


70615 

1 


10000 

U 

06024 

1 


06030 

07*6030 


40613 

1 


50613 

0 

05654 

0 

C; 

14003 

07 *60A0 


66043 

0 


10000 

0 

06046 

0 

c; 

00032 

07*6050 


20107 

0 


06051 

0 

06054 

0 


06210 

O7 * 6060 


33173 

X 


506l4 

1 

30624 

1 


64516 

07*6070 


50633 

1 


4314 7 

1 

60065 

1 


10000 

07*6100 


10615 

1 


06355 

1 

30506 

1 


50624 

07*6110 


44513 

0 


70602 

1 

66115 

1 


lOOOO 

07*6120 


33173 

1 


50614 

I 

40624 

0 


40000 

07*6130 


46143 

0 


606 0 2 

J 

10000 

0 


6 4516 

0 7 *6140 


30115 

1 


66 144 

u 

05723 

1 

C; 

00040 

07*6l50 

c; 

16356 

0 

C; 

16372 

0 

C; 16377 

0 

c; 

16404 

07*6160 

c: 

17342 

1 

c; 

17102 

1 

c: 17102 

1 

c: 

17102 

07*6170 

C: 

17321 

1 

Cj 

16645 

i 

C: 16655 

0 

CJ 

16671 

07*6200 

c: 

16356 

0 

C: 

17215 

1 

c; 15503 

0 

c; 

15465 

07*6210 


10054 

1 


06215 

I 

06356 

1 


06215 

07*6220 


06130 

0 


03062 

0 

06223 

1 


355O3 

0 7 * 6 2 3 0 


40056 

0 


40000 

0 

50063 

1 


72261 

07 * 6240 


60063 

i 


50063 

1 

30063 

1 


74506 

07*6250 


30000 

1 


10064 

1 

06224 

0 


06130 

07*6260 


20000 

0 


06262 

1 

00110 

1 


00 no 

07*6270 


00110 

i 


06272 

0 

20110 

0 


00001 

07*6300 


40001 

1 


5O6I3 

0 

33172 

0 


06307 

07*6310 


05654 

0 

C: 

14554 

0 

05654 

0 

C: 

14000 

07*6320 


03062 

0 


06323 

0 

00065 

1 


45501 

07,6330 


50063 

1 


36107 

1 

05662 

0 


10054 

07*6340 


50624 

1 


3323 J 

0 

50614 

1 


4O5O3 

07*6350 


33227 

0 


50614 

1 

4O5O2 

1 


40000 

07*6360 


45503 

0 


06430 

0 

20624 

0 


40002 

07,6370 


40001 

1 


30100 

0 

06457 

1 


20624 
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the right oP Each ^ord; "e" denotes unused fixed memory. 


UnieRpRetive operator WORDS) or (Constants), 


0 


50063 

1 


07423 

0 


06705 

0 


35501 

0 

1 


06035 

1 


06035 

1 


06017 

1 


34473 

0 

1 


10614 

0 


06356 

1 


06356 

1 


06030 

1 

1 


00613 

0 


355 OI 

0 


5 O 6 I 5 

0 


40602 

1 

0 


06045 

0 


06130 

0 


36107 

1 


05662 

0 

1 


10054 

1 


06126 

1 


06356 

1 


06067 

0 

1 


50624 

1 


07225 

0 


06130 

0 


34500 

0 

0 


06110 

1 


03062 

0 


ObllO 

1 


06304 

0 

1 


36107 

1 


05662 

0 


06130 

0 

C; 

I 3 I 53 

1 

0 


06120 

1 

c; 

77772 

0 


06120 

1 


06130 

0 

0 


O 7225 

0 


06130 

0 


64516 

1 


50624 

1 

1 


06136 

0 


06 145 

1 


50115 

1 


03323 

0 

0 

C: 

12000 

1 


20602 

1 


36150 

0 


05723 

1 

0 

C! 

16 365 

0 

c: 

16360 

0 

c; 

16476 

0 

c: 

I 5 O 30 

0 

1 

C: 

17102 

1 

c; 

17102 

1 

CJ 

I 7 IO 2 

1 

c: 

I 7 IO 2 

1 

0 

C: 

16620 

1 

c: 

1 6 564 

1 

c: 

16356 

0 

c; 

16356 

0 

1 

C: 

15472 

1 

c: 

15475 

0 

c; 

10000 

0 

c: 

17273 

1 

1 


06215 

1 


444 7 5 

1 


60602 

0 


10000 

0 

1 


50064 

0 


66254 

1 


50624 

1 


20064 

1 

1 


03203 

0 


06255 

0 


06242 

0 


34516 

1 

1 


20000 

0 


4 OOOO 

0 


40000 

0 


20624 

0 

0 


00073 

0 


50110 

1 


30001 

0 


30110 

1 

1 


00110 

1 


OOllO 

1 


06272 

0 


06272 

0 

0 


40001 

1 


50613 

0 


33171 

0 


0630? 

0 

0 


40001 

1 


50613 

0 


33173 

1 


50614 

1 

1 


43147 

1 


60065 

1 


lOOOO 

0 


06323 

0 

1 


50627 

1 


00065 

1 


50603 

1 


30001 

0 

1 


645 1 6 

1 


06340 

0 


06341 

1 


06341 

1 

0 


06353 

1 


50602 

0 


30001 

0 


50063 

1 

0 


07261 

0 


00063 

1 


05720 

1 

c; 

15442 

1 

1 


30101 

1 


445 16 

0 


06430 

0 


20624 

0 

0 


40000 

0 


30077 

1 


06411 

0 


44516 

0 


t 

k 


I 




, ^ <Vkk M II » 


w S* v* 




’ 4 


r. 





YUL SYSTEM KOR AGCA: REVISION 0 OF PROGRAM SOLRUMS5 BY 


octal listing qF paragraph « 035* WITH PARITY BIT IN BINARY AT 


all valid 

Words are basic 

instructions 

except THoSe 

marked nil' 

07*6A00 

06A30 

0 

2062<+ 

0 


AOOOl 

1 


06375 

07*6Ai0 

06375 

0 

A5503 

0 


60602 

0 


10000 

07*6A20 

20000 

0 

33171 

0 


5061A 

1 


2 0 0 6 A 

0 7 * 6 A 3 0 

50110 

1 

30001 

U 


5OIII 

0 


AA5I6 

07*6A^0 

06AA2 

0 

0011 1 

0 


20107 

0 


36A73 

0 7 * 6 AsO 

03203 

0 

60110 

1 


10000 

0 


OOlll 

07*6A60 

50063 

1 

2OIO7 

0 


06A62 

1 


06 A65 

0? f 6A7O 

3062a 

1 

6A5l6 

1 


5062A 

1 


00063 

07*6500 

20000 

0 

AOOOO 

0 


AOOOO 

0 


72261 

07*6510 

20000 

0 

AOOOO 

0 


2006A 

1 


3060a 

0 ?,6520 

50117 

0 

20063 

0 


33171 

0 


5061 A 

07,6530 

5011 1 

0 

0565A 

0 

C: 

13213 

0 


20107 

O7 *65A0 

067A0 

1 

06551 

0 


0565A 

0 

c; 

152A1 

07*6550 

06516 

0 

20000 

0 


3655A 

0 


05723 

0 7*6560 

c; IA752 

1 

C: IA757 

1 

C: 

1A653 

1 

c: 

1 A 7 6 1 

07*6570 

0627A 

0 

367l6 

1 


063A5 

0 


06300 

07*6600 

06720 

1 

36107 

1 


05662 

0 


35501 

07*6610 

07000 

0 

2062A 

0 


50001 

0 


35503 

07*6620 

AA516 

0 

06A30 

0 


36715 

1 


063A5 

07*6630 

AAA77 

0 

06720 

1 


36107 

1 


05662 

07 *66A0 

3A616 

1 

07000 

0 


2062A 

0 


50001 

07*6650 

35501 

0 

07000 

u 


2062A 

0 


50000 

07*6660 

50633 

1 

06300 

1 


36107 

1 


05662 

07*6670 

06705 

0 

A5503 

0 


06A30 

0 


3A500 

07*6700 

35503 

1 

O7OOO 

0 


2062A 

0 


50002 

07*6710 

50632 

0 

A3227 

1 


5O6IA 

1 


05720 

07*6720 

50063 

1 

30001 

0 


50106 

0 


A0bl5 

07*6730 

06732 

1 

00106 

0 


60063 

1 


10000 

07*67A0 

30001 

0 

50112 

0 


33221 

0 


7OO55 

07*6750 

20063 

0 

A0056 

0 


40000 

0 


72261 

07*6760 

20107 

0 

06761 

1 


06775 

1 


20063 

07*6770 

00000 

1 

00112 

0 


06771 

0 


0317A 
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the RIGHT oF EACH woRD* DENOTES UNUSED FIXlD MEMQRY. 


(Interpretive operator i^jords) or "Cm (Constants), 


0 


A55O3 

0 


06A30 

0 


2062a 

0 


40002 

1 

0 


06A17 

0 


00065 

1 


06417 

0 


50064 

0 

1 


AOO77 

0 


07225 

0 


30064 

0 


06413 

1 

0 


60603 

1 


10000 

0 


06AA2 

0 


03062 

0 

1 


20000 

0 


40000 

0 


40000 

0 


72261 

1 

0 


03062 

0 


06356 

1 


OOlll 

0 


30001 

0 

0 


00063 

1 


O67AO 

1 


06255 

0 


00063 

1 

1 

C; 

00055 

1 

C; 

0005A 

0 


20107 

0 


36473 

1 

1 


03203 

0 


50063 

1 


50064 

0 


60624 

1 

0 


IOO6A 

1 


06506 

1 


35501 

0 


50116 

1 

1 


20063 

0 


AObOA 

1 


50115 

1 


06756 

0 

0 


0653A 

0 


065A0 

0 


06746 

1 


06551 

0 

1 


10063 

0 


065A7 

1 


00065 

1 


50063 

1 

1 

c; 

15AA2 

1 

C! 

165A2 

0 

c: 

14645 

0 

c; 

I4743 

1 

1 


A55O3 

0 


06A30 

0 


36715 

1 


06345 

0 

1 


36717 

0 


063A5 

0 


06304 

0 


44475 

1 

0 


07000 

0 


2062A 

0 


50000 

1 


34516 

1 

1 


07000 

0 


20624 

0 


50002 

0 


06705 

0 

0 


0627A 

0 


36716 

1 


06345 

0 


06300 

1 

0 


35501 

0 


O7OOO 

0 


20624 

0 


50OOO 

1 

0 


O67O5 

0 


0627A 

0 


36107 

1 


05662 

0 

1 


06705 

0 


A4516 

0 


06430 

0 


34500 

0 

0 


3A516 

1 


O7OOO 

0 


20624 

0 


50001 

0 

0 


50633 

1 


06304 

0 


36107 

1 


05662 

0 

0 


O67O5 

0 


355OI 

0 


50615 

0 


45501 

1 

1 

C: 

15600 

0 

C: 

00021 

1 

c; 

00022 

1 

c; 

00023 

0 

1 


50021 

1 


40021 

0 


40021 

0 


10000 

0 

0 


06356 

1 


03062 

0 


06356 

1 


00106 

0 

0 


0317A 

0 


00112 

0 


30001 

0 


50112 

0 

1 


03203 

0 


00112 

0 


30001 

0 


50112 

0 

0 


33220 

1 


7OO55 

0 


20063 

0 


26772 

1 

0 


□ 3203 

0 


33220 

1 


7OO55 

0 


00112 

0 


^0^578^ YUL 5V5TEM FOR AGC4: REVISION 0 OF PROGRAM S0LRUM55 BY 


octal Listing of" paragraph # 036, with pariiy bit in binary at 
ALL valid Words are basic instructions except those marked "i" 


07* ?000 


50063 

1 


30001 

0 


5OIO6 

0 


35501 

07*7010 


20063 

0 


30604 

0 


50115 

1 


20107 

ON 7020 


40000 

0 


74606 

1 


25777 

1 


60063 

Of* ^030 


06255 

0 


O7O53 

0 


345I6 

1 


60624 

0 7 * 7O4O 


20063 

0 


47777 

0 


07053 

0 


10615 

0 N 7O5O 


35501 

0 


50063 

1 


07032 

1 


30115 

ON ?060 

c: 

13222 

1 


20107 

0 


07062 

1 


07066 

O N ^OtO 


37072 

0 


05723 

1 

C; 

15442 

1 

c; 

15140 

0 N7100 

c; 

15143 

0 

c: 

15161 

0 


44500 

I 


7 0624 

07*7110 


50022 

1 


30022 

1 


60603 

1 


50115 

07 ♦ 7I2O 


07123 

0 


03062 

0 


03257 

1 


20017 

07*7130 

C: 

17137 

1 


30115 

1 


50625 

0 


30116 

07i71A0 


02736 

1 


10626 

1 


07146 

0 


07146 

07*7150 

C; 

17137 

1 


32164 

0 


02052 

1 

c: 

I7l62 

07*7160 


02256 

1 

C: 

00144 

0 


10626 

1 


07167 

07*7170 


07214 

1 


37421 

1 


70625 

1 


50110 

0 N7200 


03174 

0 


50020 

0 


30020 

0 


50602 

07*7210 


50624 

1 


06046 

0 

C; 

OO7OO 

0 

c; 

03071 

07*7220 


40624 

0 


4000D 

0 


05730 

0 


07225 

07*7230 


30614 

1 


64501 

1 


50614 

1 


35502 

07,72A0 


40000 

0 


75362 

1 


20000 

0 


32652 

07*7250 


10000 

0 


5O6I4 

1 


05720 

1 

C; 

15434 

07*7260 


00106 

0 


50020 

0 


30001 

0 


50106 

07*7270 


30020 

0 


50022 

1 


07241 

1 


07306 

07*7300 


50614 

1 


05654 

0 

C; 

14621 

1 


30115 

ON 7310 


33230 

0 


50614 

1 


35501 

0 


50603 

07*7320 


00065 

1 


33147 

0 


50075 

0 


03323 

07*7330 


33223 

I 


50073 

0 


30624 

1 


50074 

O7 , 73A0 


33226 

1 


07331 

1 


33147 

0 


5OO75 

07*7350 


50074 

1 


2OUI7 

0 


3 06 1 6 

0 


OOO73 

07*7360 


501 15 

1 


37422 

1 


70110 

0 


03174 

07*7370 


07374 

0 


30116 

1 


06345 

0 


03125 
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the right oF Each woro; denotes unused fixed memory. 
(Interpretive operator words) or "C" (Constants), 


0 

50122 

0 


20063 

0 

30607 0 

5OII6 

1 

0 

07014 

0 


07043 

1 

20063 0 

40056 

0 

1 

50624 

1 


I06l5 

1 

07055 0 

06746 

1 

1 

50624 

1 


60063 

1 

50063 1 

35501 

0 

1 

07055 

0 


06740 

1 

06255 0 

O7O53 

0 

1 

00106 

0 


06756 

0 

50111 0 

05654 

0 

0 

06746 

1 


O7O67 

1 

06740 1 

20000 

0 

0 

C; 15054 

1 

C! 

15127 

1 

Cl I5l6l 0 

c; 15207 

0 

0 

50116 

1 


37421 

1 

70602 1 

03203 

0 

1 

40630 

0 


65503 

1 

IQOOO 0 

03366 

1 

0 

10625 

1 


07131 

0 

34516 1 

02173 

0 

1 

50626 

0 


20016 

1 

00065 1 

02677 

0 

0 

07155 

1 


07155 

1 

37161 0 

02173 

0 

1 

02256 

1 


355OI 

0 

50625 0 

50626 

0 

0 

07167 

0 


02124 

1 

02124 1 

03274 

0 

I 

03121 

0 


02124 

1 

37212 1 

70625 

1 

0 

37213 

0 


50065 

1 

44500 1 

70626 

1 

1 

03250 

0 


02124 

1 

33171 0 

50614 

1 

0 

02124 

1 


50022 

1 

30001 0 

50106 

0 

0 

50076 

0 


40022 

0 

40022 0 

40022 

0 

1 

73220 

0 


50111 

0 

30614 1 

5OIO4 

1 

0 

10076 

1 


07234 

0 

43227 1 

50614 

1 

0 

34516 

1 


50076 

0 

40020 1 

40020 

1 

0 

35501 

0 


30603 

1 

50115 1 

33230 

0 

1 

05720 

1 

C; 

10002 

1 

40001 1 

5O6I3 

0 

1 

05654 

0 

c: 

14621 

1 

05654 0 

C: I4OOO 

1 

0 

34516 

1 


7O6I6 

1 

lOOOO 0 

O734O 

1 

1 

44516 

0 


7O6I6 

1 

20017 0 

OOO73 

0 

0 

03323 

0 


33224 

0 

50073 0 

30624 

1 

0 

37373 

1 


50065 

1 

37421 1 

70110 

0 

0 

50020 

0 


30020 

0 

50116 1 

10115 

0 

1 

10116 

0 


O74OI 

0 

30115 1 

06326 

0 


I 


YUL SYSTEM FOR AGC^tt REVISION 0 OT PROGRAM SOLRUM&S By 


octal LIStInC oF paragraph « 037f with parity Bit in BINART at 
ALL valid words ARe BaSIC INSTRUCTIONS eXCePT THQSe MARKED "I« 


07*7A00 

03125 1 

30116 

1 


06 345 

0 

30115 

07t7Al0 

07416 0 

35501 

0 


50632 

0 

50633 

07»7A20 

07411 1 

C: 00077 

1 

Cs 

07700 

1 

33231 

07»7A30 

07261 0 

3010? 

1 


50614 

1 

00063 

07*7A40 

05723 1 

35503 

i 


50113 

1 

20113 

07 *7A50 

07442 1 

0752b 

I 


30L14 

0 

20113 

07 i7A60 

07463 1 

30114 

0 


05723 

1 

35503 

07 »7A70 

30634 0 

10000 

0 


07526 

1 

07475 

07 »7500 

02127 1 

32164 

0 


02052 

1 

C; I 75 O 5 

07*7510 

30636 1 

50114 

0 


lOOOO 

0 

07515 

07*7520 

2001b 1 

34516 

1 


50630 

1 

02124 

07*7530 

07530 0 

07531 

1 

CKSM 

76351 

1 

g 

07*7540 








07*7550 


§ 



§ 


g) 

07*7560 


§ 



a 


Q 

07.7570 


§ 



Q 


e 

07*7600 


€ 





& 

07*7610 





i 


g 

07* fbZO 

& 






e 

07*7630 

§ 

& 



§ 


£1) 

07*7640 


e 





§ 

0 7*7650 

§ 






i 

07*7660 

€ 

e" 



g 



07*7670 

& 




§ 


g 

07*7700 

S 






§ 

07*7710 

& 




i 



07*7720 

§ 




Q 


§ 

0 7*7730 

§ 

& 



e 



07*7740 


@ 






07*7750 


§ 



s 


g 

07*7760 

§ 




$ 


a 

07*7770 


& 



g 


g 
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the right of Each word? denotes unused fixed memory. 


(INTERPRETIVE 

operator 

WORDS) OR 

«Ci» (CONSTANTS), 



1 06326 

0 

10054 1 

07411 1 


06356 

1 

1 50613 

0 

06035 1 

30117 0 


50624 

1 

1 30614 

1 

50107 1 

40612 0 


40000 

0 

1 50114 

0 

10630 0 

07441 1 


30114 

0 

0 10634 

1 

07447 1 

O 7452 0 


10113 

0 

D 50634 

0 

02127 1 

50114 0 


03274 

0 

1 50630 

1 

30114 0 

30636 1 


30635 

1 

0 07526 

1 

03250 0 

40636 0 


i*0000 

0 

1 02256 

1 

35501 0 

30634 0 


30635 

1 

1 07524 

0 

30114 0 

20017 0 


02060 

0 

1 355 OI 

0 

07522 0 

O 3 O 44 1 

C; 

01206 

1 

§ 


g 

g 


g 




g 

g 


g 


§ 


g 

g 


g 


6 


g 

g 


g 


@ 


g 

g 


g 


@ 


g 

g 


g 


§ 


g 

g 


g 


g 


g 

g 


g 


& 


g 

g 


g 


e 


g 

g 


g 


g 


g 

g 


g 


@ 


g 

g 


g 


§ 


g 

g 


g 


§ 


g 

g 


g 


g 


g 

g 


g 


§ 


g 

g 


g 


g 


g 

g 


g 


g 


g 

g 


g 


§ 


g 

g 


g 


g 


g 

g 


g 


§ 


g 

g 


g 



YUL SYSTEM FOR AGC**: REVISION 0 OF PROGRAM SOLRUM55 BY 


octal LlSylNG Qf^ PARAGRAPH # 04U» WIjH PARIyY BIT IN BINARY AT 
ALL valid words ARe BASIC INSTRUCTIONS eXCePt THOSe MARKED "I" 


10*6000 

C 

06006 

1 

c 

01117 

1 

C: 

01116 

0 

C: 

06114 

IO 16 O 1 O 

c 

01113 

0 

c 

01112 

1 

C: 

01111 

1 

C; 

OHIO 

1 0 1 6 O 2 0 

c 

01103 

1 

c 

01102 

0 

C; 

OllOl 

0 

C; 

01100 

lUtbOsO 

c 

01227 

1 

c 

01226 

0 

C: 

01225 

0 

c; 

01224 

10*6040 

c 

01217 

1 

c 

01216 

0 

Cj 

01215 

0 

C! 

01214 

10 1 6 O 5 O 

c 

01465 

1 

c 

01464 

0 

Cr 

OlOOO 

0 

c: 

00777 

10*6060 

c 

OO 772 

0 

c 

00771 

0 

C: 

QO 77 O 

1 

c: 

00767 

10*6070 

c 

01456 

1 

c 

01113 

0 

C: 

01112 

1 

c; 

Ollll 

10*6100 

C: 

01104 

0 

C; 

01103 

1 

C; 

01102 

0 

c; 

OUOl 

10,6110 

c. 

01005 

0 

c. 

01003 

0 

C: 

01001 

L 

c: 

01075 

10,6120 


5 OO 4 O 

0 


3 OO 0 4 

0 


36140 

1 


70004 

10,6130 


44512 

1 


7 O 6 A 5 

1 


506A5 

0 


10677 

1 0 , 6 1 4 O 

c 

40037 

1 


35503 

i 


50677 

1 


30003 

1 0 , 6 1 S 0 


20677 

0 


40047 

0 


07410 

0 


25777 

1 0 * 6 1 6 0 


06220 

1 


06163 

0 


06220 

1 


50577 

10,6170 


60677 

1 


50034 

0 


36200 

0 


30012 

10,6200 

c 

02040 

1 

Ci 75737 

0 


07377 

0 


40577 

10,6210 


20034 

1 


67452 

0 


30012 

1 


66201 

10,6220 


34516 

1 


25777 

1 


40032 

1 


20033 

10,6230 


06355 

1 


06701 

1 


06501 

0 


06701 

10,6240 


30006 

1 


30006 

1 


76252 

0 


5 0 6 0 0 

10,6250 


10000 

0 


06255 

0 

C; 

O 7 OOO 

0 


06255 

10,6260 


50726 

1 


36277 

0 


7 O 723 

0 


6 A 5 OO 

10,6270 


345 O 3 

0 


7072b 

0 


10000 

0 


06300 

10,6300 


20600 

0 


06302 

0 


06305 

1 


06346 

10,6310 


06350 

1 


06350 

1 


34507 

1 


6 O 723 

10,6320 


10000 

0 


06350 

1 


34513 

1 


70726 

10,6330 


06336 

1 


06350 

1 


06350 

1 


06350 

10,6340 


66343 

0 


lOOOD 

0 


06350 

1 

C: 

77767 

10,6350 


20600 

0 


445 O 3 

i 


7 O 726 

0 


50/26 

10,6360 


44505 

1 


70011 

0 


50011 

1 


06463 

10,6370 


06405 

0 


445 1 3 

0 


7001 1 

0 


50001 


NASA 1021108-021 


DEC At 1966 


page 82ft 


the right of^ each wqRD; denotes unused fixed memory. 


(Interpretive operator words) or »C" (Constants), 


0 C 

06114 

0 

c 

06114 

0 

c: 

01115 

0 

c; 

01114 

1 

0 C 

01107 

0 

c 

0H06 

1 

C; 

01105 

1 

c: 

01104 

0 

1 C 

01123 

0 

c 

06114 

0 

c: 

01211 

1 

c: 

01210 

0 

1 C 

01223 

0 

C 

01222 

1 

c: 

01221 

1 

c; 

01220 

0 

1 C 

01463 

1 

C 

01462 

0 

c: 

01467 

0 

CJ 

01466 

1 

0 C 

00776 

1 

C 

00775 

1 

c; 

UO774 

0 

c; 

00773 

1 

1 c 

OO766 

0 

c 

00765 

0 

c: 

06026 

0 

c: 

01457 

0 

1 C 

OHIO 

0 

c 

01 107 

0 

c; 

01106 

1 

c; 

01105 

1 

0 C: OIIOO 

1 

C; 

t 00702 

1 

c; 

00701 

1 

c; 

00700 

0 

1 c 

52525 

1 


30034 

0 


50031 

0 


37O47 

0 

1 

10000 

0 


06133 

0 


06130 

0 


06133 

0 

0 

06142 

0 


061A1 

0 


06223 

1 


06223 

1 

1 

50032 

0 


20677 

0 


40700 

1 


50600 

1 

1 

46215 

0 


50577 

1 


10000 

0 


06 1 66 

0 

1 

40677 

0 


06171 

0 


50577 

1 


34516 

1 

1 

77465 

0 


30012 

1 


66201 

1 


10000 

0 

0 

64476 

0 


50042 

1 


36200 

0 


30012 

1 

1 

10000 

0 

c 

: 05605 

1 


03062 

0 


07377 

0 

0 

06225 

1 


06701 

1 


0644 7 

0 


06701 

1 

1 

10726 

0 


06240 

1 


06240 

1 


06463 

0 

1 

36252 

1 


70726 

0 


40000 

0 


60600 

1 

0 

06463 

0 


46252 

0 


7O726 

0 


60600 

1 

0 

50723 

1 


355O3 

1 


5O6OO 

1 


20000 

0 

i 

10600 

0 


06266 

0 


06463 

0 

c; 

37A37 

0 

0 

06327 

1 


10727 

1 


06316 

0 


06350 

1 

1 

50723 

1 


062 74 

0 


64516 

1 


745I5 

0 

0 

10000 

0 


06350 

1 


06312 

1 


10727 

1 

1 

34511 

0 


06313 

0 


44511 

1 


70727 

1 

1 

06350 

1 


06334 

0 


34510 

1 


06313 

0 

1 

0627A 

0 


32171 

1 


02052 

1 

c: 

20364 

1 

0 

375O3 

0 


20017 

0 


70726 

0 


10000 

0 

0 

40011 

0 


7A513 

0 


60001 

0 


30011 

1 


YUL SYSTEM FOR AGC4 1 REVIblUN 0 OF PROGRAM SOLRUMbS BY 


octal listinc Of- paragraph * oAit with parity Bit in binary At 


ALL VALID 

WORDS are basic 

inStruci Ions 

except THOSe 

marked "I” 

10 »8A00 

50011 1 

44514 

1 


70726 

0 

50726 

1 0 f 6 A 1 0 

06427 0 

0642? 

0 


45362 

1 

7O6I2 

10t6A20 

06427 0 

46425 

0 


60612 

1 

10000 

10 *6430 

70726 0 

645U 

0 


30726 

1 

74514 

10t6AA0 

02346 1 

c: 00077 

1 


06444 

0 

02124 

10*6450 

40006 0 

74512 

1 


lOOOO 

0 

05463 

10 * 6 4 6 0 

32157 0 

02045 

1 

c: 

64000 

0 

30006 

10*6470 

06534 0 

345O7 

1 


70646 

1 

10000 

10,6500 

06534 0 

10703 

1 


06507 

0 

06506 

10,6510 

50637 0 

34516 

1 


50640 

0 

IO7O3 

10,6520 

2O7O3 1 

40052 

1 


07410 

0 

06631 

10,6530 

06515 0 

20000 

0 


44477 

0 

05523 

10,6540 

7O725 0 

5O725 

1 


62667 

1 

05623 

10,6550 

7O723 0 

50723 

1 


62665 

0 

05523 

10,6560 

70724 1 

50724 

0 


62566 

0 

06523 

10,6570 

45501 1 

5060Q 

1 


3O7O6 

0 

55504 

10 ,6600 

06573 0 

06612 

1 

C; 

00012 

1 

10600 

10,6610 

36602 0 

06574 

1 


64516 

1 

2O7O6 

10,6620 

2O7O6 1 

72652 

0 


6 0 5 00 

1 

50010 

10,6630 

02262 0 

50577 

1 


30001 

0 

50600 

10,6640 

00600 1 

50577 

1 


40637 

1 

05647 

10,6650 

36200 0 

30012 

1 


20540 

1 

77465 

10,8660 

03062 0 

0737 T 

0 


40577 

0 

64476 

10,6670 

20642 0 

67473 

u 


30012 

1 

66201 

10,6700 

00600 I 

35382 

0 


30570 

0 

66705 

10,6710 

02571 0 

30OO7 

0 


30007 

0 

50637 

10,6720 

30004 0 

50034 

0 


74510 

0 

10000 

10,6730 

06731 1 

37003 

0 


7 0540 

1 

50540 

10,6740 

70640 1 

60730 

0 


74503 

1 

10000 

10,6750 

07074 0 

34501 

1 


70730 

1 

5 0 0 0 1 

10,6760 

10000 0 

07010 

1 

C: 

34760 

1 

07017 

10,6770 

C: 35000 1 

07000 

0 


07074 

0 

10724 


NASA 1021 108-021 


DEC At 1988 


PAGE 829 


the right of Each word; denotes unused fixed memory. 
{Interpretive operator wordsj or "C** (Constants), 


1 

02124 

1 


62261 

0 

10000 

0 


06427 

0 

66417 

0 


10000 

0 

06427 

0 

c; 

77757 

0 

06371 

1 

Cf 

00021 

1 

06371 

1 


44514 

1 

lOOOO 

0 


06437 

1 

02124 

1 


20016 

1 

02362 

1 

C: 

OOO77 

1 

02124 

1 


4OOO6 

0 

34515 

1 


70646 

1 

10000 

0 


06463 

1 

30006 

1 


745O7 

0 

10000 

0 


06471 

0 

06534 

0 


32160 

1 

02046 

1 

C! 

64336 

1 

06463 

0 


06463 

0 

34516 

1 


50703 

1 

06525 

0 


20703 

1 

40/04 

0 


50600 

0 

0646 3 

0 


40053 

0 

6O7O5 

0 


50001 

0 

IO725 

0 


06544 

1 

06544 

1 


34302 

0 

IO723 

0 


06554 

0 

06554 

0 


34302 

0 

10724 

1 


06564 

0 

06564 

0 


34302 

0 

IO7O7 

0 


06567 

0 

02262 

0 


5O7O7 

0 

5O7O6 

0 


20706 

1 

10710 

0 


IO7O6 

0 

03062 

0 


50707 

1 

02262 

0 


50600 

1 

50710 

1 


74302 

0 

5O6OO 

1 


32261 

0 

37126 

0 


50040 

0 

^0033 

0 


50033 

1 

10577 

0 


06644 

1 

00600 

1 


06641 

1 

50577 

1 


345I6 

1 

60637 

0 


50642 

0 

30012 

1 


66201 

1 

10000 

0 


03062 

0 

20640 

1 


50042 

1 

36200 

0 


30012 

1 

10000 

0 


03062 

0 

03062 

0 


07377 

0 

10000 

0 

C; 

^7770 

1 

03062 

0 


06711 

0 

74720 

1 


30637 

0 

76770 

0 


50640 

0 

02571 

0 


10034 

1 

06734 

1 


06734 

0 

10732 

0 


06751 

1 

O7O43 

1 


34503 

0 

06746 

1 


07074 

0 

03007 

0 

c: 

00101 

0 

34501 

1 


70640 

1 

40000 

0 


60001 

0 

40732 

0 


60640 

0 

LOOOO 

0 


06773 

1 

07027 

0 


07027 

0 

35501 

0 


O7O75 


0 

1 

L 

I 

0 

0 

0 

0 

0 

1 

0 

1 

1 

1 

1 

1 

1 

0 

I 

1 

1 

0 

1 

0 

0 

0 

1 

0 

1 

0 

1 

1 


Ab^bTsA YUL System fok agc4: revision o or program solrumss by 


OCTAL listing QF PARAGRAPH # 0A2* WITH PARITY BIT IN BINARY AT 


All valid 

WOHd^ are basic instructions 

except those 

marked ”1" 

lUt 7000 

67176 

0 

10000 

0 

06773 

1 

C; 

31000 

10* 7010 

IO7O3 

1 

07013 

I 

07013 

1 


34516 

10,7020 

07023 

1 

07023 

1 

07041 

0 


07034 

C 

0 

0 

03007 

0 Cl 

00102 

1 

45501 

1 


07075 

10,7040 

07076 

1 

50703 

0 

06764 

1 


40730 

10,7050 

07052 

1 

07074 

Q 

40730 

1 


74503 

10, 70^0 

70640 

1 

lOOOD 

0 

34515 

1 


64500 

lU .7070 

30640 

0 

50730 

0 

02743 

0 


07076 

10,7100 

07102 

0 

02262 

0 

10731 

0 


07250 

10,7110 

74516 

0 

10000 

0 

07114 

1 


07260 

10,7120 

30727 

0 

5063 7 

0 

4 OOOO 

0 


6O727 

10,7130 

02262 

0 

34511 

0 

70727 

1 


10000 

10,7140 

07145 

0 

36762 

1 

7O723 

0 


64656 

10,7150 

lOOOO 

0 

07337 

1 

40637 

1 


74515 

10,7l60 

64513 

1 

50726 

i 

34505 

0 


02173 

10,7170 

50723 

1 

4072 7 

1 

5OO34 

0 


34475 

10,7200 

7A507 

0 

10000 

0 

07243 

0 


20637 

10,7210 

02262 

0 

67214 

1 

10000 

0 


07131 

10,7220 

7O727 

1 

60637 

u 

77335 

1 


10000 

10,7230 

70637 

1 

10000 

0 

02262 

0 


40637 

10*7240 

03007 

0 C; 

OO2O4 

1 

02262 

0 


10637 

10,7250 

40731 

0 

60637 

0 

10000 

0 


07263 

10,7260 

30637 

0 

50727 

0 

02262 

0 


34516 

10,7270 

07322 

0 

37315 

I 

70731 

0 


70637 

10,7300 

37335 

0 

?0637 

1 

10000 

0 


O73O5 

10,7310 

50726 

1 

07260 

1 

10727 

1 


0731 7 

10,7320 

07324 

0 

07324 

0 

35501 

0 


07261 

10,7330 

02262 

0 

4451b 

0 

70726 

0 


50726 

10,7340 

50731 

1 

37501 

1 

02173 

0 

c; 

21350 

10,7350 

02731 

0 

10731 

0 

07356 

0 


07356 

10,7360 

37502 

1 

02173 

0 

C; 21372 

1 


45503 

10,7370 

50724 

0 

O7O57 

1 

35501 

0 


50732 


I 


NASA 1021108-021 


DEC A, I9b6 


pagE a30 


thl right of each word; "s?« denote^ unused fixed Memory. 


(Interpretive 

operator 

WORdS) or 

lrc» 

(CONSTANTS) . 



0 


06773 

1 


34501 

1 


60640 

0 


07O75 

1 

1 


4OOOO 

0 


5O7O3 

0 


06764 

1 


10703 

1 

1 


03007 

0 

c; 

00104 

1 


O7O32 

1 


07O34 

1 

1 


10730 

1 


00001 

0 


00001 

0 


07O76 

1 

1 


60640 

0 


10000 

0 


07052 

1 

c: 

37772 

1 

1 


70640 

1 


10000 

0 


07360 

0 


34505 

0 

0 


30724 

0 


77254 

1 


60724 

0 


50724 

0 

1 


30640 

0 


50730 

0 


10727 

1 


O7IO2 

0 

1 


O7II7 

1 


34516 

1 


70637 

1 


60727 

0 

1 


03007 

0 

C; 

00201 

1 


07260 

1 


30637 

0 

0 


10000 

0 


07211 

1 

c; 

37776 

0 


07131 

0 

0 


07217 

1 


40727 

1 


77336 

1 


10000 

0 

0 


O72O6 

1 


4063? 

1 


74516 

0 


70727 

1 

0 


10000 

0 


07165 

1 


44513 

0 


70726 

0 

0 

C: 

30201 

1 


36762 

1 


7O723 

0 


64500 

0 

0 


50637 

0 


30034 

0 


60000 

1 


50034 

0 

1 


37456 

1 


60723 

1 


50723 

1 


02743 

0 

0 

Ci 

77740 

1 


07131 

0 


02262 

0 


37335 

0 

0 


07226 

0 


07233 

1 


34512 

0 


70727 

1 

1 


74515 

0 


70727 

1 


10000 

0 


07141 

1 

1 


07174 

1 


O3OO7 

0 

c; 

00203 

0 


02262 

0 

1 

C: 

37775 

0 


07263 

1 


10726 

0 


07331 

1 

i 


7O73I 

0 


60000 

1 


70637 

1 


10000 

0 

i 


40000 

0 


773I5 

0 


10000 

0 


07312 

0 

0 


07312 

0 


445 1 6 

0 


70726 

0 


64516 

1 

0 


07317 

0 

C; 

00060 

1 


02262 

0 


10723 

0 

0 


45501 

1 


50727 

0 


03007 

0 

Ci 

00202 

1 

1 


07260 

1 

c: 

00014 

1 

C! 

00012 

1 


45503 

0 

1 


36762 

1 


7072 3 

0 


67456 

1 


07206 

1 

0 


35501 

0 


50/31 

1 


02743 

0 


0225b 

1 

0 


50732 

1 


44664 

0 


70724 

1 


64664 

1 

i 


02671 

0 


02743 

0 


02256 

1 


74511 

1 


Aa^57HA YUL SYSTEM FOR AGC<t! REVISION 0 01 PROGRAM SOLRUM 55 BY 


octal listing oF paragraph * 043f PARItV bit in binary At 
all valid words are basic instructions except those marked **I*' 


10»7A00 


10000 

0 


37406 

1 


6 7^^07 

0 


70012 

10*7A10 


50577 

1 


30001 

0 


5O574 

1 


40600 

10,7A20 


34477 

1 


6003A 

0 


00574 

1 


LO577 

10 ,7A30 


O7443 

0 


074A3 

0 


07433 

1 


30034 

10 ,7AA0 


O744I 

1 


34516 

1 


07444 

1 


44516 

lOWAsO 

C ; 

50400 

0 

C; 

51000 

0 

C; 

52000 

0 

c; 

32000 

lOt 7A60 

C; 

00004 

0 

C: 

00010 

0 

C: 

01000 

0 

c: 

00000 

10 »7A70 

c; 

45000 

0 

C: 

46000 

0 

C: 

00220 

1 

c: 

00240 

10i7S00 

c; 

24400 

0 

C: 

06654 

0 

C; 

13560 

0 

CJ 

06022 

10,7510 


07512 

0 


07537 

1 


40677 

0 


20000 

10,7520 


40000 

0 


50677 

1 


U75O4 

1 


64516 

10, 7530 


02173 

0 

C: 

21533 

1 


02256 

1 


O77D4 

10, 75AO 


50034 

0 


35503 

i 


06631 

0 


07672 

10,7550 


06631 

0 


30032 

u 


02173 

0 

C; 

21512 

10,7560 


40677 

0 


74720 

i 


20000 

0 


07562 

10,7570 


50677 

1 


07704 

0 


20641 

0 


10000 

10,7600 


10001 

1 


076A0 

i 


07556 

0 


07650 

10,7610 


06631 

0 


37740 

0 


02173 

0 

C: 

21571 

10,7620 


40677 

0 


74520 

u 


64501 

1 


40000 

10,7630 


07636 

0 


35503 

1 


06631 

0 


35503 

10,76AO 


64516 

1 


50034 

0 


06631 

0 


07672 

10,7650 


64516 

1 


50034 

0 


40677 

0 


7A5OI 

10,7660 


35362 

0 


10000 

0 


07661 

1 


07672 

10,7670 

C; 

21560 

1 


02256 

1 


30003 

1 


50032 

10,7700 


30032 

0 


25777 

1 


4 A 5 1 6 

0 


00001 

10,7710 


50637 

0 


60000 

1 


60764 

1 


50641 

10,7720 


02256 

1 


35501 

0 


50764 

1 


30007 

10,7730 


40000 

0 


5067 r 

L 


37736 

1 


02060 

10,7740 

c: 

OlOOl 

1 


07741 

1 


07742 

1 

CKSM 

76777 

10t7750 


§ 



e 



§ 



& 

1 0 » 7760 


§ 



§ 



& 



& 

10*7770 













NASA 1021108-021 


DEC 1966 


PAGE 831 


|HE right OF each woRD? DENOTE^ UNUSED FIXED MEMORY. 


( interpretive 

operator 

WORDS) OR 


(Const antS) , 


3 

50012 

1 


00001 

0 

c; 

00 767 

1 

CJ 

77407 

0 

6O577 

1 


5OO34 

0 


07423 

0 


20000 

D 

07435 

1 


07435 

1 


07427 

i 


10600 

3 

OO574 

1 


10600 

0 


O7433 

1 


O7433 

3 

60034 

0 


5OO34 

0 


00574 

1 


0741 7 

0 C: 

31000 

0 

C; 

30400 

0 

C! 

40011 

0 

C; 

00002 

1 C; 

02000 

0 

C: 

00377 

1 

c; 

77407 

1 

c: 

44400 

I c; 

00140 

1 

c; 

00120 

1 

c; 

26000 

0 

c; 

25OOO 

1 

07704 

0 


20641 

0 


10000 

0 


07523 

0 

07513 

1 


07721 

1 


34475 

0 


64340 

1 

50034 

0 


06631 

0 


07672 

0 


30032 

0 

455O3 

0 


06631 

0 


07512 

0 


64516 

0 

35362 

0 


10000 

0 


07545 

i 


40034 

1 

02256 

1 


O77O4 

0 


45503 

0 


06631 

1 

07715 

0 


34475 

0 


64340 

1 


40000 

0 

07605 

0 


07577 

0 


07615 

1 


20641 

0 

07560 

0 


20641 

0 


50000 

1 


34476 

1 

02256 

1 


40000 

0 


20641 

0 


50000 

0 

30677 

1 


74501 

0 


10000 

0 


07631 

1 

lOOOO 

0 


07634 

1 


44476 

1 


07610 

0 

30032 

0 


02173 

0 

C; 

21555 

1 


02256 

0 

10000 

0 


07663 

0 


35503 

1 


06631 

0 

40034 

1 


0663 1 

0 


30032 

0 


02173 

0 

34505 

0 


25777 

1 


40034 

i 


65503 

0 

355OI 

0 


50640 

0 


40677 

0 


74720 

1 

00001 

0 


34516 

1 


02173 

0 

c; 

21721 

0 

30007 

0 


77737 

1 


10000 

0 


45501 

0 

05720 

1 

C; 

30171 

0 

C; 

31533 

0 

c; 

00122 

1 

e 



& 



§ 



e 





€ 



§ 



& 


§ 



§ 






§ 


§ 











1 

0 

0 

1 

1 

0 

n 

0 

i 

i 

0 

1 

i 

0 

0 

0 

0 

1 

1 

i 

1 

0 

0 

i 

1 

0 

1 

0 


YUL system FOR AGC<» ; REVISION 0 Of- PROGRAM SOLRUM &5 BY 


qgtal Listing of paragraph at oAAt with parity bit in binary at 

ALL valid words ARe BASIC iNSyRUCTloNS e^LePT THQSe MARKED "I" 


11 

*6000 

C: 

37767 

0 

C; 00320 

0 

C; 06a01 

1 

CJ 0006D 

1 1 

»6010 

C; 

23037 

1 

30115 

1 

O601A 

1 

30001 

1 1 

*6020 


6A516 

1 

31765 

1 

03000 

1 

30001 

11 

»6030 


06011 

1 

06011 

1 

OOOOl 

0 

AOOOO 

11 

1 60 AO 


06011 

1 

06011 

1 

10000 

0 

06011 

1 1 

f 6 0 8 0 


06013 

0 

06013 

0 

0605A 

0 

06013 

1 1 

* 6060 


06013 

0 

lOOOO 

0 

06013 

0 

0606 6 

1 1 

♦ 6 O 7 O 


06013 

0 

06013 

0 

06013 

0 

10000 

n 

*6100 


06102 

1 

06103 

0 

OOOOl 

0 

35777 

1 1 

,6110 


25777 

1 

A1771 

0 

25777 

1 

51771 

1 1 

» 6 1 20 


51772 

1 

11772 

0 

06013 

0 

06013 

11 

, 6 1 3 0 


06013 

0 

361 A7 

0 

5 I 77 I 

1 

36150 

11 

, 6 1 aO 


5177A 

1 

36153 

0 

5 I 775 

0 

3615A 

11 

, 6 1 5 O 


AA5 15 

0 

60000 

1 

10000 

0 

01771 

11 

♦ 6 1 60 


50003 

1 

60003 

1 

20003 

0 

25767 

11 

,6170 


0603A 

0 

10003 

0 

06176 

1 

06013 

1 1 

,6200 


06013 

0 

06203 

0 

06013 

0 

10003 

11 

,6210 


3A51A 

0 

5 OUO 3 

1 

3AA76 

0 

25777 

11 

,6220 


25777 

1 

AA3 A 0 

0 

60003 

1 

6l77l 

11 

,6230 


60003 

1 

51771 

1 

AAA76 

1 

25777 

11 

,62a0 


3AA76 

0 

2577 ? 

1 

66 A2 1 

0 

0b033 

11 

,6250 


50001 

0 

51771 

1 

30003 

1 

51772 

11 

,6260 


51775 

0 

30003 

1 

51773 

0 

30001 

11 

,6270 


5177A 

1 

30001 

0 

25777 

1 

56557 

11 

,6300 


6 I 772 

1 

61773 

0 

6 I 77 A 

1 

6 I 775 

11 

,6310 


51771 

1 

06013 

0 

6l 77 I 

1 

6003A 

11 

,6320 


51771 

1 

060 1 3 

0 

61771 

1 

6 003 A 

11 

,6330 


20016 

1 

60036 

1 

5 I 77 I 

1 

A1771 

11 

, 63 AO 


063A2 

1 

06333 

1 

36001 

0 

1 0000 

1 1 

,63 50 


3A516 

1 

02173 

0 

C; 22A01 

1 

3AA76 

11 

,6360 


06362 

0 

0637a 

1 

25 777 

1 

6550a 

11 

,6370 


AOOOO 

0 

50000 

1 

06013 

0 

06356 


NASA 1021108-021 


dec a. 1966 


PAGE 832 


ThE 

right dF Each 

wqRD 

; « g M 

denotes 

Unused 

FIXED 

memory. 


( Interpretive 

operator 

WORDS! OR 

hC« 

(Const ANT S i 



1 

C: 0177A 

1 

c: 

25252 

0 

c: 

01771 

1 

c 

: 00501 

0 

0 

51764 

0 


03007 

0 

c; 

01102 

0 


31765 

1 

0 

50115 

1 


3 OOO 1 

0 


lOOOO 

0 


06011 

1 

0 

30001 

0 


50115 

1 


30001 

0 


10000 

0 

1 

OOOOl 

0 


20016 

1 


AA515 

0 


10000 

0 

0 

10000 

0 


06061 

0 


06013 

0 


06013 

0 

1 

06013 

0 


06013 

0 


AOOOO 

0 


10000 

0 

0 

06013 

0 


06100 

0 


06013 

0 


06013 

0 

0 

51771 

1 


7U71 

0 


31771 

1 


61771 

1 

1 

Al77l 

0 


51772 

1 


21771 

0 


61772 

\ 

0 

06013 

0 


11772 

0 


06013 

0 


06013 

0 

0 

5 I 772 

1 


36151 

1 


51773 

0 


36152 

1 

1 

51776 

0 


3A501 

1 


OI 77 I 

1 


25777 

1 

1 

06155 

0 


3A510 

1 


30003 

1 


30003 

1 

0 

60003 

1 


AOOO 3 

0 


70003 

0 


AOOOO 

0 

0 

06013 

0 


06013 

0 


10003 

0 


06013 

0 

0 

06013 

0 


06210 

1 


06013 

0 


06013 

0 

i 

A0003 

0 


6 OOO 3 

1 


5 I 77 I 

1 


3AA76 

0 

1 

06023 

0 


AAA76 

1 


25777 

1 


AA 3 AO 

0 

1 

AA515 

0 


6 OOO 3 

1 


6 I 77 I 

1 


06023 

0 

i 

36557 

0 


5 OOOI 

0 


3A502 

1 


25777 

1 

1 

AOOOl 

1 


25777 

1 


56560 

1 


61771 

1 

0 

25777 

1 


56560 

1 


51771 

1 


3 OOO 3 

1 

0 

61771 

1 


51771 

1 


A0003 

0 


61771 

1 

0 

06033 

1 


3A5l6 

1 


5003A 

0 


6AA76 

0 

0 

5003A 

0 


AOOOO 

0 


25777 

1 


66376 

0 

0 

06033 

1 


20017 

0 


35501 

0 


5002A 

1 

0 

60036 

1 


lOOOO 

0 


10000 

0 


06325 

0 

0 

063A3 

0 


20017 

0 


1002A 

0 


06325 

0 

0 

66000 

1 


20016 

1 


10000 

0 


6A515 

1 

0 

30000 

1 


255 OI 

1 


AOOOO 

0 


70000 

0 

i 

20017 

0 


51771 

1 

c: 

37775 

0 


20016 

1 


1 


^8^t>78A YUL SYSTEM FDR aGC^I REVISION 0 OF PROGRAM SOLRUMS5 BY 


OCTAL listing of PARAGRAPH 0 OA5» ^^UH PAklyY Bly IN BINARY Aj 

\ 

all valid Words are basic instructions except those marked "P* 


1 1 ,6400 


06410 

1 


400 2 

0 


66002 

0 


06023 

1 1 ,6410 


11762 

1 


03000 

1 


03000 

1 


06414 

1 1,6420 


06434 

1 

C; 

37776 

0 


06424 

0 


06443 

11,6430 


41775 

1 


65504 

0 


5177A 

1 


06416 

1 i ,6440 


41775 

1 


40000 

0 


0 6 4 1 6 

1 


51777 

11,6460 


30001 

0 


lOOOl 

1 


51776 

0 


0646 6 

11,6460 


06013 

0 


10215 

0 


07377 

0 


34476 

11,6470 


61777 

1 


06023 

0 


36004 

0 


51777 

11,6500 


21777 

0 


40001 

1 


40000 

0 


51776 

11,6510 


41777 

0 


40000 

0 


51760 

1 


21777 

1 1,6520 


2177 7 

0 


40001 

1 


21777 

0 


60000 

1 1 ,6530 


64335 

0 


21777 

0 


50001 

0 


21777 

11,6540 


41776 

1 


40000 

0 


21777 

0 


50001 

11,6550 


45504 

1 


51760 

1 


10215 

0 


07377 

11,6560 

c; 

63777 

0 


06474 

0 


20016 

1 


33220 

1 i ,6570 


11771 

0 


06564 

0 


36005 

1 


50020 

1 1 , 6 6 0 0 


60022 

1 


60021 

1 


60023 

0 


64664 

11 , 66 1 0 


11762 

1 


06414 

0 


03000 

1 


03000 

11,6620 

C: 

lOOOO 

0 

C: 

12000 

1 

c: 

14000 

1 

c; 

16000 

1 1,6630 

c; 

30000 

1 

C: 

42000 

1 

c: 

A4000 

1 

c; 

46000 

11,6640 

C: 

60000 

1 

C: 

62000 

0 

C; 

64000 

0 

c: 

65000 

11,6650 


37023 

1 


5177b 

0 


36615 

0 


51773 

1 1 ,6660 


35501 

0 


51771 

1 


34515 

1 


51775 

1 1,6670 


51777 

1 


37024 

0 


51776 

0 


36 616 

1 1 ,6700 


35501 

0 


51771 

1 


51/73 

0 


61773 

11,6710 


66617 

1 


0672 1 

0 


31 773 

0 


64516 

1 1 ,6720 


06703 

0 


10000 

0 


06730 

0 


06730 

11,6730 


11775 

1 


06733 

0 


06743 

1 


34515 

1 1 ,6740 


61776 

0 


50000 

1 


06 712 

0 


11761 

1 1 ,6750 


31774 

1 


64516 

1 


51 77A 

1 


11777 

1 i ,6760 


36772 

0 


51776 

0 


21774 

0 


40000 

1 1 ,6770 


ll76l 

1 


07025 

1 

C: 

41776 

1 


07102 


NASA 1021108-021 


DEC 1966 


Page 833 


the right oF EACH wqRD; «§*• DENOTE^ UNUStD FiXfcD MeMORY, 


(Interpretive 

operator 

WORDS) OR 

MC" 

(CONSTANTS) , 



0 

31766 

1 


64516 

1 


31766 

1 


02256 

1 

0 

44476 

1 


51775 

0 


50001 

0 


10001 

1 

1 

6I775 

0 


06034 

0 


10215 

0 


07377 

0 

1 

40000 

0 


5I775 

0 


6I774 

1 


06033 

1 

1 

34476 

0 


60000 

1 


64516 

1 


20017 

0 

0 

20016 

1 


61777 

1 


5177 7 

1 


06461 

1 

0 

61776 

0 


06446 

1 


40000 

0 


20016 

1 

1 

20016 

1 


11777 

0 


51777 

1 


20017 

0 

0 

21777 

0 


40000 

0 


40000 

0 


51775 

0 

0 

50000 

1 


64516 

1 


2177 7 

0 


50001 

0 

1 

06034 

0 


41/77 

0 


2177 7 

0 


50000 

1 

0 

40000 

0 


21777 

0 


60001 

0 


06034 

0 

0 

41775 

1 


40000 

0 


21777 

0 


50000 

1 

0 

41777 

0 


66003 

1 


10000 

0 

C; 

14000 

1 

1 

5I77I 

1 


64512 

0 


20000 

0 


40000 

0 

0 

50022 

1 


50021 

1 


50023 

0 


60020 

0 

1 

06034 

0 


31767 

0 


64516 

1 


31767 

0 

1 

06646 

0 

C; 

02000 

0 

C; 

OaOOO 

0 

C! 

06000 

1 

0 c: 

20000 

0 

C: 

22000 

1 

c: 

24000 

1 

c: 

26000 

0 

0 c: 

50000 

1 

c: 

52000 

0 

c: 

54OOO 

0 

CJ 

56000 

1 

1 c; 

70000 

0 

c: 

00000 

1 


44516 

0 


51761 

0 

0 

36766 

0 


51774 

1 


34516 

1 


51777 

1 

0 

21773 

1 


30000 

1 


06774 

0 


06721 

0 

0 

51773 

0 


06660 

1 


34515 

1 


51775 

0 

0 

21774 

0 


bOOOO 

1 


05730 

0 


06774 

0 

1 

51773 

0 


11777 

0 


06664 

0 


06664 

0 

0 

06730 

0 


11775 

1 


51775 

0 


06735 

0 

1 

5I775 

0 


10215 

0 


07377 

0 


41773 

1 

1 

O7O37 

1 


06750 

0 


O7OO5 

0 


06034 

0 

0 

06670 

0 


06756 

0 


44516 

0 


51777 

1 

0 

10000 

0 


06676 

0 

c ; 

06615 

0 


06676 

0 

0 

51772 

1 


61771 

1 


51771 

1 


35501 

0 


^ 8 A 57 aA YUL SySTFm FOR AGC^»! REVISION 0 OF rRJgRAm SqLRUmSS BY NASA 1021108-021 


Dec 1966 


page 834 


octal listing oF paragraph 

^ 046, with 

parity bit in 

BINARY AT 

All valid 

woRps are BASIc 

InStRuci Ions 

except those 

marked '* 1 '' 

U »7000 

61771 

1 

51771 1 

41772 0 

61773 

11*7010 

O7OI4 

0 

06013 0 

07014 0 

06013 

1 1,7020 

40000 

0 

61771 1 

00115 1 

c; 43776 

11*7030 

51762 

0 

20017 0 

345O4 1 

02052 

1 1*7040 

30000 

1 

03203 0 

51772 1 

11777 

1 1 * 7O5O 

21774 

0 

60000 1 

05730 0 

07056 

11,7060 

03310 

0 

36006 1 

50117 0 

36007 

11,7070 

03136 

0 

07074 0 

07076 1 

07061 

11*7100 

36010 

0 

03320 0 

11762 1 

07107 

11,7110 

64S16 

1 

31770 0 

06646 0 

34476 

11*7120 

60003 

1 

40000 0 

64476 0 

06023 

11*7130 

11772 

0 

0711 5 0 

34476 0 

5I772 

1 1 * 7I4O 

61772 

1 

06023 0 

10215 0 

07377 

11*7150 

34476 

0 

51771 1 

41771 0 

40000 

11*7160 

64476 

0 

06023 0 

10215 0 

0 7377 

11*7170 

34476 

0 

51771 1 

41771 0 

40000 

11*7200 

06023 

0 

10215 0 

07377 0 

11771 

11*7210 

C: 37776 

0 

C; 50001 0 

36004 0 

51777 

11,7220 

50001 

0 

51771 1 

30003 1 

51772 

11 * 7230 

51775 

0 

30003 1 

51773 0 

30001 

11,7240 

51774 

1 

30001 0 

25 777 1 

56557 

11 , 7250 

6I772 

1 

61773 U 

6I774 1 

61775 

11 ,7260 

54501 

1 

51773 0 

60001 0 

50020 

11,7270 

41773 

1 

60000 1 

50000 1 

07275 

11,7300 

44476 

1 

50020 0 

40020 1 

40000 

11,7310 

06023 

0 

11774 0 

10000 0 

07302 

11,7320 

06033 

1 

30003 1 

51775 0 

47210 

11*7330 

40000 

0 

60001 0 

06033 1 

6 0003 

11,7340 

57210 

0 

40000 0 

60001 0 

06033 

11,7350 

51774 

1 

25777 1 

51774 1 

60001 

11,7360 

10215 

0 

07377 0 

11777 0 

07365 

11 ,7370 

64516 

1 

31770 0 

11762 1 

07113 


tHe right oF each word; denotes unused fixed Memory. 

( iNjERpRETlVE operator wORpS) OR "C» (CONSTANTS), 


0 


00001 

0 

3000 1 

0 

50115 1 

U771 

0 

0 


51771 

1 

217 74 

0 

30000 1 

03203 

0 

0 

C; 

45776 

0 

345 l6 

1 

51761 0 

35501 

0 

1 

Cl 

22650 

1 

20016 

1 

02124 1 

21774 

0 

0 


07054 

1 

07054 

1 

41773 1 

40000 

0 

0 


21773 

1 

30000 

1 

51773 0 

03302 

0 

0 


03100 

0 

O7IOO 

1 

05654 0 

C; 140OO 

1 

1 


03362 

0 

02124 

1 

03362 0 

06750 

0 

0 


07367 

1 

03000 

1 

07113 0 

31770 

0 

0 


51772 

1 

34476 

0 

25777 1 

41772 

0 

0 


10215 

0 

07377 

0 

11772 0 

51772 

1 

1 


34335 

0 

25777 

1 

41772 0 

60003 

1 

0 


11772 

0 

51772 

1 

11772 0 

O7I34 

0 

0 


25777 

1 

44476 

1 

60003 1 

40000 

0 

0 


11771 

0 

51771 

1 

11771 0 

07152 

0 

0 


25777 

1 

44335 

1 

60003 1 

61771 

1 

0 


51771 

1 

11771 

0 

O7I72 1 

07212 

1 

1 


36557 

0 

50001 

0 

34502 1 

25777 

1 

1 


40001 

1 

25777 

1 

56560 1 

61771 

1 

0 


25777 

1 

56560 

1 

51771 1 

30003 

1 

0 


61771 

1 

51771 

1 

40003 0 

61771 

1 

0 


06033 

1 

34516 

1 

51772 1 

25777 

1 

0 


40020 

1 

61772 

1 

60003 1 

06033 

1 

0 


07300 

0 

31773 

0 

645 1 6 1 

07256 

1 

0 


25777 

1 

544 76 

0 

51774 1 

60001 

0 

1 


37210 

0 

25777 

1 

57210 0 

60001 

0 

1 


51774 

1 

37210 

0 

25777 1 

51774 

1 

1 


6I775 

0 

51775 

0 

47210 1 

25777 

1 

1 


40003 

0 

61775 

0 

51775 0 

47210 

1 

0 


06033 

1 

40003 

0 

61775 0 

0603A 

0 

0 


07367 

1 

51777 

1 

07214 1 

31770 

0 

0 


03000 

1 

03000 

1 

03000 1 

30001 

0 




4o4t)7aA YUL SYSTEM FOR AGC4: REVISION 0 OF PROGRAM SOLRUMSS BY 


octal listing oF paragraph # 0A7t wiTh PARITY BIT IN BINARY AT 


all valid iMqRDS are basic INStRUC] ] ONS except those MARKeO "It* 


1 1*7400 


50115 

1 


45503 

0 


20017 

0 


70011 

1 1 *7410 


20017 

0 


70011 

0 


50011 

1 


20016 

1 1 * 7420 

C; 

03000 

1 


34500 

0 


50723 

1 


5O 7 2 4 

11*7430 

C! 

23433 

I 


37530 

0 


02127 

1 


37530 

11*7440 


33232 

i 


50116 

1 


20000 

0 


34504 

1 1 * 7AS0 


20017 

0 


O2I73 

0 

C; 

23455 

1 


37531 

11 *7 460 


3000 7 

0 


10007 

1 


07525 

1 


O7525 

1 1 *7470 


34500 

0 


20115 

0 


50723 

1 


10115 

1 1*7500 

C; 

23503 

0 


37533 

0 


02127 

1 


37533 

11*7510 


O75 14 

0 


07514 

□ 


07525 

1 


07525 

1 1 *7520 


0 3315 

0 


03362 

0 


02362 

1 

C: 

00000 

11 *7530 

c: 

234 36 

1 

C: 

23460 

1 

C; 

OOlOl 

1 

c; 

2 3 5 0 6 

11*7540 


50116 

1 


20017 

0 


40000 

0 


5>0721 

11 » 7550 


445O4 

0 


7OU 6 

0 


4 0000 

0 


5O7IO 

11 , 7560 


5O7I5 

I 


50716 

1 


5O72O 

1 


5O722 

11 , 7570 

C; 

23573 

1 


37657 

1 


02127 

X 


37657 

11*7600 


07602 

1 


0761 3 

1 


20017 

0 


44373 

11,7610 


34473 

0 


50707 

1 


07566 

0 


20017 

1 1 * 7620 


44503 

I 


5O7IO 

1 


50713 

1 


50715 

11*7630 


20016 

1 


34506 

0 


50115 

1 


345O4 

11*7640 


10115 

0 


07632 

1 


07521 

0 

c: 

04000 

11*7650 

c; 

06757 

1 

C; 

07736 

1 

C: 

07634 

1 

c: 

07163 

1 1 *7660 


03302 

0 


03310 

u 


34516 

1 


51564 

1 1 *7670 


02124 

i 


07654 

1 


306 16 

0 


31460 

11 *7700 


07663 

0 


31563 

0 


02173 

0 

c: 

23706 

11*7710 


64502 

1 


50011 

1 


37724 

1 


5 146? 

1 1 * 7720 


70011 

0 


50011 

1 


02256 

1 

c; 

02X24 

1 1,7730 


03100 

0 


O33I5 

0 


03362 

0 


02124 

1 1 * 7740 





9 



§ 




1 1*7750 


e 



@ 



§ 



& 

11*7760 





@ 






Oi 

,r— ^ 

11*7770 





& 



& 





NASA 1021108-021 


DEC At 1966 


PAGE tj3S 


the right of each rtoRDi “fe'' denotes unused fixed memory. 


(Interpretive 

operator 

; WORDS) 

OR » C *1 

(Constants), 


0 

65503 

1 


50011 

1 


02101 

0 


45503 

i 

00115 

1 


37420 

0 


50115 

1 


O7407 

0 

50725 

1 


345 lo 

1 


20017 

0 


02I73 

0 

02060 

0 


02256 

1 


35503 

1 


50II5 

1 

64500 

0 


20115 

0 


50723 

1 


34507 

1 

02127 

1 


37531 

i 


02060 

0 


02256 

1 

07466 

1 


07525 

i 


10116 

0 


O7441 

0 

O7437 

0 


345IO 

1 


20017 

0 


O2I73 

0 

02060 

0 


02256 

1 


30007 

0 


IOOO7 

i 

35362 

0 


5011 7 

0 


37532 

1 


03 100 

1 

02124 

1 


O3OO7 

0 

Cl 

OIIO4 

0 


02124 

D 

33232 

1 


5OIIS 

1 


20115 

0 


37643 

0 

43221 

1 


70116 

0 


40000 

0 


50717 

1 

50711 

0 


50712 

0 


50713 

1 


50714 

0 

37656 

0 


5O7O7 

1 


345O4 

1 


O2I73 

1 

02060 

0 


02256 

1 


10115 

0 


07535 

0 

5O7IO 

1 


5O7I3 

i 


50715 

1 


50115 

0 

44373 

0 


50711 

0 


50714 

0 


50716 

1 

34475 

0 


5O7O7 

1 


33220 

1 


50011 

1 

10000 

0 


07634 

i 


10215 

0 


02101 

0 C: 

07265 

1 

C; 

06143 

1 

C: 

O74 7 1 

1 

c: 

07573 

1 C: 

07675 

1 

C: 

07777 

1 

c; 

00013 

0 

c: 

23576 

1 

37723 

0 


03100 

0 


03315 

0 


03136 

1 

30617 

1 


31461 

0 


51563 

0 


11564 

1 

03362 

0 


02124 

1 


44502 

0 


70011 

0 

057A2 

0 

c; 

10552 

1 


02256 

1 


44502 

1 c: 

237I7 

1 


O33O2 

0 


03310 

0 


33O43 

1 

07734 

0 


07735 

1 

cksm 

72542 

1 




e 



e 








e 



§ 






& 


g 



§ 



§ 








@ 



€ 



§ 


0 

0 

0 

I 

1 

1 

1 

0 

1 

0 

1 

1 

0 

0 

0 

0 

1 

I 

1 

0 

1 

I 

0 

0 

0 

0 

0 


464J>78A YUL system FOft AGC4: REVISION o Of- PROGRAM SOLRUM55 BY 


octal listing qf Paragraph # 050» with parity bit in binary at 


ALL VALID 

WORDS 

AP£ basic 

instructions 

except those 

MARKeO '*I'i 

12 it.000 


45501 

1 

50677 

1 


Q5654 

0 

c: 

30000 

12 loOlO 


37740 

0 

03100 

0 


03315 

0 


21400 

12,6020 


50617 

1 

07162 

0 

C: 

0066 1 

0 


07406 

12 ,6030 


21400 

0 

51350 

0 


II4OO 

0 


06036 

12,6040 


50035 

1 

51224 

1 


67741 

1 


51307 

12 ,60^0 


37742 

1 

03100 

0 


O33I5 

0 


03136 

12 ,6060 


40000 

0 

74514 

1 


10000 

0 


06065 

12,6070 

C: 

70241 

1 

0565 4 

u 

C; 

30331 

0 


07406 

12,6100 


11213 

1 

O6IO3 

0 


06106 

0 


10215 

12,6110 

C; 

30143 

1 

05654 

0 

C; 

30331 

0 


O74O6 

12,6120 


03362 

0 

05654 

0 

C: 

70461 

0 


05654 

12,6130 


11313 

0 

06126 

1 


06134 

1 


O74O6 

12 ,614-0 


5OO44 

1 

5OO45 

Q 


50046 

0 


51230 

12,6150 


37743 

0 

02173 

0 

C: 

24155 

0 


36202 

1 2 , 6 1 6 0 


41226 

1 

51221 

1 


06613 

0 


20016 

12,6170 


06613 

0 

20016 

1 


05654 

0 

c; 

7O66O 

12,6200 


36202 

1 

02127 

1 

C; 

24160 

0 


37742 

12,6210 


06211 

0 

30616 

0 


5l56l 

1 


51570 

12,6220 


34475 

0 

51231 

0 


1 l56l 

0 


5 156 1 

12,6230 


06233 

0 

36365 

1 


51562 

1 


41561 

12,6240 


06243 

1 

06242 

0 


34473 

0 


51223 

12,6250 


21561 

0 

40047 

0 


06254 

1 


40047 

12 ,6260 


51567 

1 

36366 

1 


5I57I 

0 


20017 

12,6270 


34477 

1 

51563 

0 


355OI 

0 


21563 

12,6300 


40000 

0 

21567 

0 


51235 

1 


36370 

12,6310 


07406 

1 

36371 

1 


02127 

1 


36371 

12,6320 


41566 

1 

40000 

u 


10000 

0 


21561 

12,6330 


U57O 

0 

41565 

1 


06336 

1 


41566 

12, 6340 


4 1 566 

1 

40000 

u 


5O6OO 

1 


41565 

12,6350 


25777 

1 

44477 

u 


4OOO3 

0 


5O6I6 

12, 6360 


377A5 

0 

03100 

u 


03315 

0 


03136 

12,6370 

c; 

01235 

1 

C: 243 16 

0 


34502 

i 


51316 



NASA 1021108-021 


OEC 4» 1966 


PAGE 836 


THE right oF each wqrd; denotes Unused fixed memory. 
(Interpretive operator words) or <ic*t (Constants), 


1 

35501 

0 


51400 

1 


645 1 6 

1 


50620 

0 

0 

31346 

1 


5O6 1 6 

0 


21400 

0 


31350 

0 

1 

30616 

0 


21400 

0 


51346 

1 


30617 

1 

1 

34516 

1 


O6OO5 

1 


51213 

0 


51313 

1 

1 

05654 

0 

C: 

7O5I5 

1 


05654 

0 

C; 

7O552 

1 

0 

O74O6 

1 


06050 

1 


30616 

0 


51223 

0 

1 

07107 

0 


34516 

1 


51305 

0 


05654 

0 

1 

05654 

0 

C; 

71037 

0 


05654 

0 

c; 

7O444 

1 

0 

02101 

0 


06100 

0 


07331 

1 


05654 

0 

1 

355OI 

0 


51305 

0 


05654 

0 

CT 

7O24I 

1 

0 

C: 30331 

0 


O74O6 

1 


05654 

0 

c; 

7I5I5 

0 

1 

20017 

0 


07277 

1 


20016 

1 


35501 

0 

1 

51224 

1 


05654 

0 

c; 

7O66O 

0 


20017 

0 

1 

02127 

1 


36202 

1 


02060 

0 


02256 

1 

1 

05654 

0 

c: 

^0660 

0 


41227 

0 


51221 

1 

0 

20017 

0 


37744 

1 


02173 

0 

c: 

24155 

0 

1 

O31OO 

0 


03315 

0 


03136 

0 


07406 

1 

I 

03362 

0 


34502 

1 


51316 

1 


51214 

1 

1 

06231 

1 


51561 

1 


46365 

0 


51562 

1 

0 

65503 

1 


51566 

0 


10000 

0 


34516 

1 

0 

06540 

0 


41566 

1 


40000 

0 


lOOOO 

0 

0 

51565 

0 


41561 

0 


40000 

0 


61561 

1 

0 

36367 

0 


02173 

0 

C; 

24313 

0 


20016 

1 

1 

51234 

0 


11563 

1 


06271 

0 


41562 

0 

0 

05654 

0 

Cj 

31347 

0 


05654 

0 

C; 

30331 

0 

1 

02060 

0 


02256 

1 


11571 

1 


06262 

1 

0 

40047 

0 


06327 

1 


4004 7 

0 


51566 

0 

1 

51566 

0 


06337 

0 


51565 

0 


20017 

0 

1 

05654 

0 

C: 

21410 

1 


20016 

1 


51564 

1 

0 

03302 

0 


03310 

0 


05654 

0 

C! 

I4OOO 

1 

0 

O74O6 

1 

c; 

00400 

0 

c: 

07777 

1 

c: 

00030 

1 

1 

03362 

0 


355OI 

0 


51317 

0 


34475 

0 


4BAi)78A yul System for agc^: revision o op program solrumss by 


octal listing of paragraph # 051* WITH PARI[Y BIT IN BINARY AT 
All valid wuRdS are basic instructions except those marked "i” 


12 *6AOO 


51231 

0 


3A51 3 

1 

51223 

0 

12,6A10 


0565 A 

0 

c: 

30331 

Q 

07A06 

1 

12,6A20 


0565A 

0 

C; 

301A3 

1 

355OI 

0 

12,6A30 


O7AO6 

1 


3A515 

1 

5122a 

1 

1 2 * c> A aO 


A00A5 

1 


aoooo 

0 

21223 

1 

12* 6 A5O 


20016 

1 


0723s 

1 

3122A 

1 

12 *6A60 


06 A62 

1 


O6A7O 

1 

51223 

□ 

12 t6A70 


35501 

0 


512A2 

1 

512A7 

1 

12 *6500 


5 1307 

1 


35503 

1 

5l26l 

0 

12,6510 

c: 

71365 

1 


355OI 

0 

51232 

0 

12*6520 


51223 

0 


0S65A 

0 

C: 7O5I5 

1 

12*6530 


06536 

1 


0653a 

0 

33232 

1 

12,65A0 


A55OI 

1 


50677 

1 

AOOOO 

0 

12*6550 


O7AO6 

1 


0565 A 

0 

c: 71131 

1 

12,6560 

c: 

30331 

0 


07A06 

1 

AOOA7 

0 

12 ,6570 


27755 

0 


50002 

0 

A0051 

1 

12*6600 


1121A 

0 


062^5 

1 

0660A 

0 

12 * 66 lO 


A5501 

1 


51232 

0 

06513 

0 

12*6620 


20017 

0 


35501 

0 

21221 

0 

12 *6630 


066A5 

0 


0667 6 

0 

3 A 5 1 1 

0 

12 * 6 6 A 0 


06676 

0 


066A2 

i 

11222 

0 

12*6650 


lOOAA 

0 


066 7 6 

0 

06655 

1 

12 * 6 6 6 0 


0727 7 

1 


3A513 

1 

51222 

1 

12,6670 


06676 

0 


11222 

u 

06662 

0 

12*6700 


31230 

1 


21221 

0 

600AA 

1 

12*6710 


20016 

1 


35502 

0 

6122A 

1 

12*6720 

C; 

71207 

1 


11232 

1 

06751 

1 

12*6730 


21221 

0 


5OOAA 

1 

5122A 

1 

12 ,67A0 


02173 

0 

C: 

2A7A5 

1 

20016 

1 

12,6750 

c: 

2A706 

0 


11216 

1 

07066 

0 

12,6760 


51230 

1 


07061 

1 

11230 

0 

12,6770 


51230 

1 


21233 

0 

100A7 

0 


AOOOO 
0565A 
S 00 A A 
51223 


5 1300 
6AA77 
3 A 5 1 1 
5125A 

51266 

3A511 

07226 

06537 

5 1 2 1 6 
0565A 
AOOOO 
AOOOO 


0 6 A 0 6 
30001 
300AA 
51222 

06 633 
06660 
21221 
06 7 00 


21221 

5122A 

07A16 

O 67 O 6 


36750 

35501 
06 760 
07003 


NASA 1021108-021 


DEC A I 1 966 


837 


tHe right of each word* "g" denote^ unused fixed Memory, 


( interpretive 

operator 

1 woRdS) or 

»c 

•' (CONSTANTS), 


0 

5121 A 

1 


065A0 

0 


0565A 

0 

c; 

30205 

0 C: 

30216 

1 


0565A 

0 

c: 

30331 

0 


O 7 AO 6 

1 

500 A 5 

0 


5 OOA 6 

0 


0565A 

0 

c; 

30331 

0 

35503 

1 


51221 

1 


20017 

0 


06613 

0 

AOO A 6 

1 


AOOOO 

0 


21223 

1 


51302 

1 

5122A 

1 


11221 

0 


06A35 

0 


11223 

0 

07355 

0 


11220 

1 


O 7377 

0 


06A3a 

0 

3 I 3 OO 

0 


51305 

0 


35501 

0 


31302 

1 

51273 

0 


5130a 

1 


51306 

0 


0565A 

0 

51231 

0 


355 OI 

0 


5121a 

1 


3 A5 1 6 

0 

0565A 

0 

c: 

252 O 5 

1 


03362 

0 


11231 

0 

3AA75 

0 


06537 

0 


355 OI 

0 


51231 

0 

0565A 

0 

C! 

30000 

1 


0565A 

0 

c; 

30331 

0 c: 

7 OAAA 

1 


0565A 

0 

c; 

301A3 

1 


0565A 

0 

27755 

0 


50006 

1 


AOO 5 O 

0 


AOOOO 

0 

27755 

0 


5 OOOA 

0 


0565A 

0 

c; 

70732 

0 

0565A 

0 

c: 

71576 

0 


377A6 

0 


51215 

0 

31225 

0 


2 00 1 £ 1 ^ 

1 


10215 

0 


O 2 IOI 

1 

51230 

1 


11230 

0 


06632 

0 


06676 

1 

21221 

0 


IOOAA 

0 


06660 

1 


066A2 

1 

06676 

0 


3A511 

0 


51222 

I 


21221 

1 

06655 

1 


11222 

0 


066 A 6 

0 


06676 

0 

iooaa 

0 


06671 

1 


06676 

0 


06671 

0 

51230 

1 


01225 

0 


06700 

0 


06615 

0 

5 OOAA 

1 


00001 

0 


20017 

0 


06613 

1 

07235 

1 


11220 

1 


0673A 

1 


0565A 

0 

06751 

1 


3A5l6 

1 


51220 

0 


35501 

0 

51220 

0 


2 OOI 7 

0 


A1215 

L 


AOOOO 

0 

02127 

1 


36750 

0 


02060 

0 


02256 

0 

51 a2A 

1 


5 1A32 

0 


5 IAAO 

0 


3A51 1 

0 

35501 

0 


21233 

0 


500A7 

1 


3A5U 

0 

06777 

0 


06760 

0 


O 7 OO 3 

0 


11230 


0 

1 

0 

0 

1 

1 

1 

i 

0 

1 

1 

0 

0 

0 

0 

0 

0 

0 

0 

i 

0 

0 

1 

0 

0 

0 

0 

0 

i 

0 

0 

0 


YUL SYSTl^M FOR AGC4; REVlblON o OF PR3GRAM bOLRUM^S 0Y 


oCTaL Listing qF paraCjRaph ¥ 052* with pakitv bit in binary at 


all valid wqrds are basic Instructions except those markeo ”1w 


12 W 000 


06770 

1 

07061 

1 

0676 7 

1 

12*7010 


51243 

0 

34473 

0 

5 I 23 O 

1 

12*7020 


07024 

0 

06 760 

0 

O6760 

0 

12*7030 


4774 7 

0 

O 7 O 37 

1 

41232 

1 

12*7040 


5004 7 

1 

07061 

1 

34511 

0 

12*7050 


07052 

1 

O 7 O 55 

0 

11230 

0 

12,7060 


O 7 O 66 

0 

30001 

0 

51225 

0 

12*7070 


51215 

0 

02676 

1 

20016 

1 

12 , noo 

C; 

71241 

0 

37757 

0 

51230 

1 

12*7110 


51225 

0 

O 7 I l3 

0 

51224 

1 

12,7120 


4 I 433 

0 

40000 

0 

5 O 6 I 7 

1 

12*7130 

C; 

14000 

1 

37740 

0 

03100 

0 

12,7140 


O 74 O 6 

1 

07143 

0 

07113 

0 

12,7150 


07112 

1 

01225 

0 

C; 01432 

0 

12,7l60 


3157A 

0 

05723 

1 

3 OOOI 

0 

12,7170 


05654 

0 

C; 14000 

1 

03136 

0 

12*7200 


21310 

0 

00002 

0 

372 O 4 

0 

12,7210 


40000 

0 

50623 

0 

05654 

0 

12*7220 


O 74 O 6 

1 

07224 

1 

07226 

0 

12,7230 


50621 

1 

41232 

1 

A 0 0 00 

0 

12,7240 


51242 

1 

4 OI I 5 

0 

aOOOO 

0 

12,7250 


51244 

1 

4011? 

1 

aoooo 

0 

12,7260 


345 1 1 

0 

5U31 

0 

34516 

1 

12,7270 


07272 

1 

O 74 O 6 

1 

20017 

0 

12,7300 


51310 

1 

4 OO 35 

0 

aOOOO 

0 

12*7310 


02712 

1 

20016 

1 

50117 

0 

12,7320 


40036 

0 

40000 

0 

50116 

1 

12,7330 


OI 3 IO 

1 

30001 

0 

51225 

0 

12,7340 


10034 

1 

07334 

1 

01225 

0 

12*7350 


20034 

1 

5 IIU 

1 

10034 

1 

12*7360 


51220 

0 

11220 

1 

07366 

0 

12*7370 


02173 

0 

C; 254 O 3 

1 

2 OOI 6 

1 


02676 

07061 

07032 

lOOOO 

51230 

O 7 OA 3 

D565A 

AO 572 

3A5l6 

21224 

41224 

03315 

41224 

O 57 O 6 

51310 

07176 

03320 
C; 14000 

O 72 O 7 

50622 

21224 

21224 

61223 

34501 

50115 

lOOOO 

30117 

34477 

30001 

07346 

01225 

11220 


NASA 1021108-021 DEC 4* 1966 


THE RIGHT oF" EACH woR^t »§» DENOTES UnUSED FiXED 

(Interpretive operator woRuS) or »c» (Constants) 


1 


20016 

1 

405/2 

0 


51242 

1 

1 


1 1230 

0 

07012 

0 


21233 

0 

1 


41232 

1 

lOOOO 

0 


07101 

0 

0 


07101 

0 

30000 

1 


37747 

1 

1 


21233 

0 

10047 

0 


O7O52 

1 

1 


07041 

0 

34510 

1 


21233 

0 

0 

C: 

7I5I5 

0 

01225 

0 


21233 

0 

0 


51244 

1 

40573 

1 


51245 

0 

1 


51216 

0 

05654 

0 

c: 

71614 

1 

0 


41432 

1 

AOOOO 

0 


50616 

0 

0 


4OOOO 

0 

67152 

0 


50620 

0 

0 


377A5 

0 

03100 

0 


03315 

0 

0 


63232 

1 

10000 

0 


35503 

1 

0 


5I57A 

0 

07162 

0 

C; 

0066 1 

0 

1 


21310 

0 

30000 

1 


03100 

0 

0 


07200 

1 

07164 

0 


21310 

0 

0 

Cl 

25164 

0 

O57O6 

0 


51573 

1 

1 


37751 

0 

03100 

0 


03315 

0 

0 


31573 

1 

05723 

1 


41231 

1 

1 


00001 

0 

41230 

0 


4OOOO 

0 

0 


51243 

0 

4O 1 1 6 

0 


4OOOO 

0 

0 


51245 

0 

00001 

0 


05654 

0 

0 


51223 

0 

41223 

1 


67752 

0 

1 


02046 

1 

C; 24523 

0 


02124 

1 

1 


40036 

0 

40000 

0 


50116 

1 

0 


07323 

1 

40035 

0 


4OOOO 

0 

0 


25777 

1 

445O4 

0 


30003 

1 

1 


50034 

0 

355OI 

0 


20034 

1 

0 


51225 

0 

344 /7 

1 


50034 

0 

1 


01225 

0 

30001 

0 


51225 

0 

0 


07366 

0 

07360 

0 


20017 

0 

1 


01225 

0 

01225 

0 


30000 

1 


PAGE 838 


memory. 


40573 1 
10047 0 

30000 1 
21233 0 

07 O 55 0 

5OO47 I 

30047 1 

05654 0 

30001 0 

21224 0 
05654 0 
03136 0 

61224 1 
O74O6 1 

07202 0 
00001 0 

41223 1 
03136 0 

40000 0 
21224 0 

2122a 0 

: 25205 1 

lOOOO 0 

30001 0 

20017 0 

5OII5 1 
50 U 7 0 
51520 1 

35501 0 

40001 1 

3 4 5 0 4 1 
51220 0 


A8^578A YUL SYSTEM FOR AGc^: REVISION 0 OF P^?oGRAM SOLRUMS5 BY 


OCTAL, listing of PARAGRAPH ^ 053* PARITY BIT IN BINARY AT 


all valid words are basic instructions except those marked **I" 


12 ,7A00 


37402 

0 


02127 

1 

C: 

25361 

1 

37402 

12 f 7A10 

C: 

00000 

1 


455OI 

1 


506 77 

1 

05654 

12»7A20 


51101 

0 


51102 

0 


5IIO3 

1 

5UOA 

12 »7A30 


02173 

0 

C; 

25435 

1 


20016 

1 

3744O 

12,7AaO 

c; 

25441 

1 


2001 7 

0 


06613 

0 

20016 

12 t7A50 


07455 

1 


51233 

1 


34477 

1 

61224 

12 t7A60 


33232 

1 


O2I73 

G 

C; 

25467 

0 

20016 

12*7470 


02060 

0 


02256 

1 

C: 

O75OI 

1 

37472 

12*7500 


06660 

1 


20016 

1 


41242 

0 

61230 

12,7510 


O745I 

0 


05654 

0 

C; 

71207 

1 

355OI 

12,7520 


20034 

1 


51424 

1 


10034 

1 

O75I6 

12,7530 


07561 

1 


07601 

1 


07616 

1 

07632 

12,7540 


07732 

0 


07735 

1 


34522 

0 

5I424 

12,7550 


07556 

0 


3OOOD 

1 


355OI 

0 

51221 

12,7560 


06553 

1 


34522 

0 


4OOOO 

0 

51424 

12,7570 


07576 

1 


30003 

1 


35501 

0 

51233 

12,7600 


06553 

1 


34522 

0 


5 1 44O 

0 

4OOOO 

12,7610 


07576 

1 


30000 

1 


07556 

0 

35501 

12,7620 


51434 

0 


40003 

0 


51440 

0 

11232 

12*7630 


51221 

1 


06553 

i 


34522 

0 

5I432 

12,7640 


07644 

0 


07630 

0 


07644 

0 

07576 

12,7650 


51426 

0 


51444 

1 


4OOOO 

0 

5U32 

12,7660 


07576 

1 


37754 

G 


5 1440 

0 

5I442 

12,7670 


5I43O 

1 


35501 

G 


51221 

1 

11231 

12,7700 


5I432 

0 


5I434 

0 


5I424 

1 

43000 

12*7710 


51221 

1 


35501 

0 


51232 

0 

06553 

12,7720 


40000 

0 


51442 

1 


34522 

Q 

5l436 

12,7730 


51232 

0 


06553 

1 


445I6 

0 

51232 

12,7740 

C; 

00530 

1 

C: 

00110 

1 

C; 

02130 

1 

c: 13560 

12*7750 

c: 

00264 

1 

C: 

00666 

1 

C; 

U0013 

0 

C; 00021 

12*7760 


07760 

1 


07761 

0 

CKSM 

61061 

1 

& 

12*7770 


§ 



e 





S 

tv 


NASA 1021108-021 


DEC A, 1966 


page 839 


THe right of EACH wqRD; t'e*' DENOTEii UNUSeD FIXeD MeMORY, 

(Interpretive operator words) or "C" (Constants), 


0 


02060 

0 

02256 

1 


03362 

0 

02362 

1 

0 

C; 

30453 

0 

02124 

1 


35501 

0 

51242 

1 

0 


355O3 

1 

51233 

1 


20017 

0 

37746 

0 

0 


02127 

1 

37440 

0 


02060 

0 

02256 

1 

1 


07235 

1 

355O2 

0 


51224 

1 

07235 

1 

1 


51224 

1 

37756 

1 


51220 

0 

20017 

0 

1 


37466 

1 

02127 

1 

C ! 

25473 

0 

37466 

1 

1 


51225 

0 

2OOI7 

0 


355OI 

0 

51230 

1 

1 


51100 

1 

05654 

0 

c; 

71532 

0 

11233 

0 

0 


51224 

1 

37753 

1 


5OO34 

0 

35501 

0 

1 


21223 

1 

07526 

1 


O74O6 

1 

07542 

0 

1 


07647 

0 

07661 

1 


07677 

0 

07714 

1 

1 


5I434 

0 

51444 

1 


11232 

1 

07551 

1 

1 


51233 

1 

06553 

1 


355O3 

1 

51221 

1 

1 


514 36 

1 

51442 

1 


11232 

1 

O757I 

0 

1 


51221 

1 

06553 

1 


34516 

1 

51221 

1 

0 


51426 

0 

51436 

1 


11232 

1 

07613 

1 

0 


51233 

1 

06553 

1 


34522 

0 

51430 

1 

1 


07613 

1 

07630 

0 


30000 

1 

07556 

n 

0 


4OOOO 

0 

51430 

1 


5 1442 

1 

11232 

1 

1 


345 1 6 

1 

51233 

1 


06553 

1 

34522 

0 

0 


11232 

1 

07644 

0 


07556 

0 

07644 

0 

1 


51432 

0 

40000 

0 


5 1434 

0 

34522 

0 

1 


06523 

0 

51232 

0 


06553 

1 

37754 

0 

0 


5 1 426 

0 

34522 

0 


5I444 

1 

355O3 

i 

1 


37754 

0 

51424 

1 


51426 

0 

5 1 ^40 

0 

1 


3451 6 

1 

51221 

1 


11231 

1 

06523 

0 

0 


07632 

1 

445l6 

0 


51232 

0 

07647 

0 

0 

C: 

05670 

0 

C; 00730 

0 

C{ 

21450 

0 

C; 00100 

0 

1 

C: 

13241 

1 

c; 01100 

1 

c: 

02734 

0 

c: 02650 

0 



















$ 


e 



4{iAt.78A YUL SYSTEM FOR AGC^v; REVISION o OF PROGRAM SOLRUM 55 BY 


octal Listing qF paragraph ^ osAt v^ith parity bit in binary at 
all Valid words are; basic instructions except those marked “1« 


13»6000 

C 

00000 

1 

C: 

ooooo 

1 

c 

ooooo 

1 

C; 

ooooo 

13i60lO 

C 

00000 

1 

c 

00000 

I 

c 

12000 

1 

C! 

66621 

13^6020 

C 

00000 

1 

c 

ooooo 

1 

c 

12000 

1 

C: 

664 O 4 

13,6030 

c 

77777 

0 

c 

77777 

0 

c 

01563 

0 

c; 

64066 

1 3 » 6040 

c: 

00000 

1 

c 

ooooo 

L 

C: 

77 777 

0 

c 

647 71 

13»6050 

Ci 

02032 

1 

c 

65124 

0 

C: 

ooooo 

1 

c 

OOOOO 

13^6060 

C! 

00113 

1 

c 

31550 

0 

c: 

ooooo 

1 

c 

OOOOO 

13*6070 

c: 00000 

1 

c 

OOOOO 

1 

c: 

77777 

0 

c 

65070 

13^6100 

c 

00764 

1 

c 

67260 

1 

C! 

ooooo 

1 

c 

OOOOO 

13*6110 

c 

01750 

1 

c 

67342 

0 

C; 

20000 

0 

c 

67330 

13*6120 

c 

02734 

0 

c 

67355 

0 

C; 

OOOOO 

1 

c 

OOOOO 

13*6130 

c 

00000 

1 

c 

ooooo 

1 

C: 

20000 

0 

c 

42142 

13*6140 

c 

00000 

1 

c 

OOOOO 

1 

c 

20000 

0 

c 

42266 

13*6150 

c 

00062 

0 

c 

42262 

1 

c 

21000 

1 

c 

42266 

13 * 6 1 60 

c 

00310 

0 

c 

67166 

1 

C 

OOOOO 

1 

c 

OOOOO 

13*6170 

c 

01046 

1 

c 

67177 

1 

c 

ooooo 

1 

c 

ooooo 

13*6200 

c 

00000 

1 

c 

OOOOO 

1 

C! 

77777 

0 

c 

64250 

13*6210 

c 

77777 

0 

c 

7777 7 

0 

C; 

01461 

0 

c 

64710 

13*6220 

c 

77776 

1 

c 

45317 

0 

C; 

OOOOO 

1 

c 

ooooo 

13*6230 

c 

77777 

0 

c 

01556 

0 

C: 

ooooo 

1 

c 

ooooo 

13*62A0 

c 

26354 

1 

c 

50335 

1 

C 

06000 

1 

c 

50225 

13*6250 

c 

01130 

1 

c 

6451 1 

0 

C 

77777 

0 

c 

65045 

13 * 6 2 60 

c 

00252 

1 

c 

643 74 

0 

C 

25000 

0 

c 

64363 

13,6270 

c 

01130 

1 

c 

64511 

0 

C 

77777 

0 

c 

65062 

13,6300 

c 

010A6 

1 

c 

64527 

0 

c 

25000 

0 

c 

64440 

13,6310 

c 

00000 

1 

c 

OOOOO 

1 

c 

77777 

0 

c 

64527 

13,6320 

c 

00062 

0 

c 

64562 

1 

c 

OOOOO 

1 

c 

ooooo 

13,6330 

c 

00000 

1 

c 

OOOOO 

1 

c 

77777 

0 

CJ 64654 

13*6340 

c 

00000 

1 

c 

I OOOOO 

1 

c 

; 77777 

0 

C 

\ 64511 

13*6350 

c 

00000 

1 

c 

OOOOO 

1 

c 

: 12000 

1 

C 

: 57101 

13 * 6 3 6 0 

c 

ooooo 

1 

c 

OOOOO 

1 

c 

: 77777 

0 

C 

: 64774 

13*6370 

c 

21450 

0 

c 

50463 

0 

c 

; OOOOO 

1 

c 

• OOOOO 


NASA 1021108-021 


DEC 4, 1966 


PAGE 840 


THE RIGHT oF EaCH wqHD; "S" DENOTES UnUSEO FIXED MeMqRY. 


(Interpretive operator woRds) or *'0" (Constants), 


1 

C; 

ooooo 

1 

c: 

ooooo 

1 

c: 

ooooo 

1 

C5 

ooooo 

1 

1 

C: 

ooooo 

1 

C: 

ooooo 

1 

C; 

12000 

1 

C: 

66412 

0 

I 

c: 

ooooo 

1 

c; 

ooooo 

1 

c; 

ooooo 

1 

C! 

OOOOO 

1 

0 

C; 

77777 

0 

C: 

77777 

0 

c? 

01572 

0 

C! 

64250 

1 

1 

c 

01274 

1 

c 

65110 

1 

c 

ooooo 

1 

c; 

OOOOO 

1 

1 

c 

02063 

0 

C 

65135 

0 

c 

ooooo 

1 

C: 

ooooo 

1 

1 

c 

00310 

0 

C 

65121 

0 

c 

ooooo 

1 

c: 

OOOOO 

1 

0 

c 

OOOOO 

1 

C 

ooooo 

1 

c 

27000 

1 

c; 

6706 O 

0 

1 

c 

01750 

1 

C 

673^2 

0 

c 

20000 

0 

Ci 

67274 

1 

0 

c 

01750 

1 

C 

67342 

0 

c 

ooooo 

1 

c; 

OOOOO 

1 

1 

c 

OOOOO 

1 

c 

ooooo 

1 

c 

15000 

0 

c; 

63515 

0 

0 

c 

ooooo 

1 

c 

ooooo 

1 

c 

20000 

0 

c; 

42151 

1 

0 

c 

ooooo 

1 

C 

ooooo 

1 

c 

77777 

0 

c 

42216 

1 

0 

c 

00062 

0 

C 

42262 

1 

c 

ooooo 

1 

c 

OOOOO 

1 

1 

c 

00536 

1 

C 

67177 

1 

c 

ooooo 

1 

c 

OOOOO 

1 

1 

c 

OOOOO 

1 

C 

ooooo 

1 

c 

05000 

1 

c; 

64074 

0 

1 

C; 

OOOOO 

1 

c 

ooooo 

1 

c 

34000 

0 

C! 

66202 

1 

0 

C; 02032 

1 

c 

50114 

0 

c 

77777 

0 

Cl 

65022 

1 

1 

C; 34430 

1 

C 

50154 

1 

c 

OOOOO 

1 

c: 

OOOOO 

1 

1 

c; 

OOOOO 

1 

c 

OOOOO 

1 

c 

77777 

0 

c; 50201 

1 

1 

c 

26354 

1 

c 

50335 

1 

c 

06000 

1 

c 

50322 

1 

0 

c 

00310 

0 

c 

64025 

1 

c 

OOOOO 

1 

c 

OOOOO 

1 

0 

c 

23336 

0 

c 

64527 

0 

c 

77777 

0 

c 

64761 

0 

0 

c 

00372 

1 

c 

64527 

0 

c 

25000 

0 

c 

64474 

1 

0 

c 

: 25060 

0 

c 

645 1 1 

0 

c 

; OOOOO 

1 

c 

OOOOO 

1 

0 

c 

: 00031 

0 

c 

64545 

1 

c 

; OOOOO 

1 

c 

OOOOO 

1 

1 

c 

: 0175 O 

1 

c 

64663 

0 

c 

; 25000 

0 

c 

64423 

0 

1 

c 

: 00536 

1 

c 

64710 

0 

c 

! 77777 

0 

c 

; 64633 

0 

0 

c 

02176 

0 

c 

; 64527 

0 

c 

\ ooooo 

1 

c 

: OOOOO 

1 

0 

c 

27340 

0 

c 

; 50357 

0 

c 

; ooooo 

1 

c 

• OOOOO 

1 

1 

c 

26354 

1 

c 

; 50335 

1 

c 

: 06000 

1 

c 

; 50263 

0 

I 

c 

OOOOO 

1 

c 

I OOOOO 

1 

c 

! 7777? 

0 

c 

! 64062 

1 









<tb457flA yul System for agc4; revision o of- program solrumss by 


octal LISylNG oF PARAGRAPH 0 oS5t wlTH PARITY Bly IN BINARY Ay 

All valid words are basic iNSyRuClIONS except those marked "1” 


lJt6400 

C 

00000 

1 

c 

00000 

1 

C; 77777 

0 

c 

64054 

13,6410 

C 

00310 

0 

c 

65226 

1 

C; 00000 

1 

c 

DOOOO 

13,6420 

C 

00310 

0 

c 

65226 

1 

c: 17000 

1 

c 

65276 

1 3 ,6430 

c 

00310 

0 

c 

65226 

1 

C; 17000 

1 

c 

66014 

1 3 ,6440 

c 

00000 

1 

c 

00000 

1 

C: 77777 

0 

c 

66676 

13,6450 

c 

00310 

0 

c 

66665 

1 

C; 13000 

0 

c 

61620 

1 3 ,6460 

c 

00310 

0 

c 

66666 

1 

C: 00000 

1 

c 

00000 

13,6470 

c 

00000 

1 

c 

00000 

1 

C; 77777 

0 

c 

56011 

13,6500 

c 

00310 

0 

c 

56001 

0 

C; 17000 

1 

c 

56052 

13,6510 

c 

00310 

0 

c 

56001 

0 

C; 17000 

1 

c 

56057 

13,6520 

c 

00310 

0 

c 

56001 

0 

C: 17000 

1 

c 

6 1 44 1 

13,6530 

c 

00000 

1 

c 

26531 

1 

c; 00000 

1 

c 

26533 

13, 6540 

c 

00310 

0 

c 

65226 

1 

C: 17000 

1 

c: 65551 

13,6550 

c 

00310 

0 

c 

65226 

1 

C: 17000 

1 

C, 

61620 

13,6560 


00200 

0 


00404 

1 

00550 

L 


30115 

13,6570 


501 15 

1 


366 0? 

0 

50123 

1 


33224 

13 ,6600 


06636 

1 


06676 

0 

06613 

0 


20115 

13,6610 


06612 

1 


0666 4 

0 

445 I 6 

0 


64516 

13,6620 


05742 

0 

c 

26724 

1 

05742 

0 

C: 10552 

13,6630 


40000 

0 


50116 

1 

20117 

1 


40002 

1 3 ,6640 


50117 

0 


20115 

0 

36001 

0 


50122 

13,6650 


lOOOO 

0 


40000 

0 

66663 

1 


64516 

13 ,6660 


06661 

0 


64516 

1 

00121 

0 

c 

; 37776 

13,6670 


50122 

0 


20115 

0 

26002 

1 


40000 

13,6700 


50122 

0 


36707 

1 

50123 

1 


20115 

13,6710 


06720 

1 


645 1 6 

1 

00121 

0 


64516 

13,6720 


20000 

0 


40001 

1 

5 OII 7 

0 


06644 

13,6730 


6 OII 7 

0 


51461 

0 

35501 

0 


61462 

13,6740 


05761 

1 


06743 

1 

U6746 

1 


11461 

13,6750 


34516 

1 


51461 

0 

05761 

1 


03430 

13,6760 


06762 

1 


345 I 5 

1 

5 OII 5 

1 


02 346 

13,6770 


36754 

1 


70646 

1 

lOOOO 

0 


07203 


NASA 1021108-021 


DEC 4 » 1966 


PAgE B41 


yHE RiGHy qF EACH woRD? DENOyES UNUSeD FIXeD MeMORY. 

( interpretive operator wOR[)S) or "C" (CONSTANTS). 


1 

c; 

00000 

1 

c: 

00000 

1 

c: 

77777 

0 

c: 

64710 

1 

c: 

00000 

1 

c: 

00000 

1 

c; 

77777 

0 

c; 

65157 

1 

c; 

00310 

0 

C: 

65226 

1 

c: 

17000 

1 

c: 

61620 

1 

c; 

00310 

0 

c: 

65226 

1 

C! 

35000 

1 

C! 

50477 

0 

C: 

00310 

0 

c: 

66666 

1 

c: 

14000 

1 

C! 

66713 

1 

C; 

00000 

1 

C: 

00000 

1 

c; 

12000 

1 

C: 

66734 

1 

C: 

00310 

0 

C: 

56001 

0 

c; 

00000 

1 

c: 

00000 

1 

C; 

00310 

0 

C: 

56001 

0 

C! 

I7OOO 

1 

c; 

56036 

0 

C: 

00310 

0 

c: 

56001 

0 

c; 

16000 

0 

c; 

61620 

0 

C; 

00310 

0 

C; 

56001 

0 

c; 

I7OOO 

1 

C: 

56l74 

1 

c; 

00000 

1 

c; 

00000 

1 

c: 

34OOO 

0 

c: 

13150 

0 

C: 

00000 

1 

C: 

26535 

0 

c; 

00000 

1 

c; 

26537 

0 

C: 

00310 

0 

c: 

65226 

1 

c: 

17000 

1 

c; 

55744 

1 

C: 

00000 

1 

C: 

00000 

1 


00000 

1 


00024 

1 


60000 

1 


60000 

1 


20120 

0 


66555 

0 


50121 

0 


20115 

0 


36000 

1 


lOOOO 

0 


36001 

0 


10000 

0 


06625 

0 


06676 

1 


50116 

1 


20115 

0 


46001 

1 


5OU7 

1 


06676 

0 


5011/ 

0 


20000 

0 


40001 

1 


40000 

0 


06617 

1 


64516 

1 


40000 

0 


20120 

0 


40663 

0 


25777 

1 


60036 

1 


60117 

0 


10000 

0 


35501 

0 


06661 

0 


36707 

1 


50123 

1 


20115 

0 


36003 

0 


50117 

0 


06644 

1 


20U5 

0 


36003 

0 


36002 

0 


10000 

0 


06713 

1 


05702 

1 


50121 

0 


33226 

1 


3012L 

0 


00121 

1 


02677 

0 


35501 

0 


61463 

1 


60573 

0 


6O572 

1 


601 16 

1 


31460 

1 


11460 

1 


05761 

1 


06746 

1 


35501 

0 


51460 

0 

C; 

20000 

0 


47I74 

0 


06762 

I 


345I5 

1 

C; 

00024 

1 


O7O62 

1 


40612 

0 


51116 

1 


32567 

1 


50672 

1 


30115 

1 


51117 


0 

1 

1 

0 

1 

1 

I 

1 

1 

0 

1 

1 

0 

1 

1 

0 

0 

0 

1 

0 

1 

0 

1 

I 

1 

0 

0 

0 

1 

I 

0 

1 


43^57eA YUL SYSTEM FOR AGC<^: REVISION 0 OF PROGRAM 50LRUMS5 BY 


octal listing of paragraph # o56» with parity Bit in binary at 
ALL valid Words are basic instructions e’<gept those marked "I" 


13 » 7000 


02362 

1 

C; 

00027 

1 


47132 

1 


51122 

1 3 f ^010 


41122 

0 


501 17 

0 


37201 

0 


03100 

13 * ^020 


445I6 

0 


61122 

1 


5II22 

1 


02346 

13^7030 


10000 

0 


400QO 

0 


61117 

1 


07007 

13,70a0 


03315 

0 


03136 

0 


07167 

0 


O7O66 

13*7050 


07034 

1 


41117 

0 


61122 

1 


iOOOO 

13*7060 


67132 

0 


O7OI 1 

0 


02346 

1 

c: 

00014 

13*7070 


07143 

0 


20017 

0 


3IO74 

0 


61100 

13*7100 


35501 

0 


5OII5 

1 


05654 

0 

c; 

07154 

13*7110 


30116 

1 


51073 

i 


30117 

0 


51074 

13* 7120 


44511 

1 


70645 

1 


60001 

0 


50645 

13*7130 


41116 

1 


02364 

1 

c: 

OllOO 

i 


32566 

13* 71A0 


02124 

1 


05720 

i 

C; 

12511 

1 


IOOOO 

13* 7150 


51677 

0 


07114 

1 


03416 

1 

Cl 

20000 

13*7160 


41 llA 

0 


4OOOO 

u 


51671 

0 


41115 

13* 7 17O 

C: 

00027 

1 


O7I75 

0 


4III6 

i 


02364 

13*7200 


0212A 

1 

C; 

02101 

0 

C; 

01122 

i 


O572O 

13*7210 


07206 

1 


10006 

0 


07211 

1 


50042 

13*7220 


35501 

0 


10000 

0 


07221 

1 


34516 

13*7230 


34516 

1 


02173 

0 

C: 

27332 

0 


07310 

13* 72aO 


02173 

0 

C; 

27333 

1 


07310 

1 

c: 

00065 

13*7250 


02173 

0 

Cl 

03225 

1 


07310 

1 

C; 

00023 

13,7260 


34516 

1 


O2I73 

0 

C: 

27340 

0 


345I6 

13*7270 

c; 

27343 

0 


07310 

1 

C: 

00023 

0 


0731 1 

13*7300 


20017 

0 


40115 

0 


65362 

0 


02173 

13*7310 


20016 

1 


30001 

0 


50115 

1 


20000 

13*7320 


10042 

0 


07320 

1 


3OI 16 

1 


50042 

13*7330 


00001 

0 

C: 

26000 

0 


02256 

1 


02256 

13,73aO 


37346 

1 


07335 

0 


02256 

i 


02256 

13*7350 


07350 

0 

cksm 

40210 

0 


s * 



& 

13*7360 


§ 









& 

13* 7370 


§ 



§ 



9 



9 



5 


NASA 1021106-021 
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PAGE bA2 


the right oF Each word; denotes unused fixed memory. 
(Interpretive operator words) or "Ch (Constants), 


1 


03302 

0 


03310 

0 


34516 

1 


51123 

0 

0 


03315 

0 


03136 

0 


07167 

0 


07O10 

i 

1 

C; 

00027 

1 


O7I67 

0 


41123 

1 


6l 1 17 

1 

1 


37202 

0 


50117 

0 


37O55 

0 


03100 

0 

0 


11122 

0 


07051 

1 


O7O34 

1 


O7O34 

1 

0 


07034 

1 

C; 

02102 

0 


3OOOO 

1 


11122 

0 

1 


07203 

1 


06766 

0 


11117 

0 


IOOOO 

0 

1 


50117 

0 


35501 

0 


61073 

1 


50116 

1 

0 


35501 

0 


50616 

0 


41100 

0 


5061 7 

1 

0 


20017 

0 


40645 

1 


74511 

1 


60001 

0 

0 


20016 

1 


02346 

1 

c; 

00027 

1 


O7I33 

1 

0 


50672 

1 


03362 

0 


11117 

0 


IOOOO 

0 

0 


07152 

0 


31100 

1 


51676 

1 


31 101 

0 

0 


34513 

1 


71116 

1 


IOOOO 

0 


O7I l4 

1 

1 


40000 

0 


51672 

0 


07114 

1 


02346 

1 

i 

C; 

77761 

i 


32566 

0 


50672 

1 


03362 

0 

1 

Cl 

12062 

0 


30006 

1 


10006 

0 


O72II 

1 

1 


O73IO 

i 

c: 

00035 

1 


07310 

X 

CJ 

OOO52 

0 

1 


02173 

0 

c: 

42240 

1 


07310 

1 

c; 

OOO27 

1 

1 

c: 

00013 

0 


10037 

1 


07235 

1 


34516 

1 

i 


35503 

1 


02173 

0 

c: 

27334 

0 


35503 

1 

0 


07311 

0 

c: 

00030 

1 


07310 

1 

c; 

00026 

0 

1 


02173 

0 

c; 

27342 

1 


35503 

1 


O2I73 

0 

0 

C: 

00001 

0 


34477 

1 


50115 

1 


20016 

1 

0 

c: 

27344 

1 


10115 

0 


07276 

0 


07307 

1 

0 


40000 

0 


64522 

0 


64522 

0 


50116 

1 

1 


37331 

1 


50012 

1 


20017 

0 


20115 

0 

1 


37345 

1 


IOOOO 

0 


07335 

0 


02256 

1 

1 


02256 

1 

c: 

001 15 

1 

c; 

00116 

1 


O7347 

0 






@ 



@ 



@ 







& 



@ 



e 







§ 










464t)78A VUL SYSTEM FOR AGC^^: REVISION 0 OF PROGRAM SOLRUM 55 BY 


octal listing oF paragraph # 060» parity bit in binary At 


all valid rtoRDS ARE BASIC INSTRUCTIONS eXCePT THOSe MARKeO nl« 


1 A 16000 


AA516 

0 


50677 

1 


0&2A5 

1 

c; 

00051 

UtbOlO 


6A513 

1 


50726 

1 


3A505 

0 


02173 

1 ^ ♦ 602 O 


20016 

1 


05702 

1 


02731 

0 


O 6 O 7 O 

1 A * 6 D 3 O 


02173 

0 

C: 

30033 

1 


02256 

1 


O 5 O 7 O 

I * 60 AO 


02173 

0 

C: 

3 OOA 3 

0 


02256 

1 


06070 

1 A *60 50 


35501 

0 


50677 

1 


36102 

1 


02173 

1 A » 6^60 

C; 

00050 

1 

C! 

AOOlO 

1 


AA516 

0 


50677 

1 A » 6 O 7 O 


107 2 7 

1 


00001 

0 


0626A 

1 


00001 

1A»6100 

C; 

03720 

1 

c: 

01750 

i 

c; 

00310 

0 

c: 

OOOAO 

1 ^ 1 6 1 1 0 


36103 

0 


02173 

0 

C: 

30125 

1 


06020 

1 A ♦ 6 1 20 


AOOOO 

0 


50701 

i 


A0051 

1 


AOOOO 

IA,6130 


36076 

0 


O 2 I 73 

0 

Ci 

3021‘t 

0 


02256 

1 A * 6 1 AO 


02173 

0 

C: 

3011A 

0 


06160 

0 


062A5 

1 A » 6 1 5 O 


6A513 

1 


50725 

1 


3A505 

0 


02173 

1 A * 6 1 60 


AA516 

0 


50677 

1 


06020 

0 


06757 

lA f 6 I 7 O 


06156 

0 


03A3D 

0 

C: 

02000 

0 


0626A 

lA f 6200 


O 63 IA 

1 


AA513 

0 


70726 

0 


50726 

1 H f 6 2 1 0 


36103 

0 


02173 

0 

C: 

302lA 

0 


0 6 1 60 

IA»6220 

c: 

001 AO 

1 

C: 

A2000 

1 


06227 

0 


06757 

U,6230 


02173 

0 

C: 

30233 

0 


06160 

0 


03A30 

1A*62A0 


0631 A 

1 


062A5 

1 

c; 

00000 

1 

c; 

AOOlO 

1A,6250 


5 O 73 I 

1 


36260 

0 


70723 

0 


20001 

1 A t 6260 

C; 

3A760 

1 


355 O 3 

1 


64A76 

0 


5003A 

lA *6270 


206AO 

1 


10733 

1 


0627A 

0 


06300 

1A,6300 


206A0 

1 


10727 

1 


00637 

0 


06305 

1A»6310 


AOOOO 

0 


206A0 

1 


5 O 733 

0 


02256 

1A»6320 


06311 

1 


20601 

1 


30120 

1 


6A335 

lA tbSSO 


06332 

0 


35501 

0 


20017 

0 


5 O 6 AO 

Ia,63A0 


063A% 

1 


206A0 

1 


50733 

0 


06020 

IA«6350 


30071 

1 


063A1 

1 


O 57 O 6 

0 


30062 

1 A t 6360 

C; 

01210 

0 


50102 

1 


2 007 7 

0 


lOOOO 

1 A 1 637 O 


AOOOO 

0 


60102 

1 


lOOOO 

0 


6A5l6 


NASA IO2IIO8-O2I 


DEC 4* 1966 


PAGE eA3 


the right dF each word; "S" denotes unused fixed memory. 


(Interpretive 

operator 

WORDS) OR 


(CONSTANTS) , 



0 

c: 

AOOII 

0 


02773 

0 


4A513 

0 


70726 

0 

0 

C; 

30201 

1 


36077 

1 


02173 

0 

c: 

3 OO 22 

1 

0 


062A6 

1 

c; 

00050 

1 

Cl 

40010 

1 


36lOl 

1 

0 


062A6 

1 

c; 

00060 

1 

C! 

41000 

1 


36103 

0 

0 


3A502 

1 


50700 

0 


50701 

1 


50702 

1 

0 

C; 

30056 

1 


02256 

1 


O 6 O 7 U 

0 


06246 

1 

i 


36100 

0 


02173 

0 

C! 

30171 

0 


02256 

1 

0 


0626A 

1 

C! 

21A50 

0 

Cl 

10624 

0 

Cl 

0665A 

0 

0 


062A5 

1 

c: 

000A2 

1 

Cl 

40002 

1 


027A3 

0 

0 


AOOA? 

0 


AOOOO 

0 


50700 

0 


40050 

0 

0 


5 O 7 O 2 

1 


O 6 O 7 O 

0 


35501 

0 


50677 

1 

1 


062A5 

1 

C: 

OOOA2 

I 

C; 

40002 

1 


36103 

0 

i 

C: 

OOO 5 O 

1 

c: 

AOOlO 

1 


4A5 1 3 

0 


70726 

0 

0 

C: 

30201 

1 


36075 

0 


02173 

0 

c; 

30171 

0 

1 


062A5 

1 

c: 

00050 

1 

Cl 

40010 

L 


36103 

0 

1 


3A503 

0 


7 O 726 

0 


lOOOO 

0 


06305 

1 

1 


02256 

1 


06245 

1 

Cl 

OOOAA 

1 

Cl 

4000a 

1 

0 


0626A 

1 


0631a 

1 


06757 

1 


06245 

1 

1 


062A5 

1 

c; 

00060 

1 

Cl 

41000 

1 


36103 

0 

0 

c: 

02000 

0 


0626A 

1 


35501 

0 


50677 

1 

i 


06160 

0 


20017 

0 


20001 

1 


3 OOUO 

1 

1 


60001 

0 


50723 

1 


20001 

1 


00002 

0 

0 


35501 

0 


50640 

0 


30001 

0 


50637 

0 

1 


34516 

1 


206A0 

1 


30733 

0 


02060 

0 

1 


00637 

0 


20640 

1 


10733 

1 


06311 

1 

1 


206A0 

1 


10733 

1 


06321 

1 


AA516 

0 

0 


20601 

1 


30120 

1 


06311 

1 


34516 

1 

0 


20000 

0 


10733 

1 


06357 

0 


06352 

0 

0 


10000 

0 


06357 

0 


3 OO 7 I 

1 


6A5 1 6 

1 

0 


20640 

1 


50733 

0 


02127 

1 


O 3 OAA 

1 

0 


6 A 5 I 6 

1 


06371 

1 


6 A5 1 6 

1 


6A5 1 6 

1 

1 


06376 

0 


40000 

0 


5 OO 34 

0 


06403 

0 


^84b78A YUL SYSTEM FOR AGC<»: REVISION 0 OF PROGRAM bOLRUMsS BY 


qCtae listin^j oF ParaGraph # 06if wuh parity bix in binary aj 
ALL valid Words are basic instructions except those marked "i** 


1a»6A00 


20000 

0 


3AA77 

1 

6003A 

0 

20077 

1 A 1 6 A 1 0 


10735 

1 


O 6 AI 3 

1 

06Al6 

1 

O 3 OO 7 

1 A » 6 A 2 0 


10272 

1 


06A32 

1 

1 0 3A6 

1 

06A32 

I A * 6 A 30 


0 30 A A 

1 

C; 

01207 

U 

65503 

1 

5 O 735 

1 A , 6AA0 


A 7777 

0 


3A503 

0 

25777 

1 

A0637 

1 A » 6 A 5 O 


02052 

1 

C: 

30677 

I 

06020 

0 

35501 

1 A ♦ 6A60 


O 57 O 2 

1 


50030 

I 

a005 3 

0 

5 O 577 

lA t6A70 


AOO 5 1 

1 


50576 

0 

AOOA 7 

0 

50600 

1a,6500 


0226A 

0 


AA 5 I 2 

1 

7 O 6 A 5 

1 

6 A 5 I 2 

lA»65lO 


06511 

1 


30007 

u 

30007 

0 

7A503 

1 A » 65 20 


3 O 575 

0 


50637 

0 

30577 

1 

5 O 6 AO 

1A,6530 

C; 

30651 

0 


30637 

0 

20601 

1 

50115 

1A*65A0 


20601 

1 


5 OII 7 

0 

0226A 

0 

66676 

1A,6550 

C; 

00106 

0 


0226A 

0 

6 A 5 1 6 

1 

765A6 

1A,6560 


20000 

0 


30052 

u 

6AA75 

0 

50637 

lA *6570 


506A0 

0 


20000 

0 

AO 572 

0 

20537 

1 A » 66 00 


06570 

0 


32261 

0 

70 735 

1 

lOOOO 

I A * 66 1 0 


0226A 

0 


10735 

1 

06616 

0 

03007 

IA*6620 


30735 

0 


7A505 

1 

lOOOO 

0 

06627 

1A,6630 


70735 

1 


50577 

1 

A5362 

1 

20577 

1 A * 6 6 AO 


6 O 735 

0 


30735 

0 

72261 

1 

lOOOO 

1 A » 6650 


02256 

1 


03302 

0 

03310 

0 

A0U5 

1 A * 6 6 6 0 


50621 

1 


35501 

0 

50620 

0 

36672 

1 A *6670 


36673 

0 


03320 

0 

Cj 00656 

1 

C; 30653 

1A,6700 


03100 

0 


03315 

0 

0565A 

0 

c: lAOOO 

1A,6710 


7 O 6 O 2 

1 


6671 A 

0 

lOOOO 

0 

06736 

lA ,6720 


50735 

0 


AOOOO 

0 

20735 

1 

60052 

1A,6730 


50052 

0 


20017 

0 

3A516 

1 

02173 

1A,67A0 


IQOOO 

0 


3A510 

1 

667 A 6 

L 

06700 

IA,6750 


367A6 

1 


50110 

i 

U3105 

0 

C: 05100 

1A,6760 


30001 

0 


5011? 

0 

AA50A 

0 

7 0 6 A 6 

1A,6770 


06772 

0 


0011 7 

0 

30072 

1 

50115 


I « , • 



NASA 1021108-021 


DEC A, 1966 


page bAA 


the right 0^ Each wqrd; "e" denotes unused fixed memory. 
(Interpretive operator woRos) or «c« (Constants), 


0 


50000 

1 


05702 

1 


20017 

0 

50637 

0 

0 

C; 

00105 

0 


Q212a 

1 


10216 

0 

06A32 

1 

1 


I04f22 

1 


06A32 

1 


10a76 

0 

06A32 

L 

0 


20000 

0 


50052 

0 


35501 

0 

20735 

1 

1 


30003 

1 


6 O 735 

0 


50735 

0 

32165 

1 

0 


30735 

0 


10000 

0 


20000 

0 

50000 

1 

1 


AOO 52 

1 


5 O 575 

0 


AOO 5 O 

0 

5057A 

1 

1 


02677 

0 


3A512 

0 


706A5 

1 

10000 

0 

0 


5 O 6 A 5 

0 


1000a 

1 


6A5l6 

1 

0667A 

1 

1 


10000 

0 


0661 1 

1 


10735 

1 

065A3 

0 

0 


30573 

0 


5 O 6 AI 

1 


321A3 

0 

O 2 O 52 

1 

1 


306A0 

0 


20601 

1 


50116 

1 

306A1 

1 

0 


10000 

0 


06552 

0 

C! 

7677 7 

1 

O 3 OO 7 

0 

1 


6A505 

0 


50735 

0 


7 A 6 O 7 

0 

5 O 6 AO 

0 

0 


6A5l6 

1 


206A0 

1 


50052 

0 

3AA75 

0 

1 


50000 

1 


1063? 

1 


50637 

0 

106A0 

1 

0 


0226A 

0 


32165 

1 


02052 

1 

C; 30750 

0 

0 

C! 

00107 

1 


02256 

1 


AA505 

1 

70735 

1 

1 


03007 

0 

c: 

00110 

1 


02256 

1 

3A607 

1 

0 


60052 

0 


20577 

0 


50052 

0 

3A503 

0 

0 


02256 

1 


32165 

1 


02052 

1 

C; 30755 

0 

0 


50616 

0 


A0U6 

0 


50617 

1 

AOII 7 

1 

1 


03100 

0 


06670 

0 


03362 

0 

0212A 

1 

1 


05720 

1 

C; 

LOOOl 

1 

c; 

7A000 

1 

36753 

0 

1 


03136 

0 


06736 

0 


06736 

0 

367A7 

0 

0 

C: 

77727 

0 


06736 

0 


3A607 

1 

70735 

1 

0 


25777 

1 


AA503 

1 


6A516 

1 

20735 

1 

0 

C; 

3 O 7 AA 

0 


0212A 

1 


32261 

0 

7 O 735 

1 

0 


06261 

1 


0631A 

1 

c: 

05000 

1 

C: 00076 

0 

0 


0212A 

1 


36753 

0 


06751 

1 

20017 

0 

1 


6 A 5 OA 

1 


306A6 

0 


7A50A 

0 

inooo 

0 

1 


30071 

1 


50116 

1 


36103 

0 

02173 

0 


*1 ■ ' “ '* 


V 


« • > 





< C 




48^tb78A YUL SYSTEM FOR AGC^t: REVISION 0 OF PROGRAM SOLRUM&5 BY 


OCTAL listing of PARAGRAPH # OtZt k^lTh PARITY BJT I 

all valid words are basic instructions except those 


14^7000 

c: 

31003 

0 

37010 1 

02127 

1 

14,7010 

C; 

31011 

0 

20017 0 

30115 

1 

14,7020 


50101 

1 

20000 0 

41001 

0 

14,7030 


50116 

1 

40115 0 

50115 

1 

14,7040 


O72I6 

0 

20101 0 

40737 

0 

14, 7O5O 


51002 

1 

35501 0 

60115 

1 

14,7060 

C: 

00756 

0 

50101 1 

50077 

1 

14,7070 


07145 

0 

41003 1 

5OII5 

1 

14,7100 


07171 

1 

41003 1 

50115 

1 

14,7110 


50115 

1 

41006 1 

5OII6 

1 

14,7120 


50115 

1 

4X004 0 

50116 

1 

14,7130 


50116 

1 

40751 0 

07145 

0 

14,7140 


20017 

0 

32170 0 

02052 

1 

14,7150 


40116 

0 

30116 1 

25777 

1 

14 , 7l60 


6O757 

1 

20077 0 

30757 

1 

14,7170 


00001 

0 

30001 0 

5OIOO 

0 

14,7200 


50034 

0 

30003 1 

07157 

0 

14,7210 


07212 

1 

00100 0 

77260 

0 

14,7220 


40000 

0 

25777 I 

445 1 3 

0 

14,7230 


20101 

0 

31002 1 

3OO34 

0 

14,7240 


70646 

1 

10000 U 

02124 

1 

14,7250 


05654 

0 

C: 30331 0 

03066 

1 

14,7260 

CJ 

77740 

1 

40036 0 

40000 

0 

14,7270 


07275 

0 

07273 0 

02124 

1 

14,7300 


50106 

0 

30003 1 

50116 

1 

14,7310 


07331 

1 

40106 1 

50115 

1 

14,7320 


50115 

1 

4OIO7 0 

50116 

L 

14, 7330 


40000 

0 

30001 0 

5OIOO 

0 

14,7340 


50034 

0 

30116 1 

07202 

0 

14,7350 


10764 

0 

07524 Q 

35503 

1 

14,7360 


lOOOO 

0 

35503 1 

07364 

1 

14, 737O 


10116 

0 

07353 0 

20017 

0 


binary at 

marked "1« 

37010 

50072 

50115 
25777 

itOOOO 

20101 

41001 

41004 

41004 

40753 

40754 

40746 

C; 31237 
40115 
30034 
30001 

35503 
10000 
25 777 
60115 

03416 

35501 

30755 

40000 

50107 

40107 

40/46 

35501 

30755 

50116 

45503 

345I6 


NASA 1021108-021 


dec 4* 1966 


PAGE 645 


THE 

right of Each 

word; 

denotes 

UNUSED 

1 FIXED 

memory* 


(INTERPRETIVE 

operator WORDS) OR 

II c ** 

(CONSTANTS) 

• 


1 

02060 

0 

034 1 6 

1 

CJ 

02000 

0 

02256 

1 

1 

30116 

1 

50071 

1 


00117 

0 

355O2 

0 

1 

20101 

0 

40736 

1 


25777 

1 

40755 

1 

1 

44513 

0 

lOOOO 

0 


07216 

0 

O7O41 

0 

0 

25777 

1 

40003 

0 


60116 

1 

20101 

0 

0 

51001 

1 

10101 

0 


64335 

0 

O7O20 

1 

0 

50115 

1 

41002 

0 


50116 

1 

40747 

1 

0 

501 16 

1 

40752 

0 


O7 146 

0 

4O744 

1 

0 

5OII6 

1 

40750 

1 


O7I45 

0 

41005 

1 

1 

07146 

0 

40745 

0 


07171 

1 

41003 

1 

0 

07145 

0 

4IOO5 

1 


50115 

1 

41006 

1 

0 

07171 

1 

10101 

0 


O7I4O 

0 

O57O2 

1 

0 

06020 

0 

40000 

0 


30116 

1 

25777 

1 

0 

50034 

0 

30003 

1 


60116 

1 

20077 

0 

0 

20077 

0 

60756 

0 


20077 

0 

50756 

0 

0 

25777 

1 

40755 

1 


25777 

1 

45502 

1 

1 

60077 

1 

30077 

1 


20000 

0 

10756 

1 

0 

50101 

1 

OOIQO 

0 


20101 

0 

40737 

0 

1 

40115 

0 

50034 

0 


30003 

1 

60116 

1 

1 

20101 

0 

31001 

1 


O7O55 

0 

34504 

1 

1 

C; 02000 

0 

37O6O 

0 


05654 

0 c 

; 31347 

0 

0 

50756 

0 

50760 

0 


50762 

1 

02124 

1 

0 

40000 

0 

60755 

0 


10000 

0 

64516 

1 

0 

64476 

0 

25777 

1 


44506 

1 

50115 

1 

1 

35501 

0 

50101 

1 


50077 

1 

40744 

1 

0 

50116 

1 

40745 

0 


07330 

0 

40106 

1 

0 

07330 

0 

10101 

0 


07237 

0 

02124 

1 

0 

50117 

0 

30001 

0 


05416 

1 

30115 

1 

0 

40000 

0 

60U5 

1 


07266 

1 

50115 

1 

1 

60000 

1 

601 15 

1 


50077 

1 

20000 

0 

0 

20077 

0 

60000 

1 


2OO77 

0 

30000 

1 

1 

02173 

0 

C; 21504 

0 


44473 

1 

50677 

1 


4b^b7yA YUL system FOR AGC4: ReVISIuN 0 OF PROGRAM SoLRUMSb BY 


octal listing of paragraph 0 063* rtllH PARITY BIT IN BINARY AT 

all valid words ARe basic instructions eJ<CEPT those marked **1" 


lA, TAOO 


A5502 

1 

60115 

I 


5 0/6 A 

1 

06020 

I^* ?A10 


50116 

1 

60000 

1 


60115 

1 

50077 

1A,7A20 


07A23 

0 

35503 

1 


0742a 

1 

AS 503 

lA, 7A30 


10116 

0 

07AIO 

0 


0737^ 

0 

50113 

1A*7AA0 


50117 

0 

35503 

1 


50077 

1 

60000 

lA* 7A50 


50116 

1 

20100 

1 


30001 

0 

50116 

lA , 7A60 


65503 

1 

6 A 3 A 0 

1 


60116 

1 

60115 

lA, 7A70 


20100 

X 

60001 

0 


20100 

1 

50001 

1A*7500 


20100 

1 

30000 

1 


10077 

0 

07AA2 

lA» 7510 


32261 

0 

7OO6 A 

1 


50072 

1 

3A606 

lAt7520 


3A516 

1 

02173 

0 

C; 

2I57I 

1 

07376 

IA,7530 


50116 

1 

375A7 

0 


02127 

1 

107 6 A 

lA * 75A0 


6A373 

1 

50071 

1 


00117 

0 

30001 

IA,7550 


3215A 

0 

020A6 

1 

C: 

31562 

1 

37572 

1 A * 7 5 60 

c: 

00003 

1 

02256 

1 


02362 

1 

c: 000A3 

lA, 7570 

C! 

20A 1 6 

0 

0212A 

1 

C: 

00175 

1 

07573 

lA *7600 




e 



§ 


g 

IA*7610 


§ 


e 



g 


& 

lA* 7620 


§ 


§ 



§ 


g 

1A*7630 




& 



& 



1A*76A0 


e 





& 


g 

1A*7650 


§ 


§ 



@ 



lA *7660 


& 





i 


g 

lA *7670 


§ 







S 

lA* 7700 




& 



g 


& 

lA *7710 







g 


g 

1A*7720 


§ 


§ 



& 


g 

1A*7730 


§ 


& 



9 


g 

lA *77A0 




& 



g 


w 

1A*77S0 


§ 





g 


g 

1A*7760 


§ 





g 


g 

lA . 7770 


§ 


Q 



g 


$ 


NASA 1021108-021 


Dec a, 1966 


Page 8A6 


the 

right of each 

WORD 

f it g ft 

denotes 

unused 

' fixed 

Memory. 


( INTE^^PRETIYe 

operator 

WORDS) OR "C" 

(CONSTANTS) . 



0 

50115 

1 


1076A 

0 

0752A 

0 

35503 

1 

1 

20000 

0 


10000 

0 

07A21 

1 

07A21 

1 

0 

20077 

0 


60000 

1 

2 OO 77 

0 

30000 

1 

1 

05706 

0 


30062 

0 

5 OO 6 A 

0 

35501 

0 

1 

60113 

1 


50100 

0 

20000 

0 

30000 

1 

1 

0565A 

0 

c; 

0715A 

0 

10000 

0 

35503 

1 

1 

20100 

1 


50001 

0 

O 7 A 76 

0 

50001 

0 

0 

30001 

0 


07A77 

1 

35501 

0 

60115 

1 

1 

30113 

1 


50115 

1 

1076A 

0 

075A3 

1 

0 

7 OO 6 A 

I 


6A373 

1 

5 OO 7 I 

1 

20017 

0 

1 

30001 

0 


5 OII 7 

0 

O 57 O 6 

0 

30062 

0 

0 

07531 

1 


30116 

1 

50072 

1 

7A606 

1 

0 

50117 

0 


3 OO 6 A 

0 

O 753 O 

0 C; 

31533 

0 

0 

02173 

0 

c; 

65121 

0 

3A513 

1 

02312 

0 

0 

OAOOO 

0 

1 : 

75175 

0 I : 

76575 

1 c: 

1353A 

1 

1 

0757A 

0 

Cksm 

71075 

0 

g 


g 



@ 



g 


g 


g 



g 



g 


g 


g 



§ 



e 


g 


g 



§ 



g 


g 


g 



§ 



g 


g 


g 



S 



g 


g 


g 



§ 



g 


g 


g 



§ 



g 


g 


g 



e 



g 


g 


g 



§ 



§ 


g 


g 






§ 


g 


g 



@ 



g 


g 


g 



g 



g 


g 


g 



§ 



g 


g 


g 



@ 



g 


g 


§ 



§ 



g 


g 


g 



4b^*578A YUL SYSTEM FOR AGC^: REVISION 0 OR PROGRAM SOLRUMbS BY 


OCTAL listing of PARAGRAPH § lOA* WITH PARITY BIT IN BINARY AT 


ALL valid Words are basic instructions except those marked «i*i 


21 »oOOO 

OAOOO 

0 

I: 45175 

0 

I: 76575 

1 

c: 

01317 

21*6010 

50616 

0 

35501 

0 

50617 

1 


07542 

21,6020 

c; 0l3lS 

1 

C: 00003 

1 

C: 32620 

1 

I ; 

45175 

21,6030 

506l6 

0 

075A2 

0 

Cl 00661 

0 


O67A5 

21 ,60A0 

C; 15617 

0 

C; 20271 

1 

C: 00023 

0 

c; 

32001 

21,6050 

C: 32021 

0 

I: 57176 

0 

C: 01353 

0 

C; 

32017 

21,6060 

l: 7A175 

1 

I: 51622 

0 

C: 33461 

1 

c; 

OOOOl 

21,6070 

I; 76776 

0 

Cl 03446 

I 

l! r6?76 

0 

Cl 

0464 4 

21,6 100 

05654 

0 

C: 30000 

1 

U2362 

1 

c: 

OOOOl 

21,6110 

51356 

0 

114A6 

I 

06105 

0 


33533 

21,6120 

1 lAA6 

1 

0 6 1 1 4 

0 

33571 

1 


5I32O 

21 , 6 1 3O 

40000 

0 

50700 

0 

41323 

0 


4OOOO 

2 1 ,61^0 

02276 

0 

C; 02103 

1 

05654 

0 

C! 

30104 

21 ,6l50 

C: 02203 

1 

05654 

0 

Cl 30143 

1 


02676 

21 ,6l60 

20016 

1 

0565 4 

0 

C: 30331 

0 


067A6 

21,6170 

51333 

0 

51334 

1 

51335 

0 


51336 

21 ,o200 

33532 

0 

51321 

0 

37OII 

0 


5O755 

21,6210 

02124 

1 

3626 4 

1 

05750 

0 


33544 

21,6220 

35503 

1 

51035 

0 

30006 

1 


3OOO6 

21,6230 

70646 

1 

lOOOD 

0 

06242 

0 


37002 

21 ,62a0 

C; 42270 

1 

02256 

i 

40573 

1 


51467 

21,6250 

345 1 6 

1 

02312 

0 

C; 00005 

1 


10000 

21 ,6260 

C: 65152 

1 

0623 6 

0 

36265 

0 


06212 

21,6270 

0717A 

1 

10654 

1 

33543 

0 


06275 

21 ,6300 

c; 31017 

0 

04000 

0 

I; 43176 

0 

c: 

03005 

21 ,6310 

I; 57176 

0 

C; 20271 

1 

C: 01315 

1 

c: 

32043 

21,6320 

l; 66776 

1 

C; 03001 

0 

C: 0l3l7 

0 

I ; 

57176 

21,6330 

ll 77576 

0 

10654 

1 

07032 

1 


06334 

21 ,63A0 

O23A6 

1 

C; 00006 

1 

06344 

1 


0645 7 

21,6350 

I; 76776 

0 

C: 02360 

0 

02362 

1 

c; 

00002 

21 ,6360 

C: 02515 

1 

I; 45176 

0 

C: uU65 

1 

c; 

33371 

21,6370 

06437 

1 

35601 

0 

3I452 

0 


61333 


NASA 1021108-021 


DEC A, 1966 


PAGE b47 


the right of each word? ”6" denotes unused FIXED MEMORY. 

(Interpretive operator woRds) or »Cfi (Constants), 


0 

c 

20325 

1 


03302 

0 


03310 

0 


30115 

0 

c 

0066 1 

0 


06745 

1 


04000 

0 

I : 

63776 

0 

I 

76575 

1 

c: 

01353 

0 

c; 

20325 

1 


30115 

1 


03362 

0 


04000 

0 

I ; 

45175 

0 

i; 

76565 

1 

I 

55176 

1 

c: 

01353 

0 

c; 

32011 

0 

I ; 

47576 

0 

I 

47575 

0 

1 ; 

47065 

1 

C; 

OOOO7 

0 

C; 

32013 

0 

c 

00002 

0 

C: 

37241 

1 

1 ; 

51576 

1 

c; 

O2O6I 

0 

I 

47575 

0 

I ; 

77176 

1 

c; 

33323 

0 

I ; 

77576 

0 


33543 

0 


31446 

0 


35501 

0 


21446 

1 


31446 

0 


35501 

0 


2 1446 

1 


51446 

i 


05654 

0 

C: 

30331 

0 


06746 

1 


41322 

0 


5O7OI 

1 


4 1 324 

1 


4OOOO 

0 


50702 

1 


05654 

0 

C: 

30331 

0 


06746 

1 


02276 

1 


4O572 

0 


51370 

1 


40573 

1 


51371 

1 


02362 

1 

CI 

OOOO5 

1 


35501 

0 


51332 

0 


51337 

1 


50045 

0 


50046 

0 


6OO44 

0 


20017 

0 


37OO2 

1 


02173 

0 

C! 

42211 

1 


02312 

0 

c; 

00003 

1 


40036 

0 


50665 

1 


77017 

1 


10000 

0 


06242 

0 


34515 

1 


02173 

0 

c: 

42211 

0 


345OI 

1 


02046 

0 


40572 

0 


51466 

1 


4 1467 

1 


50667 

0 


06236 

0 


06256 

0 


37OI4 

0 


O2I73 

0 

c. 

61313 

1 

c: 

61364 

1 


O7223 

0 


06301 

1 


33545 

0 


02312 

0 

c: 

00003 

1 


05654 

1 

c 

33455 

0 

1 : 

47576 

0 

c; 

33457 

1 

I : 

76575 

1 

I 

55176 

1 

c: 

01315 

1 

c; 

32045 

1 

I : 

43I75 

0 

c 

OOOOl 

0 

c; 

32003 

0 

l: 

55176 

1 

c; 

32005 

0 


02346 

I 

CS 

00005 

1 


06340 

0 


06451 

1 


02346 

1 

c; 

OOOO3 

1 


06352 

0 


O4OOO 

0 


04000 

0 

I : 

76776 

0 

c; 

02575 

1 

I ; 

76776 

i 

1 

: 77576 

0 


11321 

1 


06436 

0 


10764 

0 


51341 

0 


355OI 

0 


61332 

1 


51340 


1 

1 

i 

0 

0 

I 

I 

0 

1 

0 

1 

1 

0 

0 

1 

1 

0 

1 

1 

1 

0 

0 

0 

0 

I 

0 

0 

1 

0 

0 

0 

I 


YUL SYSTEf^. FOR AGC^; REVISION 0 OF PROGRAM SOLRUM55 BY 


octal Listing of paragraph # io5» mth parity bit in binary at 
all valid WqRDS are bask instructions e^^LePT those marked i'Ih 


2 1 » b AOO 


35501 

0 


3 1 4 Ab 

0 


61335 

0 

513A3 

21 tbAlO 


31A5U 

1 


61337 

i 


5 I 345 

1 

35501 

21 ,6A20 


5 I 333 

0 


5l33A 

1 


5 I 335 

0 

51336 

21 *6A30 

C; 

02603 

0 


20017 

0 


32162 

0 

02052 

21 * 6 A 4 O 

C: 

02603 

0 


021 2a 

1 


37 O 3 O 

0 

0565a 

21 * b A 5 0 


0212A 

1 


11320 

0 


06 A56 

0 

02362 

21 *6A60 

1 : 

76776 

0 

C; 

02515 

1 

I : 

66775 

1 

i: 6 A 7 A 2 

21 * 6 A 70 

C! 

33363 

1 

I ! 

53575 

0 

I ; 

52572 

0 

c: 00003 

21 *6500 

C 

01006 

0 

c 

01361 

1 

c 

02765 

1 

c; 01361 

21,6510 

c 

00001 

0 

c 

02661 

1 

I 

76776 

0 

C; 02362 

21*6520 

c 

000 1 A 

1 

c 

03010 

0 

I 

6A775 

0 

l: 637A2 

21,6530 

c 

33A53 

0 

I 

64775 

0 

I 

63726 

1 

c; 77777 

21 ,65a0 

I 

6A775 

0 

I 

63776 

1 

c 

Q1a55 

1 

c: 00005 

21*6550 

c 

01A57 

0 

c 

00003 

1 

c 

00002 

0 

c; 01AA7 

2 1 * 6560 

c 

01A55 

1 

c 

00002 

0 

I 

6A774 

1 

l: 63/32 

21,6570 

c 

77777 

0 

c 

01451 

0 

c 

33A51 

1 

l: A0576 

21*6600 

c 

00005 

1 

c 

00002 

0 

I 

64775 

0 

l; 637A2 

21,6610 

I 

53574 

1 

I 

52435 

1 

I 

47172 

0 

C; OOOO 7 

21 *6620 

c 

0100b 

0 

c 

00003 

1 

c 

00002 

0 

n 6 A 775 

21,6630 

c 

33363 

1 

I 

64776 

u 

c 

01363 

0 

C; 02767 

21 »66A0 

c 

33357 

0 

I 

47574 

1 

I 

64716 

0 

l; 70776 

21,6650 

I 

64775 

0 

I 

63776 

1 

c 

01363 

0 

C! 02775 

21 ,6660 

I 

47576 

0 

c 

32001 

1 

I 

47575 

0 

l: 70376 

2 1 ,6670 

c 

OOOOl 

0 

c 

05732 

1 

c 

00006 

1 

l: 6A375 

21,6700 

c 

37115 

0 

1 

A0576 

1 


34501 

1 

0 2 0 A6 

21,6710 


10000 

0 


OOOOl 

0 

C: 

r 24000 

1 

06714 

21,6720 


07252 

0 


10727 

1 


06726 

1 

06746 

21,6730 


06000 

1 

c 

77730 

0 


06000 

1 

20115 

21 ,67A0 


0634 a 

1 


02362 

1 

c 

00006 

1 

06A57 

21,6750 


4A5 1 6 

0 


02312 

u 

c 

00003 

1 

0212A 

21,6760 

c; 14631 

0 

c 

231A6 

u 

c 

00101 

1 

C; 21116 

21 ,6770 

c 

: 3A631 

1 

c 

: 231A6 

0 

c 

56777 

0 

c; 77777 




i 


i 
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the right oF each word; "e" denotes Unused fixed memory. 


(Interpretive operator woRdsi or ‘'Ci* (Constants), 


1 


35501 

0 


6133a 

1 


513a2 

0 


35501 

0 

0 


61336 

0 


5l 3AA 

0 


35501 

0 


51332 

1 

0 


51337 

1 


33532 

0 


51321 

0 


02276 

0 

1 

C; 

A2AA2 

0 


0212A 

1 


51321 

0 


02276 

0 

0 

C 

31A33 

1 


0565a 

0 

c: 

3 O 33 I 

0 


0212a 

1 

1 

C 

00002 

0 


06457 

1 


51320 

1 


OaOOO 

0 

1 

c 

OlOOA 

1 

c: 

01363 

0 

c; 

02765 

1 

c: 

01363 

0 

1 

c 

OOOOl 

0 

c; 

02661 

1 

I ; 

66775 

1 

i: 

6A742 

1 

1 

c 

33361 

0 

I 

5357a 

1 

1 ; 

A7A33 

0 

I 

76776 

0 

1 

I 

66775 

1 

I 

63666 

1 

c; 

01A65 

1 

c 

01371 

0 

0 

c 

OOOOl 

0 

c 

000A3 

0 

c; 

00002 

0 

c 

01453 

i 

0 

c 

00045 

0 

c 

00002 

0 

C: 

01A55 

1 

c 

33A55 

0 

1 

c 

00002 

0 

I 

6a77a 

1 

I ; 

637A2 

0 

I 

70776 

0 

1 

c 

33447 

0 

I 

64775 

0 

l! 

63776 

1 

c 

00003 

1 

1 

I 

70776 

0 

c 

0000 5 

1 

C: 

01457 

0 

c 

00002 

0 

1 

I 

45575 

1 

I 

647l6 

0 

Cl 

00052 

0 

c 

01006 

0 

0 

c 

OlOOA 

1 

c 

OOOO 3 

I 

c; 

00002 

0 

C! 

33361 

0 

0 

c 

00003 

1 

c 

02661 

1 

i; 

64775 

0 

1 : 

63776 

1 

0 

I 

63732 

1 

c 

OlOOA 

1 

C! 

00005 

1 

CJ 00002 

0 

0 

I 

64775 

0 

I 

70776 

0 

c: 

01357 

1 

C! 

02771 

1 

0 

c 

02773 

0 

c 

OOOlO 

0 

c: 

01453 

1 

C 

33453 

0 

0 

c 

00004 

0 

c 

33A57 

1 

1 ; 

4A576 

0 

C 

00052 

0 

1 

c 

02751 

0 

c 

36751 

1 

I : 

45 I 75 

0 

I 

64316 

1 

1 

I 

70342 

0 

c 

02751 

0 

c; 

05742 

0 

C 

O 3 II 5 

1 

1 

c 

: a21a7 

0 


O 57 O 2 

1 


AA513 

0 


60115 

1 

0 


20115 

0 


06715 

1 


06000 

1 


06100 

0 

1 


06733 

0 


06746 

1 


66731 

1 


LOOOO 

0 

0 


06732 

1 


06741 

0 


02362 

1 

c 

; 00002 

0 

1 

c 

OOO 5 O 

1 


03362 

0 


05654 

0 

c 

! 302A1 

0 

1 

c 

2A000 

1 

c 

: 00000 

1 

c; 

02000 

0 

c 

I ooooo 

i 

1 

c 

03146 

1 

c 

: 14632 

0 

c: 

031A6 

1 

c 

; 1A632 

0 

0 

c 

20000 

0 

c 

; 00000 

1 

CJ 

03610 

0 

c 

; 01227 

1 


<Hi^b78A yUL SySTEM FOR AgC^: REVISION 0 0^ pROQRAM SOLRUM55 BY 


OCTAL listing QF PARAGRAPH 0 I06f wiTH PARITY BIT IN BINARY AT 

All valId woRps are basic instructions except those marked "I” 


21 

7000 

C 

loooo 

0 

c 

00000 

1 

c: 

00062 

0 

c: 

42270 

21 

7010 

c 

32652 

1 

r 

w 

06200 

0 

C: 

77 746 

1 

c; 

77715 

21 

7020 

c 

37116 

0 

c 

32666 

0 

C: 

13644 

0 

c: 

33772 

21 

7O3O 

c 

01340 

1 

c 

0001 1 

1 


04000 

0 

I : 

7O776 

21 

7040 

c: 

02515 

1 

I ; 

77576 

0 


35501 

0 


51340 

21 

7OSO 


3 1446 

0 


5I343 

1 


3U50 

1 


5I345 

21 

7060 


20016 

1 


02362 

1 

C: 

UOOO4 

0 


04000 

21 

7O7O 

I ; 

76776 

0 

C: 

13463 

1 

I : 

57176 

0 

c: 

01315 

21 

7100 

C! 

01315 

1 

c 

32041 

0 

I 

43576 

1 

c 

00006 

21 

7110 

Ci 

00005 

1 

c 

04566 

0 

I 

47576 

0 

c 

33052 

21 

7120 

I : 

47175 

1 

I 

41153 

0 

c 

00043 

0 

1 

47575 

21 

7I3O 

C; 

03001 

0 

r 

32037 

i 

I 

4757s 

0 

I 

57166 

21 

7140 

C 

00037 

0 

c 

77/7 7 

0 

C; 

01066 

0 

C! 

33066 

21 

7I5O 

I 

41775 

1 

I 

75776 

0 

C; 

01044 

0 

C; 

OO766 

21 

7l60 

c 

OO766 

0 

c 

21643 

0 

I : 

77576 

0 


32164 

21 

7I7O 

c 

00006 

1 

c 

03106 

0 

C; 

1A167 

1 

c: 

3410a 

21 

7200 


20115 

0 


41356 

1 


20115 

0 


51243 

21 

7210 


20115 

0 


41446 

1 


20115 

0 


51261 

21 

7220 


41320 

0 


51276 

0 


00116 

1 


30001 

21 

7230 


41243 

1 


20115 

0 


51356 

0 


10115 

21 

7240 


41261 

1 


20115 

0 


51446 

0 


10115 

21 

72S0 


51320 

1 


00116 

1 


20017 

0 


32150 

21 

7260 


06721 

0 


06354 

0 


03302 

0 


03310 

21 

7270 


64516 

1 


50620 

0 


37540 

1 


03100 

21 

7300 


21400 

0 


31350 

0 


50617 

1 


07542 

21 

7310 


51346 

1 


3O6I7 

1 


2 I4OO 

0 


51350 

21 

7320 


50620 

0 


35503 

1 


50617 

1 


34516 

21 

7330 


35503 

1 


05654 

0 

C 

3O4O6 

0 


05654 

21 

734O 

c 

: 03475 

1 

I 

: 76776 

u 

c 

03446 

1 

I 

52775 

21 

735O 

c 

: 33403 

0 

1 

; 52775 

u 

I 

44776 

1 

C 

01411 

21 

7360 

I 

I 74471 

0 

I 

; 66572 

1 

c 

00736 

0 

c 

00003 

21 

7370 

c 

{ 04524 

0 

I 

: 75176 

0 

c 

00041 

1 

C 

33375 
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thl right of each word; denote^ unused fixed Memory. 


( iNTLRpRETiVE OPERmtOR WORqS) OR ''C (CONSTANTS)* 


1 

c 

00000 

1 

c 

03711 

0 

c 

33265 

0 

c: 

37116 

0 

1 

c 

00310 

0 

c 

00000 

1 

c 

00372 

1 

c; 

00060 

1 

0 

c 

OGOOO 

1 

c 

OOOOO 

1 

c 

12620 

0 

c: 

03315 

0 

0 

c 

01371 

0 

c 

03016 

0 

c 

33371 

1 

I : 

76776 

0 

1 


51342 

0 


51344 

0 


31452 

0 


51341 

0 

1 


20017 

0 


32164 

0 


02052 

1 

C; 

42442 

0 

0 

1: 

70776 

0 

c; 

01074 

0 

Ci 

01467 

0 

c; 

33145 

1 

1 

1: 

45176 

0 

C: 

05174 

0 

1 : 

55175 

1 

I ; 

41176 

1 

1 

c 

03167 

1 

I 

75575 

1 

I 

74572 

1 

c; 

OOOO3 

1 

0 

I 

45176 

0 

c 

05174 

0 

I 

45176 

0 

Ci 

00041 

1 

0 

I 

41753 

0 

c 

01052 

1 

I 

66776 

1 

c; 

01317 

0 

1 

c 

33066 

1 

I 

55174 

0 

I 

75642 

0 

1 i 

73176 

0 

1 

li 

47575 

0 

1 : 

41753 

0 

Cl 

01052 

1 

CI 

33O6O 

1 

0 

C; 

03173 

1 

C; 

32774 

1 

II 

/5I75 

0 

I ; 

76776 

0 

0 


50755 

0 


06750 

0 

i; 42575 

0 

1: 

76776 

0 

0 


30001 

0 


50116 

1 


33535 

1 


50115 

1 

0 


10115 

0 


07177 

1 


33533 

1 


50115 

1 

0 


10115 

0 


O72O7 

0 


41321 

1 


51275 

0 

0 


50116 

1 


33535 

1 


50115 

1 


201 15 

0 

0 


07226 

0 


33533 

1 


50115 

1 


20115 

0 

0 


07236 

1 


41275 

1 


51321 

0 


41276 

1 

1 


02046 

1 

C. 

43262 

0 


34514 

0 


50115 

1 

0 


02362 

1 

Ci 00003 

1 


35501 

0 


51400 

1 

0 


03315 

0 


21400 

0 


31346 

1 


50616 

0 

0 

c 

00661 

0 


07441 

1 


30616 

0 


21400 

0 

0 


II4OO 

0 


07320 

1 


34516 

1 


07267 

0 

1 


50616 

0 


37540 

1 


03100 

0 


03315 

0 

0 

c 

30327 

1 


0744 1 

1 


04000 

0 

I ; 

76776 

0 

0 

I 

44776 

1 

c 

OI4O3 

1 

c 

: 01425 

0 

CI 

00002 

0 

1 

c 

01a25 

0 

c 

00002 

0 

c 

! 33411 

0 

1 : 

7157A 

1 

1 

c 

00047 

1 

c 

00051 

0 

c; 04733 

1 

I : 

76776 

0 

0 

1 

71574 

1 

I 

63561 

0 

I 

; 56531 

0 

Ci 

00736 

0 


4b4578A yUL System for AGC4; revision O of program solrumss by 


octal listing of paragraph a 107* WITH PAKItV bit in BINARr at 

all valId woRdS are basic Instructions except those marked "I” 


2 1 

,7400 

C; 

77771 

0 

C: 

00003 

1 

C: 

U0047 

1 

c; 

21 

*7410 

I : 

75176 

0 

C; 

00041 

1 

C: 

32015 

1 

I : 

21 

* 7420 

I } 

76776 

0 

C: 

04353 

0 

I; 

45776 

0 

c; 

21 

*7430 

c; 

30c,53 

0 


07542 

0 

c: 

00667 

0 


21 

* 7 44O 

I : 

77576 

0 


03362 

0 


02362 

1 

c: 

21 

*7450 


35501 

0 


20077 

0 


5I424 

1 


21 

*7460 

I : 

55176 

1 

C; 

OUI7 

0 

C; 

33435 

0 

I ; 

21 

*7470 

1 ! 

47176 

1 

C; 

01443 

0 

C; 

33437 

1 

I : 

21 

*7500 

c: 

00007 

0 

I : 

42175 

1 

I : 

56776 

1 

Ci 

21 

*7510 

Cj 

37036 

0 

1 ; 

55176 

1 

C; 

00001 

0 

I; 

21 

*7520 

I ; 

57175 

0 

I ; 

64 7 1 6 

0 

C; 

00003 

1 

c: 

21 

*7530 

C; 

00003 

1 

C: 

77777 

0 

C; 

00002 

0 

c: 

21 

*7540 

c; 

00630 

i 

C; 

00021 

1 


30001 

0 


21 

*7550 


05654 

0 

c* 

^ t 

14000 

1 


03136 

0 


21 

*7560 


21354 

0 


00002 

0 


37564 

1 


21 

*7570 


g 









21 

*7600 











21 

*7610 


§ 



§ 



e 



21 

*7620 


& 



& 



§ 



21 

*7630 





& 



% 



21 

*7640 


§ 






@ 



21 

*7650 


§ 









21 

*7660 


§ 



& 



§ 



21 

*7670 








9 



21 

*7700 


e 



§ 



s 



21 

*7710 








& 



21 

*7720 





& 






21 

*7730 





§ 



9 

1^ 



21 

.7740 


@ 



& 



9 



21 

*7750 


§ 



§ 



9 



21 

*7760 


§ 






9 



21 

*7770 


@ 



§ 



S 




00051 

75176 

01521 

07441 

00002 

10077 

47576 

40576 

02723 

42175 

00001 

37046 

51354 

07556 

03320 

E9 

w 

§ 

e 

& 

& 

d 

gi 

& 

fii 

w 

S' 

S 
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the right of each word; "e" denote^ unused fixed memory, 
{Interpretive operator woRd^) or "c (constants). 


Q 

1: 

76776 

0 

c 

0473 3 

1 

I : 

76776 

0 

C: 04524 

0 

0 

C: 

01375 

1 

c 

32OO7 

1 

I ; 

76776 

0 

c; 04761 

0 

0 

c: 

00011 

1 

c 

33521 

1 

1 : 

77576 

0 

05654 

0 

1 


04000 

0 

1 

75176 

0 

CI 

01521 

0 

C! 33333 

1 

0 


02124 

1 

I : 

77576 

0 


37541 

0 

50077 

1 

0 


O7447 

1 


34522 

0 


5l424 

1 

O4OOO 

0 

0 

C; 

33445 

1 

I; 57176 

0 

C; 

01317 

0 

C; 33443 

1 

1 

1: 

75575 

1 

II 74461 

1 

CI 

00002 

0 

c: 00015 

0 

0 

C: 

00003 

1 

c 

32001 

1 

1; 

57176 

0 

CI 00001 

0 

1 

1 ; 

76576 

1 

C 

O27I7 

1 

C; 

20304 

1 

C; 32003 

0 

0 

C: 

00002 

0 

c 

3/042 

0 

1 1 

551 75 

1 

l; 647l6 

0 

1 

1: 

75575 

1 

I 

50401 

1 

CI 

00001 

0 

c; 03502 

0 

1 


21354 

0 


30000 

1 


03100 

0 

07562 

1 

0 


07560 

0 


07544 

0 


21354 

0 

00001 

0 

0 

C: 

43544 

0 


07565 

0 


07566 

0 CK5M 05320 

0 



§ 



@ 



@ 


e 




§ 



@ 



& 


@ 




@ 



9 



§ 


§ 




& 



§ 





§ 




§ 



§ 



@ 






§ 



& 



& 


© 




§ 






@ 


@ 










@ 






§ 








© 




& 



e 





© 




§ 








© 




§ 








© 




$ 



e 





© 




@ 






§ 


© 




9 



& 





© 




6 



@ 





© 




§ 



6 



§ 


© 




Ab^b78A YUL SYSTEM FOR AGC^! REVISION o Oh PROGRAM SOLRUM55 BY 


octal LlSylNtj oF PARAGRAPH 0 UO» WITH PARIiY Bn IN BINARY AT 


all valid Words are basic instructions except those marked *'1» 


22.6000 


34475 

0 


51100 

1 


51101 

0 


34516 

22.6010 

C; 

44024 

1 


34516 

1 


61104 

0 


02173 

22 *6020 


30032 

0 


345 I 6 

1 


5 IIII 

1 


06030 

22.b030 


A5501 

1 


21111 

0 


30045 

0 


21111 

22 *60aO 


6A516 

1 


06045 

0 


06044 

1 


0 6 O 5 1 

22 . 6 O 5 O 


30045 

0 


IIIO5 

0 


06055 

1 


06065 

22.6060 


10000 

0 


06065 

1 


06124 

0 


06065 

22 . 6 O 7 O 


06073 

0 


O 6 O 73 

0 


3 OOOO 

1 


21111 

22.6100 


21111 

0 


51100 

1 


21111 

0 


21100 

22,6110 


25777 

1 


46lAb 

0 


5 O 575 

0 


mil 

22.6120 


06124 

0 


30575 

0 


02173 

0 

C! 

44017 

2 *: . 6 I 3 O 

c; 

01602 

1 

C; 

01064 

1 

c: 

OO 72 O 

1 

C! 

00636 

22.6140 

c 

00562 

0 

c 

00602 

0 

C! 

00636 

1 

c 

00720 

22,bl50 

1 

A5176 

0 

c 

0517A 

0 

C; 

33523 

0 

I 

47576 

22 ,6l60 

c 

04262 

0 

I 

47l76 

1 

C; 

05200 

0 

c 

33523 

22 , 6 l 70 

1 

76776 

0 

c 

04262 

0 

I : 

45175 

0 

I 

70776 

22.6200 

c 

33317 

1 

I 

66775 

1 

I 

43772 

1 

c 

01523 

22,6210 

I 

7 O 776 

0 

c 

01321 

0 

c 

04256 

1 

c 

33525 

22,6220 

c 

01 525 

1 

c 

05200 

0 

c 

04251 

0 

c 

04262 

22,6230 

c 

33521 

1 

I 

47576 

u 

c 

33323 

0 

I 

66775 

22.6240 

c: 

0A262 

0 

I 

76776 

0 

c 

04225 

0 

I 

47176 

22,6250 

I; A7176 

I 

c 

05200 

0 

C 

33321 

1 

I 

76776 

22,6260 


02124 

1 

I 

45575 

1 

I 

75172 

1 

c 

01315 

22,6270 

I i 

75175 

0 

1 

76776 

0 

C 

15601 

1 

c 

04313 

22,6300 

c 

32007 

1 

I 

75176 

0 

C 

15601 

1 

c 

32015 

22,6310 

1 

44576 

0 

c 

01315 

1 

I 

45575 

1 

I 

4341 1 

22,6320 

I 

75575 

1 

I 

74423 

1 

C 

00005 

1 

c 

00001 

22,6330 

I 

75575 

1 

I 

74423 

1 

C 

00003 

1 

c 

00005 

22.6340 

I 

75575 

1 

1 

74423 

1 

C 

00001 

0 

c 

: 00003 

22 ,6350 

1 

44576 

0 

c 

00052 

0 

I 

45575 

1 

I 

; 45176 

22,6360 

I 

47175 

1 

I 

41153 

0 

C 

OI5O3 

0 

c 

! 3202? 

22.6370 

I 

56776 

1 

c 

00033 

1 

c 

00002 

0 

c; 32021 
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the right of Each wqrd; "e" denotes unused fixed memory. 
(Interpretive operator wordsi or "Ch (constants). 


1 


51102 

0 


51103 

1 


34516 

1 

02173 

0 

C; 

44OI7 

1 


20016 

1 


02124 

1 

30003 

1 


30003 

1 


30032 

0 


35501 

0 

51 m 

0 


61102 

0 


21111 

0 


3OO45 

0 

10000 

0 


445I6 

0 


21111 

0 


60045 

0 

21111 

1 


06055 

1 


444 7 5 

1 


21111 

0 

61100 

1 


06124 

0 


21111 

0 


11100 

0 

06100 

0 


41102 

1 


21111 

0 


51102 

0 

33535 

0 


36130 

0 


25777 

1 


41110 

1 

64477 

0 


06121 

0 


30575 

0 


02173 

0 

c: 44O24 

1 


30032 

0 


25777 

1 


44516 

0 

02256 

1 

C; 

00602 

0 

c; 

00562 

0 

CJ 

00553 

1 

C! 00553 

1 

C 

01064 

1 

c 

04173 

0 

c 

03146 

1 

04000 

0 

C 

33525 

0 

I 

47576 

0 

c 

33521 

1 

I: 76776 

0 

I 

47576 

0 

c 

33525 

0 

I 

47576 

0 

c; 33521 

0 

c 

01317 

0 

c 

04256 

1 

c 

33523 

0 

1! 47576 

1 

c 

05200 

0 

c: 

04260 

1 

c: 

04262 

0 

l; 45175 

0 

I 

47576 

0 

C; 

33321 

1 

I; 

66775 

1 

Ij 43772 

0 

I 

45175 

0 

I : 

70776 

0 

c; 

01323 

1 

c; 04256 

1 

I 

43772 

1 

c; 

01521 

0 

c; 

O52OO 

0 

Cl 04244 

1 

c 

05200 

0 

C 

33323 

0 

I 

76776 

0 

c: 04210 

0 

c 

04173 

0 

C 

06314 

1 

c 

31463 

1 

I; 77576 

1 

c 

15573 

1 

c 

O43I3 

1 

I 

47576 

0 

c: 33403 

1 

I 

47576 

0 

c 

33411 

0 

I 

75176 

0 

C! 15573 

1 

I 

76776 

0 

c 

04761 

0 

I 

76776 

0 

CJ 04353 

1 

c 

00052 

0 

c 

00006 

1 

c 

04321 

0 

c; 00006 

0 

c 

01523 

1 

c 

32037 

1 

I 

76776 

0 

c: 04566 

1 

c 

01525 

1 

c 

32037 

1 

I 

76776 

0 

C, 04566 

1 

c 

01521 

0 

c 

32037 

1 

I 

76776 

0 

C! 04566 

0 

c 

00052 

0 

c 

01477 

1 

I 

45176 

0 

C; 05174 

0 

I 

56776 

1 

c 

00027 

1 

c 

00002 

0 

C? 32023 

0 

I 

76776 

0 

c 

04437 

0 

I 

47576 

0 

Cl 33523 


0 

1 

1 

0 

0 

1 

0 

1 

1 

1 

1 

1 

0 

0 

1 

0 

0 

1 

1 

1 

0 

0 

0 

1 

0 

1 

0 

0 

0 

0 

1 

0 


ah^stsa yul System for agc^i: revision o of- program solrumss by 


OCTAL listing of PARAGRAPH 0 m* NItH PAHItY BIT IN BINARY At 

All valid WORd^ are basic instructions except those marked "I" 


22,6400 

I : 

56776 

1 

C; 01501 

1 

c 

00002 

0 

CJ 

32023 

22,6410 

1 : 

66776 

1 

C; 00033 

1 

c 

01477 

1 

c 

32021 

22,6420 

I ; 

42776 

1 

C: 00027 

1 

c 

01513 

1 

c 

32021 

22 , 6430 

li 

76776 

0 

C: 0443? 

0 

I 

47576 

0 

c 

33521 

2 2 ,6440 

c; 

00023 

0 

C; 05170 

1 

c 

0^453 

1 

I 

63775 

22,6450 

Cj 

32025 

1 

I ; 40576 

1 

I 

63775 

1 

I 

63176 

22 ,6460 

C: 

00021 

1 

C; 04466 

1 

I 

45175 

0 

I 

4 O 576 

22 ,6470 

c; 

00023 

0 

C; 00025 

0 

c 

32025 

1 

I 

40576 

22 v6500 

C 

04503 

0 

c; 00006 

1 

I : 

r5575 

1 

I 

74572 

22 ,6510 

I 

74572 

1 

C; 00003 

i 

C; 

00005 

1 

c 

04556 

22 ,6520 

c 

04556 

0 

I: 44576 

0 

C: 

00052 

0 

I 

45675 

22,6530 

I 

75575 

1 

1: 74572 

1 

C; 

00001 

0 

c 

00003 

22 ,6540 

c 

00005 

1 

C! 04556 

0 

I 

75575 

1 

1 ; 

7^,572 

22 ,6550 

c 

00052 

0 

I; 42575 

0 

I 

76776 

0 

c 

00006 

Z-fd ,6560 

c 

00051 

0 

C: 00011 

1 

c 

20304 

1 

c 

00051 

22 , 657O 

I 

57176 

0 

C: 00037 

0 

c 

34025 

1 

1 

64375 

22,6600 

I 

64375 

1 

I ; 63776 

1 

c 

00021 

1 

C! 

00112 

22,6610 

c 

00025 

0 

C: oolii 

0 

c 

00002 

0 

C: 00006 

22,6620 

c 

00021 

1 

C: 00111 

0 

c 

00 00 2 

0 

Cl 

34111 

22,6630 

1 

70776 

0 

C: 34112 

1 

I 

64375 

1 

1 1 

63732 

22*6640 

1 

75175 

0 

I: 40576 

1 

c 

00041 

1 

I 

41775 

22,6650 

I 

42625 

0 

C; 01513 

1 

c 

00052 

0 

c 

32021 

22, 6660 

I 

76776 

0 

C; 04437 

0 

I 

47576 

0 

c 

33521 

22 ,6670 

c 

01477 

1 

C; 00003 

1 

c 

04/25 

0 

c 

00002 

22*6700 

c 

05202 

1 

C; 04725 

0 

i 

42776 

1 

c 

; 01441 

22,6710' 

c 

32023 

1 

I; 76776 

0 

c 

04437 

0 

I 

; 47576 

22,6720 

c 

20624 

0 

C; 32701 

0 

I 

; 44576 

0 

c 

; 00052 

22,6730 

1 1 

76776 

0 

C: 047O3 

1 

I 

: *,2175 

1 

I 

! 76571 

22*6740 

1 

57116 

0 

C: 00002 

0 

I 

42175 

1 

I 

; 76576 

22,6750 

c 

00003 

1 

C; 32041 

0 

I 

57175 

0 

I 

; 6A776 

22 ,6760 

I 

75575 

1 

I; 55576 

0 

c 

01411 

1 

c 

; 01375 

22,6770 

c 

37051 

1 

Ij 41375 

0 

I 

44/76 

1 

c 

; 03035 


NASA 1021108-021 
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the right of each word; denotes unuseD fixed Memory. 


(Interpretive 

operator woRqS) or 

II C" 

(CONSTANTS) , 



1 

1 : 

64776 

0 

c 

00027 

1 

c; 

01503 

0 

I ; 

64775 

0 

0 

I : 

76776 

0 

c 

0443/ 

0 

I ; 

4/576 

0 

c; 

33525 

0 

0 

1; 

42776 

1 

c 

00027 

1 

c; 

01505 

0 

C { 

32O23 

1 

1 

I: 

44576 

0 

c 

00052 

0 

l: 

65175 

1 

I ; 

66756 

0 

i 

I; 

61056 

0 

c ; 

00021 

1 

c; 

00002 

0 

c; 

00023 

0 

I 

Cj 

00023 

0 

cs 

00002 

0 

C; 

32025 

1 

I; 

73776 

0 

1 

C! 

00025 

0 

I ; 

53775 

1 

I : 

66776 

1 

c; 

05200 

0 

1 

1 : 

45575 

1 

I : 

43411 

1 

c; 

00052 

0 

C! 

00006 

1 

1 

c 

00005 

1 

c 

00001 

0 

c; 

04556 

0 

i; 

75575 

1 

0 

1 

75575 

1 

I 

74572 

1 

C! 

OOOOl 

0 

C; 

00003 

1 

i 

I 

43576 

1 

c 

00052 

0 

c: 

00006 

1 

CI 

04552 

1 

i 

c 

04556 

0 

I 

75575 

1 

I : 

74572 

1 

C: 

00003 

1 

1 

c 

00005 

1 

c 

OOOOl 

0 

c; 

04556 

0 

I : 

44576 

0 

1 

c 

04531 

1 

I 

57574 

0 

I : 

42I7I 

0 

I; 

61576 

1 

0 

c 

32037 

1 

I 

55176 

1 

c: 

00037 

0 

c; 

34O2I 

0 

1 

I 

63776 

1 

c 

00025 

0 

c: 

00112 

0 

c; 

00002 

0 

0 

c 

00002 

0 

I 

64374 

0 

i; 

63615 

0 

1 : 

65776 

1 

1 

c 

04630 

0 

c 

34112 

1 

I; 

64375 

1 

i; 

63742 

0 

1 

I 

75175 

0 

1 

40576 

1 

CI 

00041 

1 

i; 

47575 

0 

1 

C; 

00021 

1 

c 

00111 

0 

c: 

00002 

0 

c; 

341 1 1 

1 

i 

I 

73176 

0 

c 

01477 

1 

c; 

01433 

1 

1 s 

47575 

0 

0 

I 

47575 

0 

I 

42776 

1 

C; 

01505 

0 

c: 

32023 

1 

1 

I 

42774 

0 

I 

63746 

1 

1: 

56713 

1 

c; 

01433 

1 

0 

c 

; 33525 

0 

I 

65175 

1 

l; 

66616 

0 

c; 

01525 

1 

i 

c 

: 00001 

0 

c 

: 32021 

0 

I ; 

42776 

1 

c: 

01425 

0 

0 

c 

• 33523 

0 

I 

; 75175 

0 

1 ; 

76576 

1 

c: 

01521 

0 

0 

I 

; 77576 

0 


0300/ 

0 

C! 

00401 

1 


O4OOO 

0 

0 

c 

; 00013 

0 

c 

; 2030^, 

1 

c: 

20407 

0 

i ; 

47575 

0 

1 

c 

: 00007 

0 

c 

; 2O3O4 

1 

I : 

47575 

0 

i : 

55122 

0 

0 

c 

; 32043 

1 

I 

: 55176 

1 

C: 

32045 

1 

I ; 

40576 

1 

1 

I 

: 41375 

0 

1 

; 73176 

0 

C; 

03035 

1 

c: 

03051 

0 

1 

c 

; 03051 

0 

c 

; 00002 

0 

c; 

37065 

0 

1 ; 

51576 

1 


^a^570A yUL System for agc-v; revision o of program solrumss by 


OCTAL listing OF PARAGRAPH # 112, WITH PARIlY BIT IN BINARY AT 

All valid woRp^ basic instructions except those marked »*1'' 


22, 7000 

C 

0A765 

1 

I 

53573 

0 

I 

67565 

0 

l; 55561 

22,7010 

C 

00007 

0 

c 

00007 

0 

c 

00003 

1 

l: 65576 

22 , 7020 

I 

75376 

1 

c 

00015 

0 

c 

03036 

1 

c: 32031 

22,7030 

c 

03052 

0 

c 

77777 

0 

c 

00031 

0 

c; 00002 

22 f 70A0 

I 

50576 

0 

C! 

0501A 

i 

1 

40576 

1 

I! 75175 

22,7050 

I 

A7576 

0 

C; 

32007 

i 

I 

45176 

0 

C; 05174 

22 ,7060 

c 

32001 

1 

I : 

45176 

0 

c 

OOOOl 

0 

C; 00021 

22 ,7070 

c 

0AA37 

0 

I: 

76576 

1 

c 

20325 

1 

c; 33521 

22 WlOO 

c 

OOOOl 

0 

c 

00007 

0 

c 

00004 

0 

c; 00004 

22,7110 

I 

AA576 

0 

c 

00052 

0 

I 

77576 

0 

03007 

22,7120 

c 

01513 

1 

c 

0141 7 

1 

c 

00002 

0 

C; 32027 

22,7130 

Cl 

00052 

0 

c 

32023 

1 

I 

42776 

1 

c: 00027 

22 » 71aO 

I 

76576 

1 

c 

20325 

1 

c 

33521 

1 

1; 41772 

22,7150 

c 

00027 

1 

c 

01513 

1 

c 

01417 

1 

C; 00003 

22 , 7l60 

c 

33523 

0 

I 

44576 

0 

c 

00052 

0 

I; 77576 

22 , 7170 

c 

26075 

1 

c 

05260 

0 

c 

U4061 

1 

c; 00000 

22» 7200 

c 

; 00000 

1 

c 

: 12525 

0 

c 

: 12525 

0 

07203 

22*7210 


§ 



& 



s 



22*7220 





e 



@ 


i 

22*7230 


§ 






$ 


§ 

22*72A0 


§ 



@ 



§ 


§ 

22*7250 





§ 



9 


§ 

22*7260 





§ 





§ 

22*7270 





§ 



§ 


s 

22*7300 


€ 



§ 






22*7310 


§ 



§ 



& 


g 

22*7320 


§ 



& 





s 

22*7330 


§ 



§ 





& 

22 *73A0 





§ 





% 

22*7350 





€ 






22*7360 


& 






§ 


Q 

22*7370 





§ 



§ 
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tHe right of each word; denotes unused fixed Memory. 
(Interpretive operator woRpS) or "C" (constants). 


0 

I 

54676 

1 

c 

OOOO 7 

0 

c; 

00037 

0 

C: 

D0023 

0 

c 

00037 

0 

I 

75376 

1 

c; 

OOOOl 

0 

c; 

03022 

i 

I 

7537A 

0 

I 

50642 

1 

I : 

44725 

i 

c; 

00031 

0 

c 

00037 

0 

c 

37241 

1 

1 : 

51576 

1 

c; 

O5O4I 

0 

I 

45572 

0 

c 

01417 

1 

c: 

00052 

0 

C I 

04475 

0 

c 

32045 

1 

I 

47575 

0 

1 ; 

73072 

0 

Cj 

00003 

i 

I 

45176 

0 

c 

OOOO3 

1 

c: 

00023 

0 

I : 

76776 

1 

1 

42773 

1 

I 

63713 

1 

1 ; 

63746 

1 

1 : 

7377I 

0 

c 

05113 

1 

c; 

05113 

1 

c; 

20325 

1 

c; 

33523 

0 

c 

OO4O2 

1 


02124 

1 

I: 

41775 

i 

1 1 

73026 

0 

I 

42775 

1 

1 . 

4/02 5 

0 

c: 

00027 

I 

c: 

01477 

1 

c 

OI5O5 

0 

C: 

32021 

0 

II 

76776 

0 

c: 

04437 

0 

I 

42716 

i 

I 

63116 

1 

I ; 

71756 

0 

I ; 

76576 

1 

c 

00004 

0 

C 

05164 

1 

c; 

05164 

1 

C ; 

20325 

0 


03007 

0 

c 

OO4O3 

0 


02124 

1 

c: 

05520 

1 

c 

; 00000 

1 

c 

37777 

1 

c: 

37777 

1 

c; 

20000 

1 


07204 

0 

CKSM 75A52 

0 


e 



@ 



e 



@ 






@ 



§ 









& 



§ 






@ 



@ 



e 






& 



e 



& 



§ 



§ 






§ 



§ 



e 



§ 






§ 



§ 



@ 



& 



& 



§ 



e 



§ 



@ 






§ 



& 



§ 






& 



§ 



§ 



& 









@ 



e 



e 






@ 



§ 



§ 



§ 









& 



e 



§ 






e 


0 

1 

0 

1 

0 

I 

o 

1 

0 

1 

I 

0 

1 

1 

0 

0 


YUU SYSTEM FOR A(3C4; REVISION 0 OF PROGRAM SOLRUMSS BV 


oCtal listinc^ qf ParaGraph # ii4» wijh parit^ bit in binary at 
ALL valid Words are basic instructions except those marked ”I" 


23*6000 

I : 

56775 

1 

I 

465A2 

0 

c 

01265 

1 

c 

00012 

23 t bO 1 0 

I: 

70776 

0 

c 

07431 

0 

c 

01263 

1 

c 

00015 

23,6020 

I : 

76776 

0 

c 

06066 

1 

I 

^6776 

0 

c 

06146 

23,6030 

c: 

00070 

0 

c 

0012A 

0 

c 

OllOl 

0 

I 

63776 

23*60A0 

I : 

63732 

1 

I 

63631 

0 

c 

01107 

0 

c 

00007 

23,6050 

I : 

56633 

1 

I 

70672 

0 

I 

62 776 

0 

c 

00002 

23,6060 

1 : 

63631 

0 

c 

01101 

0 

c 

OIIO 7 

0 

c 

00003 

23*6070 

Ci 

00013 

0 

c 

01137 

0 

I 

63776 

1 

c 

00037 

23*6100 

c: 

01263 

1 

C! 

00012 

1 

c 

01255 

1 

I ; 

56772 

23*6110 

C: 

07AA5 

0 

C; 

OOOO 4 

0 

c 

01255 

1 

CJ 

00013 

23,6120 

c: 

OOOll 

1 

I; 

55775 

1 

I 

63776 

1 

c; 

OOOI 7 

23,6130 

I : 

65732 

1 

I : 

64715 

0 

I 

46542 

0 

c; 

07445 

23*61 AO 

a 

00002 

0 

c 

0115: 

Q 

c 

33151 

1 

I 

40576 

23*6150 

I; 

63535 

1 

I 

45572 

0 

c 

00013 

0 

c 

00005 

2 3 , 6 1 60 

C: 

06312 

1 

I 

47572 

1 

I 

64716 

0 

I 

64716 

23,6170 

c; 

01151 

0 

c 

00002 

0 

c 

01151 

0 

c 

00002 

23*6200 

l; 

64774 

1 

I 

63722 

0 

I 

63631 

0 

c 

01151 

23*6210 

C: 

32026 

1 

I 

47574 

1 

I 

64672 

0 

1 

A6542 

23,6220 

c: 

00007 

0 

c 

01151 

0 

I 

44576 

0 

c 

01273 

23,6230 

I : 

77576 

0 


04000 

0 

I 

A7573 

0 

I 

65132 

23*62a0 

C! 

06243 

1 

c 

06A07 

1 

I 

6A772 

1 

1 

63631 

23,6250 

C; 

00030 

1 

c 

00005 

1 

c 

01151 

0 

c 

00015 

23,6260 

I : 

63631 

0 

I 

70742 

1 

c 

00026 

0 

c 

OOOll 

23*6270 

n 

7 O 776 

0 

c 

00021 

1 

c 

00023 

0 

c 

01151 

23*6300 

C: 

00002 

0 

c 

14000 

1 

c 

00000 

1 

c 

10000 

23,6310 

C; 

00000 

1 

I 

47576 

0 

c 

32033 

0 

I 

47574 

23*6320 

1 ; 

47573 

0 

I 

647l6 

0 

I 

A6526 

1 

I 

55 776 

23,6330 

1 : 

56775 

1 

I 

46576 

1 

c 

00031 

0 

c 

00003 

23*6340 

C: 

06370 

0 

I 

55774 

0 

I 

65666 

1 

I 

70601 

23 ,6350 


05554 

0 

c 

00012 

1 

c 

26501 

1 

c 

07463 

23,6360 

C: 

77554 

0 

c 

74242 

0 

c 

00010 

0 

c 

05475 

23,6370 

c; 

00012 

1 

c 

32101 

0 

c 

17270 

1 

c 

65431 
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the right qF Each woko; ”6" denoted unused fixed memory. 


(Interpretive operator words) or «C" (Constant^), 


1 

c 

01145 

0 

c 

33261 

1 

I 

6A77A 

1 

I : 

56631 

0 

0 

c 

01147 

1 

c 

33147 

0 

I 

76776 

0 

C: 

06027 

1 

1 

I 

76776 

0 

c 

06225 

1 

I 

73575 

1 

I : 

67553 

0 

1 

c 

00037 

0 

c 

00002 

0 

I 

67I73 

0 

I : 

46522 

0 

0 

c 

00004 

0 

c 

07445 

0 

c 

00002 

0 

I 

47573 

0 

0 

c 

07A45 

0 

c 

OOOOA 

0 

c 

00007 

0 

I 

42775 

1 

1 

1 

40576 

1 

I 

73175 

0 

I 

74412 

0 

c 

01131 

0 

0 

c 

00002 

0 

c 

33255 

0 

I 

56775 

1 

I 

46512 

0 

0 

I 

62732 

0 

I 

55666 

1 

I 

55661 

0 

1 

63776 

1 

0 

c 

00021 

1 

c 

00021 

1 

c 

06306 

1 

c 

00002 

0 

1 

c 

00021 

1 

c 

00006 

1 

I 

47572 

1 

I 

65666 

1 

0 

c 

77777 

0 

c 

0 7445 

0 

c 

77777 

0 

c 

77777 

0 

1 

1 

47571 

1 

I 

51031 

1 

I 

64716 

0 

I 

46555 

0 

1 

c 

00070 

0 

c 

00021 

1 

c 

00124 

0 

c 

01273 

0 

0 

I 

64716 

0 

1 

46576 

1 

c 

01151 

0 

c 

00005 

1 

0 

c 

32030 

0 

I 

47575 

0 

I 

55776 

1 

c 

OOOll 

1 

0 

c 

00021 

1 

c 

00006 

1 

c 

01151 

0 

c 

00003 

1 

0 

c 

00015 

0 

c 

00003 

1 

I 

55775 

1 

I 

70776 

0 

0 

I 

47575 

0 

I 

65776 

1 

c 

01261 

0 

c 

32021 

0 

1 

I 

73641 

0 

I 

76776 

0 

c 

06300 

1 

c 

06407 

1 

0 

I 

65722 

0 

I 

5351a 

1 

I 

A6576 

1 

c 

OOOI 3 

0 

0 

c 

00004 

0 

c 

00001 

0 

c 

32023 

1 

I 

64774 

1 

1 

c 

00002 

0 

c 

77777 

0 

c 

00007 

0 

I 

62775 

0 

0 

c 

33151 

1 

I 

76776 

0 

c 

06023 

0 

c 

00000 

1 

0 

c 

00000 

1 

c 

12525 

0 

c 

: 12525 

0 

c 

O 2 OOO 

0 

1 

I 

76443 

0 

I 

A6576 

1 

c 

: 06351 

0 

c 

32031 

1 

1 

c 

00033 

1 

c 

00002 

0 

c 

; 06304 

0 

c 

00031 

0 

1 

I 

45174 

1 

1 

7 64 A 3 

0 

I 

: 46576 

1 

c 

00033 

1 

1 

c 

00033 

1 

c 

00031 

0 

c 

: 06310 

0 

c 

! 70707 

0 

1 

c 

60724 

0 

c 

60210 

1 

c 

; 03010 

0 

c 

J 26256 

1 

1 

c 

77777 

0 

c 

66460 

0 


04024 

0 


05554 

0 

1 

c 

40174 

1 

c 

OI 7 IO 

0 

c 

I 10660 

0 

c 

; 77676 

0 


4B^b7flA YUt- System for agc^: revision o of program solrumss by 


octal listing of paragraph # 115, with PARIjT bit in binary At 
All valid words arl basic instructions except those marked *'1" 


23 ,6400 

C 

52270 

0 

c: 

00004 

0 

c: 

21652 

0 

c; 

7 7777 

23,6410 

I 

4 7166 

0 

C; 

0007 D 

0 

C: 

00032 

0 

c: 

00124 

23,6420 

I 

50622 

1 

C; 

00023 

0 

C : 

00030 

1 

c; 

00004 

23 ,64 30 

I 

50642 

1 

C: 

01101 

0 

C; 

33131 

1 

l: 

47575 

23*6440 

I 

63631 

0 

1 

66672 

1 

I 

62 766 

1 

I : 

44776 

23,6450 

C 

00003 

1 

C 

00021 

1 

C 

00001 

0 

Cj 

00004 

23 ,6460 

C 

00021 

1 

C 

00002 

0 

C 

00026 

0 

c; 

00021 

23 ,6470 

I 

44576 

0 

c 

01272 

1 

I : 

73573 

1 

I : 

67426 

23*6500 

C! 

01153 

1 

C; 

00015 

0 

c 

01131 

0 

c: 

01306 

23,6510 

c 

01304 

1 

C; 

06516 

0 

I 

75176 

0 

C: 

01161 

23,6520 

I 

45176 

0 

C! 

00037 

0 

C 

33255 

0 

1 : 

72776 

23,6530 

I 

46576 

1 

C; 

01161 

0 

c 

00002 

0 

c: 

00070 

23*6540 

c 

01255 

1 

C: 

00047 

1 

c 

00002 

0 

I : 

73176 

2 3 ,6550 

c 

33257 

1 

h 

47574 

i 

1 

577O6 

1 

I; 

56631 

23 ,6560 

I 

6O5OI 

0 

I ! 

56511 

1 

I 

47470 

1 

C: 

00050 

23 ,6570 

c 

00002 

0 

1 i 

47575 

0 

I 

56 631 

0 

C! 

00003 

23*6600 

c 

01161 

0 

c 

OOOO2 

0 

I 

47575 

0 

1 : 

55776 

23,6610 

I 

47575 

0 

I 

53066 

i 

c 

00013 

0 

I ; 

47575 

23,6620 

I 

55716 

1 

I 

7O7I2 

1 

I 

55/66 

0 

CJ 

00013 

23,6630 

c 

00017 

1 

Cl 

0000/ 

0 

c 

01161 

0 

i; 

45775 

23*6640 

I 

57631 

1 

I: 

61745 

0 

I 

61505 

0 

I ; 

61505 

2 3 ,6650 

c 

00003 

1 

C: 

00050 

L 

C 

00052 

0 

CJ 

00051 

23,6660 

I 

44376 

0 

c: 

00077 

i 

C 

33203 

0 

I! 

75176 

23,6670 

c 

33255 

0 

Ii 

73575 

1 

I 

675l6 

1 

c: 

00070 

23*6 700 

I 

55776 

1 

c 

01157 

0 

c 

07435 

1 

I J 

51174 

23,6710 

c 

07433 

1 

c 

06302 

0 

I 

47574 

1 

I ; 

5566 6 

23,6720 

I 

55775 

1 

I 

65776 

1 

c 

00001 

0 

c: 

07231 

23,6730 

I 

55770 

1 

I 

65/22 

0 

I 

63672 

1 

I J 

62742 

23,6740 

c 

07215 

0 

c 

77777 

0 

c; 07443 

0 

c: 

00003 

23,6750 

c 

00003 

1 

c 

01255 

1 

C 

: 00003 

1 

Cl 

01 153 

23,6760 

c 

07443 

0 

c 

77777 

0 

C 

: 00002 

0 

c: 

00003 

23*6770 

c 

07441 

1 

c 

00006 

1 

C 

! 77777 

0 

c; 

01255 


NASA 102UOB-O21 DEC A, 1966 


tH£ right of each woHDi ”§« DeNote^ unuseO fixed 


(INTERPRETIVE 

operator WORdS) or 

«C" 

(CONSTANTS) 

0 

C: 

71323 

0 


O4O 2 4 

0 

I : 

73574 

0 

I 

0 

C; 

00026 

0 

c 

00001 

0 

1 ; 

66774 

0 

I 

0 

c: 

01107 

0 

c 

77777 

0 

c; 

00002 

0 

I 

0 

li 

71116 

1 

c 

00002 

0 

c; 

32021 

0 

I 

1 

c 

00013 

0 

c 

00030 

1 

c: 

00005 

1 

c 

0 

1 

56773 

1 

I 

66712 

0 

Ij 

?5642 

0 

1 

1 

c 

01107 

0 

c 

77777 

0 

c: 

00002 

0 

c 

0 

I 

5O75I 

1 

I 

73535 

0 

c: 

01312 

0 

c 

0 

C; 

01313 

1 

c; 

01310 

1 

c; 

33161 

1 

I 

0 

C; 

36422 

0 

I; 

73176 

0 

C: 

01153 

1 

c 

1 

C; 

00123 

1 

I : 

45773 

0 

1: 

67155 

1 

I 

0 

c: 

00124 

0 

c: 

00051 

0 

1 J 

57775 

0 

I 

0 

C: 

01161 

0 

c; 

33161 

1 

1 ; 

45176 

0 

c 

0 

C; 

00050 

1 

cs 

7777 7 

0 

C; 

00002 

0 

I 

1 

C: 

01307 

1 

c; 

00047 

1 

C: 

01310 

1 

c 

1 

I ; 

4277A 

0 

1: 

63631 

0 

I J 

65776 

1 

c 

1 

C: 

00005 

1 

I 

47575 

0 

1; 

70776 

0 

c 

0 

I: 

63742 

0 

c 

00002 

0 

C; 

06304 

0 

I 

0 

C: 

07445 

0 

c 

0001 1 

1 

c: 

00002 

0 

c 

0 

I: 

50776 

1 

c 

01153 

1 

c; 

00004 

0 

I 

0 

I 

47166 

0 

c 

00001 

0 

CJ 

00015 

0 

c 

0 

C 

01310 

1 

c 

01310 

1 

C! 

00021 

1 

I 

0 

C 

01161 

0 

c 

33153 

0 

1 J 

45176 

0 

c 

0 

C 

00124 

0 

c 

01255 

1 

CJ 

00002 

0 

c 

1 

1 

63666 

1 

I 

66776 

1 

CJ 

01157 

0 

c 

I 

1 

63776 

1 

c 

01157 

0 

Cl 

07211 

1 

c 

0 

I 

47575 

0 

I 

55666 

1 

C! 

01157 

0 

c 

1 

I 

55672 

1 

I 

62742 

1 

I J 

75776 

0 

c 

1 

c 

00003 

1 

c 

01255 

1 

c: 

00005 

1 

c 

1 

c 

33153 

0 

I 

64774 

1 

1; 

63672 

1 

1 

1 

c 

01255 

1 

I 

56774 

0 

I ; 

55712 

0 

I 

1 

c 

77777 

0 

c 

01157 

0 

c; 

33157 

1 

I 


PAgE b5S 


Memory, 


; 63535 1 
! 63766 0 
! A7575 0 
: 64772 1 

: 01151 0 
; 44776 1 
: 33137 1 
i 01307 1 

67776 0 
33153 0 

67^76 0 
56776 I 

; 00037 0 
{ 70573 I 
t 00003 1 
; 01153 1 

; 06304 0 
: 70773 0 
; 06302 0 
: 64771 1 

: 00052 0 
; 47575 0 
; Ol25f 0 
; 33255 0 

; 00004 0 
; 00002 0 
! 07213 0 
; 00003 1 

; O74.4I 1 

; 62742 1 
: 70726 0 
; 51172 1 


4b4578A yul System for agc<»: revision o of program solrumss by 


OCTAL listing OF PARAGRAPH # 116i rtITH PARlfV BIT IN BINARY AT 

All valid words are basic iNSTRUCrlONS except those marked "I" 


23 

, ^000 

I 

51076 

1 

1 

61766 

1 

I 

63420 

1 

I 

50/76 

23 

« 7010 

C 

00015 

0 

c 

ooaol 

0 

c 

01203 

1 

c 

33203 

23 

* 7020 

C 

00003 

1 

c 

01255 

i 

c 

07025 

1 

c 

O 7 IO 4 

23 

»7030 

C 

OOOO 3 

I 

c 

01255 

i 

c 

00007 

0 

c 

07451 

23 

» 70A0 

I 

6A742 

1 

I 

64/42 

1 

I 

64/42 

1 

I 

63643 

23 

» ?050 

c 

00033 

1 

c 

07457 

0 

c 

00033 

1 

c 

07461 

23 

n 7060 

c 

07A65 

1 

I 

4177** 

0 

1 

75420 

0 

I 

74/76 

23 

t7070 

c 

01137 

0 

I 

47573 

u 

I 

71166 

0 

I 

75765 

23 

»7100 

c 

00001 

0 

c 

OI 2 O 3 

i 

C: 

33203 

0 

I 

73575 

23 

t7llO 

I 

66756 

0 

I 

76776 

0 

C! 

01115 

0 

c 

06304 

23 

»7120 

I 

67415 

0 

1 

42576 

0 

C: 

06001 

0 

c 

01271 

23 

* 7130 

c 

00002 

0 

I 

7517b 

0 

C: 

01115 

0 

c 

33153 

23 

* 71A0 

C 

33306 

1 

I 

44575 

0 

C 

01272 

1 

I 

45775 

23 

»7l50 

c 

33101 

1 

I 

47576 

0 

c 

33131 

1 

I 

75574 

23 

»7l60 

c 

00001 

0 

c 

01137 

0 

c 

33107 

1 

I 

47576 

23 

t7l70 

C 

00003 

1 

c 

07227 

1 

c 

33145 

1 

I 

47576 

23 

*7200 

I 

A0576 

1 

c 

07176 

0 

I 

45776 

0 

c 

01203 

23 

*7210 

C 

22525 

0 

c 

12525 

0 

c 

22000 

1 

c 

00000 

23 

*7220 

c 

01203 

1 

c 

00002 

0 

c 

01167 

0 

c 

33175 

23 

* 7230 

c 

25252 

0 

C; 

25253 

1 

I 

75773 

0 

I 

75622 

23 

*72A0 

c 

07231 

0 

c 

00002 

0 

c 

01123 

0 

c 

01265 

23 

* 7250 

I 

75622 

0 

I 

50615 

0 

I 

75576 

1 

c 

01203 

23 

.7260 

C 

00002 

0 

c 

01123 

0 

c 

00002 

0 

c 

07314 

23 

.7270 

c 

37454 

0 

I 

50576 

0 

c 

07304 

1 

I 

75176 

23 

* 7300 

c 

33123 

1 

I 

44576 

0 

c 

01305 

0 

1 

7A176 

23 

*7310 

c 

33123 

1 

I 

76 776 

0 

c 

07132 

0 

I 

47576 

23 

* 7320 

c 

00012 

1 

c 

01145 

0 

c 

33145 

1 

I 

67776 

23 

t 7330 

I 

74572 

1 

I 

54565 

0 

I 

67535 

0 

I 

42565 

23 

» /3A0 

c 

01271 

1 

c 

01272 

1 

c 

00002 

0 

c 

00001 

23 

* 7350 

c 

00003 

1 

c 

01167 

0 

c 

33167 

1 

I 

70775 

23 

. 7360 

c 

01306 

0 

c 

33265 

0 

1 

75774 

1 

I 

45642 

23 

*7370 

c 

01123 

0 

c 

01265 

1 

c 

01115 

0 

c 

33153 


NASA 1021106-021 


DEC A* 1966 


page 6S6 


the right of EACH wqkd; "e” Denote^ unused fixed memory. 


( interpretive 

operator wORdS) or 

«C" 

(CONSTANTS) * 



1 

c 

01255 

1 

c 

00047 

1 

c: 

O7437 

0 

c: 

01153 

1 

Q 

I 

56774 

0 

I 

66616 

0 

1 ; 

76776 

0 

c: 

07475 

0 

0 

I 

56774 

0 

I 

657l6 

1 

I : 

62716 

0 

CJ 

07447 

1 

0 

c 

00003 

1 

c 

32033 

0 

l; 

47567 

0 

I : 

64742 

1 

0 

I 

51116 

0 

I 

61776 

0 

c; 

07453 

1 

c; 

07455 

1 

0 

c 

00033 

1 

c 

07463 

1 

c; 

00002 

0 

C; 

OOOO3 

1 

1 

c 

07467 

0 

c 

01131 

0 

C! 

00030 

1 

c; 

OOO55 

1 

1 

I 

44242 

0 

c 

77777 

0 

C! 

mil 

0 

c; 

00002 

0 

1 

I 

76376 

1 

c 

01306 

0 

CJ 

16405 

1 

1 : 

71174 

0 

0 

c 

07117 

1 

c 

07144 

1 

I; 

75573 

1 

I : 

67565 

0 

1 

c 

06473 

1 

c 

0L272 

1 

c; 

00002 

0 

c: 

O7I32 

0 

0 

I 

45176 

0 

c 

07227 

1 

CJ 

33265 

0 

1 : 

47576 

0 

0 

I 

50776 

1 

c 

01115 

0 

C! 

00015 

0 

c; 

01131 

0 

0 

I 

75020 

1 

I 

507/6 

1 

C; 

00011 

1 

C; 

01123 

0 

0 

c 

33137 

1 

I 

75575 

1 

i; 

55423 

1 

c; 

00016 

0 

0 

c 

33151 

1 

I 

47576 

0 

c; 

3626 1 

1 

1 ; 

51575 

1 

1 

c 

00004 

0 

c 

33167 

1 

i; 

/6776 

0 

c: 

07354 

1 

1 

c 

01200 

1 

c 

00000 

1 

1 1 

45775 

0 

Ij 

50776 

1 

1 

I 

76776 

0 

c 

07346 

1 

C J 

00000 

1 

C! 

00000 

1 

0 

I 

50766 

0 

I 

50776 

1 

c; 

01167 

0 

c; 

01265 

1 

1 

c 

01115 

0 

c; 

33115 

1 

U 

45772 

1 

I ; 

50766 

0 

1 

c 

00004 

0 

c 

01175 

0 

C! 

01265 

1 

c; 

07231 

0 

0 

c 

00001 

0 

c 

37564 

1 

I : 

75176 

0 

c: 

01115 

0 

0 

c 

01002 

1 

c 

33115 

1 

1 : 

75176 

0 

c; 

01010 

1 

1 

c 

03454 

1 

c 

33115 

1 

l: 

74176 

1 

c: 

03564 

0 

0 

c 

33123 

1 

I 

56775 

1 

I ; 

46542 

0 

Cj 

01265 

1 

0 

c 

01304 

1 

c 

07302 

1 

I : 

76776 

0 

c: 

07331 

1 

1 

I 

76776 

0 

c 

00045 

0 

c; 

OOOO7 

0 

c; 

07377 

0 

0 

c 

07304 

1 

1 

; 45775 

0 

1: 

50776 

1 

c; 

OI2O3 

1 

0 

I 

63535 

1 

c 

; 01263 

1 

C: 

01265 

1 

c; 

77764 

1 

0 

I 

75642 

0 

c 

: 01203 

1 

c; 

01265 

1 

CJ 

00002 

0 

0 

I 

44576 

0 

c 

; 01271 

I 

1 1 

45776 

0 

c; 

01 153 

1 


* ' ^ 
' I 


^bA57aA YL^L SySTLM FOR AGCA; REVISION 0 OF pROQRAM SOLRUM55 By 


octal listing of paragraph 0 U7t ^ITH PARITY BIT IN BINARY AT 

All valid words are basic instructions EXCLPT those marked "I” 


23, 7A00 

C; 

00005 

1 

II 

72174 

0 

1 : 

4 O 766 

1 

I 

74776 

23, 7AIO 

I ; 

57631 

1 

I : 

61766 

1 

I : 

6 A 5 1 1 

0 

I 

44351 

23,7A20 

c; 

77777 

0 

C: 

00051 

0 

C: 

00004 

0 

c 

00002 

23, 7 A30 

c: 

24214 

0 

c: 

1 124A 

0 

C; 

36 000 

1 

c 

00000 

23»7A^0 

C; 

77711 

0 

C: 

71033 

1 

C: 

23377 

0 

c 

06703 

23,7A50 

C: 

31000 

0 

C; 

00000 

1 

C: 

70345 

1 

c 

62314 

23,7460 

Cl 

20033 

0 

C I 

11303 

1 

C; 

01000 

0 

c 

00000 

23,7470 

C; 

00000 

1 

C; 

00000 

1 

Ci 

37002 

1 

c 

12436 

23, 7500 

CKSM 

50424 

0 


e 



Q 



a 

v- 

23, 7510 


& 






& 



3 

23,7520 





e 






g 

23,7530 





§ 






e 

23, 7540 





§ 



9 



9 

23,7550 








S 



9 

23 , 7560 


§ 









g 

23,7570 


§ 



§ 



g 



g 

23»7600 


§ 



Q 



g 



g 

23,7610 


@ 






a 



a 

23*7620 


@ 






9 



g 

23,7630 


$ 






9 



g 

23,7640 








§ 



g 

23,7650 


§ 



§ 



9 



g 

23,7660 








9 



3 

w 

23,7670 


§ 






9 



9 

23,7700 








j 



9 

23,7710 








@ 



9 

tap* 

23,7720 


§ 






9 




23,7730 


§ 






S 



§ 

23,7740 





& 



3 



€i 

23,7750 





€ 



9 



g 

23,7760 


§ 






Q 



& 

in* 

23,7770 


§ 



lii 



9 



& 


NASA 102110a-021 


DEC A * 1966 


PAgE 857 


tHe right of each rtoROj '*©•' Denotes unused fixed memory. 


(INTERPRETIVE 

operator wORdS) or 

"C 

" (CONSTANTS), 


1 C; 02421 

1 

c 

01153 

1 

c: 

07435 

1 

i; 64772 

1 

0 C; 00035 

1 

c 

00037 

0 

CJ 

00051 

0 

C; 06304 

0 

D Ct 00051 

0 

c 

33203 

0 

n 

76376 

1 

C! 16405 

1 

1 c: 30000 

1 

c 

00000 

1 

C! 

12577 

1 

c; 24106 

0 

0 C: 20000 

0 

c 

00000 

1 

c: 

1 4467 

1 

c; 00000 

i 

0 C; 25201 

0 

c 

06602 

0 

C; 

54046 

1 

C; 46744 

1 

1 C; 00000 

1 

c 

23042 

0 

c; 

00000 

1 

c; 00000 

1 

0 C; 14777 

0 

c 

00000 

1 


07476 

0 

07477 

1 

§ 



g 



g 


g 


§ 



g 



g 


g 


§ 



g 



g 


g 





§ 



g 


g 


g 



g 



g 


g 


@ 



g 



g 


g 


e 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 
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g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 
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g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 


g 



g 



g 


g 



<»645.78A YUU system FOR AGCi*: REVISION 0 OF PROGRAM SOLRUM55 BY 


qLtaL LlSxIuG qF paragraph 4 120f wIjH PAKItT Blj IN BINARY AT 

all Valid -voRUS are basic instructions e^lept those marked "I” 


2a»6000 


0565A 

0 

c: 

30223 

1 


02362 

1 

c; 00011 

2 A * 6 0 1 0 

C; 

01A67 

0 

C: 

331A5 

1 

1 

A5176 

0 

C: 01630 

2 A 1 bO 2 0 

I ! 

75176 

0 

c: 

01b32 

1 

C 

33115 

1 

i; 76776 

2 A » 6 0 3 O 

C; 

01622 

0 

C: 

33115 

1 

I 

T6776 

0 

c: 13A50 

2 A 1 6 0 A 0 

C; 

30331 

0 


03066 

1 


AA5 1 6 

0 

02312 

2A*6050 


10000 

0 


0212A 

1 


OADOO 

0 

1: 75176 

2 A * 6 06 0 

C; 

00007 

0 

C: 

12001 

U 

I : 

75176 

0 

c: 01315 

2 A » 6 O 7 O 

c; 

00007 

0 

C; 

33315 

0 

I ; 

76776 

0 

c; 12041 

2A*bl00 

c: 

10113 

0 

Cl 

10106 

1 


03A16 

1 

c: 00001 

2 A * b 1 1 0 


0212A 

1 

C: 

00016 

0 

C; 

00262 

1 

c: 25271 

2A,6l20 


361 Al 

0 


51460 

1 


361A0 

1 

51A67 

2 A » 6 1 3 O 

C; 

6662 I 

1 


355 O 3 

1 


02312 

0 

c; 00002 

2 A f 6 1 aO 

c; 

50143 

1 

C: 

00001 

0 

C: 

30a26 

1 

03373 

2 A » b 1 5 0 


3AA7 r 

1 


02312 

0 

C! 

OOOOA 

0 

02256 

2 A * b 1 6 0 


66176 

1 


61556 

0 


51 A60 

1 

36200 

2A,6l70 


02312 

0 

C; 

ooooa 

0 


U3A05 

0 

c; aDaoo 

2At6200 

c; 

50201 

1 


36352 

0 


U2173 

0 

c: 50327 

2 A » 6 2 1 0 

C; 

50225 

1 


35362 

0 


02312 

0 

C; 0000a 

2A*6220 

C: 

OOOO 5 

1 


3A513 

1 


02312 

0 

c: 0000a 

2A»6230 


50672 

1 


OAOOO 

0 

I 

A357A 

0 

l: 7 O 7 A 2 

2A,62A0 

c: 

01557 

1 

C: 

10351 

1 

c 

01115 

0 

c: 33211 

2 A 1 62 5 O 

C; 

00002 

0 

C: 

33656 

1 

I 

52775 

0 

I: AA776 

2 A * 6 2 6 0 

i: 

77576 

0 


02276 

0 

C 

03504 

0 

OAOOO 

2A,6270 

CI 

0 1 66 A 

1 

C: 

33107 

I 

I 

76776 

0 

c: 20010 

2A»6300 

c; 

01215 

0 

C; 

OOOO 2 

0 

c 

32766 

1 

I; 76575 

2A*6310 

C; 

22001 

0 

It 

66775 

i 

I 

A3775 

0 

c: 01a57 

2a »6320 


02276 

0 

C: 

0110a 

0 


03151 

1 

i: 77576 

2Av6330 

c: 

aoaoo 

1 


36353 

i 


02173 

0 

c; 5 O 335 

2A»63A0 


03A05 

0 

C: 

AOAOO 

1 


03A30 

0 

c; 20000 

2A,6350 

C; 

00000 

1 

C: 

273A0 

0 

C 

: 01750 

1 

C: 2AA0A 

2 A * 6 3 6 0 


05750 

0 


03A52 

1 

C 

: aOOOO 

0 

03A62 

2A*b370 


02312 

0 

C; 

00005 

1 


3A502 

I 

7 O 6 A 5 
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the RICH] qF each rtQRDi DENOTES UNUSED FIXED MEMqRY. 


(Interpretive operator t^oRoS) or “Ct* (Constants), 


i 


O 35 I 6 

0 


OaOOO 

0 

i; 

66776 

1 

CJ 

01463 

1 

0 

c 

33537 

0 

I : 

45176 

0 

c: 

01620 

1 

Cj 

33527 

1 

0 

c 

13A50 

1 

I : 

47576 

0 

CJ 

33541 

1 

1 J 

75 I 76 

0 

1 

I 

A7576 

0 

c: 

33531 

0 

1 ; 

77576 

0 


05654 

0 

o 

C! 

OOOOA 

0 


0212A 

1 


36111 

0 


70647 

0 

0 

Ci 

013A5 

1 

C: 

33323 

0 

1 : 

75575 

1 

1; 

76776 

0 

i 

c: 

33345 

0 

1 : 

47575 

0 

1 : 

74765 

0 

CI 

01323 

1 

i 

1 ; 

7117A 

0 

I : 

66756 

0 

It 

77576 

0 

c: 

01331 

1 

0 


0212A 

1 

I : 

77576 

0 


03430 

0 

c; 

OOOOl 

0 

1 


03A16 

1 

C: 

AOOOO 

0 


36142 

0 


51461 

0 

0 


057A2 

0 

c: 

10552 

1 


32146 

0 


0204fa 

1 

0 


355 O 2 

0 


02312 

0 

CJ 

OOOO 4 

0 


02256 

1 

0 

C; aOaOO 

1 


36175 

1 


02173 

0 

CJ 

50154 

1 

1 


36177 

o 


61557 

1 


51461 

0 


35501 

0 

o 


51A67 

0 


057A2 

0 

CJ 

10552 

1 


34475 

0 

1 


02256 

1 

c: 

01750 

1 

c; 

77776 

1 

c: 

43347 

0 

1 


03373 

0 

C! 

AOAOO 

1 


34373 

1 


02046 

1 

0 


A0036 

0 


50666 

1 


44516 

0 


02312 

0 

0 


02256 

1 


02362 

1 

c; 

00022 

1 


32566 

0 

1 

1 : 

66776 

1 

c: 

00023 

0 

Cl 

10310 

1 

c; 

01463 

1 

0 

I 

52775 

0 

i; 

44776 

1 

CJ 

OllOl 

0 

CI 

01052 

1 

1 

c 

01107 

0 

C: 

01052 

1 

CJ 

00002 

0 

c; 

3366A 

0 

0 

I 

75176 

0 

c; 

01656 

0 

CJ 

33101 

1 

I J 

75176 

0 

1 

I 

75176 

0 

C! 

01223 

0 

c; 

3277A 

1 

1 1 

AA776 

1 

1 

I 

: 76776 

0 

c; 

20265 

1 

CJ 

21643 

0 

1 : 

76776 

0 

0 

c 

: 10356 

0 

C; 

10324 

0 


02362 

1 

c: 

00023 

0 

0 


03A7A 

0 

c; 

10000 

0 


0631 6 

0 


03A05 

0 

1 


02256 

1 


36354 

0 


02173 

0 

c; 

50357 

0 

0 


33553 

1 


02312 

0 

c: 

00004 

0 


02256 

1 

1 

C; OO 76 A 

1 

C; 

346 31 

1 

CJ 

23146 

0 


36'»56 

0 

1 

c 

; OAOOO 

0 


A 1465 

0 


50667 

0 


34475 

0 

1 


10000 

0 


06433 

0 


03504 

0 

c; 

00020 

0 


4e^578A yul System for AGC^t; revisuk o oe program solrumss by 


OCjAL LISjInG oE PARAGRAPH § IZlt WilH PAH I ] V BIj IN BINARY At 

all valid words are basic Instructions except those marked *’I" 


2 a » 6 a 0 0 


03416 

1 

C: 

00400 

0 


3 4 5 1 6 

1 


51446 

2A,6A10 


0350A 

0 

C: 

00010 

0 


36455 

0 


51470 

2A ♦bAZO 


50666 

1 


36453 

0 


02173 

0 

c: 

65152 

2 A f 6 A 3 0 


02052 

1 

C; 

50457 

1 


02256 

1 


34473 

2 A * t A AO 

C: 

00004 

0 


364 5 3 

0 


02173 

0 

c: 

65152 

2 A 1 6 A S 0 


02046 

1 

C; 

66412 

0 


02256 

1 

C: 

00310 

2 A t bAbO 

C! 

00032 

0 


05720 

1 

C; 

5O5OI 

0 


36476 

2At6A70 


03373 

0 

C! 

40020 

1 


33541 

1 


02312 

2 A 1 65 00 

C: 

00026 

0 


03416 

1 

C: 

OlOOO 

0 


41465 

2A *6510 

C; 

31343 

1 

C; 

31000 

0 


06512 

1 


06513 

2A*6520 


§ 



e 



S 



& 

2A*6530 


§ 



§ 



§ 




2A « 65 AO 


§ 



e 



§ 



§ 

2 A ♦ 6550 


§ 






& 




2A»b560 


§ 



§ 



§ 




24*6570 





§ 



s 



g 

2A*6600 





& 






G 

lir*- 

24*6610 





& 



& 



g 

24*6620 


§ 



§ 






g 

24*6630 


§ 



§ 



§ 




24*6 640 


§ 









& 

■if- 

24 * 6650 


(8 



§ 



B 



& 

24*6660 


§ 



§ 



e 



g 

24*6670 


§ 



§ 



§ 



g 

24*6700 











§ 

i 

24*6710 


& 



& 



s 



24*6720 


§ 






8 



g 

g 

24*6730 


§ 






8 



24*6740 


•¥- ■ 



§ 



§ 

e 



g 

24*6750 


§ 



§ 





24*6760 





§ 



& 

*** 



■V 

24*6770 


§ 






g 



& 
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th^ right of each word; deNoteS unuslD fixed Memory, 
(Interpretive operator wordS) or «c" (constants). 


0 


1 1724 

0 


ObA 1 4 

0 


0641 4 

0 

0 6 4 1 0 

1 

0 


33556 

1 


02312 

0 

C! 

00004 

0 

40036 

0 

1 


36454 

1 


O2I73 

0 

c; 

50463 

0 

32I7O 

0 

0 


02312 

0 

C: 

OOOO2 

0 


445I6 

0 

02312 

0 

1 


32170 

0 


02052 

i 

c: 

50477 

0 

32146 

0 

0 

Cl 

21450 

0 

C; 

52454 

0 

c: 

61313 

i 

02362 

1 

1 


02173 

0 

c: 

64511 

0 


03474 

0 

c; O4OOO 

0 

0 

c: 

OOOO4 

0 


02256 

i 

c; 

Q34IO 

1 

02362 

1 

0 


40000 

0 


50115 

1 


3651 1 

1 

05720 

1 

0 

CkSM 

43052 

1 


§ 



@ 


€ 




€ 






& 


§ 




§ 



§ 



§ 






§ 






& 






& 



& 



& 


@ 




e 






if 


& 




§ 



§ 



§ 









§ 



& 






g 



e 



e 


§ 




& 








§ 




§ 






© 


g 




§ 








@ 




§ 



§ 



§ 


6 




& 



g 





§ 




& 



@ 



e 






g 



& 



& 


@ 




§ 



s 



g 






§ 








© 




e 



@ 



& 












e 


ig 




e 















§ 





@ 







e 



@ 





464578^ YUL SYSTEM FOR AGCi^: REVISION 0 OF PROGRAM SOLRUM55 BY 


QtTAL LIStIi'IG of PARAGRAPH # l2Ai wnH PARItV Blj IN BINARY Ay 

ALL VALID Words are basic instructions e>^OePT those marked »I" 


2 S » 6000 

I : 

77576 

0 


20017 

U 


40047 

0 


51314 

2S*6010 


20016 

1 


06023 

0 

I ! 

77576 

0 


20017 

2S t6020 


^0702 

0 


5132D 

1 


2 0016 

1 


40647 

2St6030 


7 I 3 U 

1 


500 2 2 

1 


4 OO 22 

0 


4 OO 22 

2 5 » 60 AO 

I 

S5576 

0 

C: 

00003 

1 

I : 

42175 

1 

I 

47 I 7 I 

25«6050 

I 

57176 

0 

C; 

366 7 5 

0 

I ; 

54176 

0 

C 

02645 

2Si6060 

C 

120-1,3 

0 

C: 

01343 

i 

C: 

00003 

1 

c 

12070 

2S *6070 

c 

77760 

0 

I : 

45575 

1 

1 : 

76776 

0 

c 

00051 

2St6100 

c 

12103 

0 

C; 

20721 

1 

I ; 

75175 

0 

I 

76421 

25*6ll0 

I 

47176 

1 

C; 

01333 

0 

C: 

01343 

1 

I 

56776 

2S*6l20 

c 

01341 

0 

C: 

01343 

1 

C: 

00002 

0 

c 

33477 

2S*6l30 

c 

00002 

0 

C; 

32033 

0 

I ; 

47575 

0 

I 

64/76 

2S*61A0 

c 

01341 

0 

I 

64775 

u 

I : 

*♦7176 

I 

c 

01331 

25.6150 

I 

64774 

1 

I 

7 O 6 O 3 

0 

I; 

44776 

1 

c 

01341 

2 5 1 6 1 60 

I 

47575 

0 

I 

41622 

1 

C: 

01477 

1 

c 

00002 

25 . 6 I 7 O 

c 

12241 

0 

I 

75775 

u 

I ; 

46776 

0 

c 

01425 

2S.6200 

c 

33505 

1 

I 

75776 

0 

C! 

01411 

1 

c 

12237 

25.6210 

c 

33513 

0 

I 

40576 

1 

I : 

7 5/76 

0 

c 

01477 

25.6220 

c 

1223? 

1 

C 

33367 

u 

I : 

75176 

0 

c 

01505 

25.6230 

I 

75775 

0 

I 

747 7 6 

1 

C: 

OI 5 I 3 

1 

c 

1 2241 

2S .6240 

c 

32654 

1 

c 

30?35 

0 

I: 

64776 

0 

c 

00041 

25.6250 

c 

01333 

0 

c 

77777 

0 

C; 

01343 

1 

c 

32027 

25.6260 

c 

00002 

0 

C 

00043 

0 

C; 

32031 

1 

1 

64/76 

25.6270 

c 

00045 

0 

C 

01341 

0 

C: 

77777 

0 

c 

00002 

2S *6300 

I 

64775 

0 

I 

63776 

1 

C 

01343 

1 

c 

QI 347 

25.6310 

c 

01331 

1 

I 

647 7 5 

u 

I 

66776 

1 

c 

01337 

25.6320 

I 

64775 

0 

I 

70776 

0 

C 

01331 

1 

c 

01351 

25*6330 

I 

70603 

0 

I 

44776 

1 

c 

01335 

0 

c 

01347 

2S.63A0 

I 

64776 

0 

c 

00045 

u 

C 

01331 

1 

I 

64775 

25.6350 

c 

01343 

1 

C 

33347 

1 

I 

47574 

1 

I 

64633 

25.6360 

c 

33345 

0 

I 

64 776 

J 

c 

00043 

0 

c 

01331 

25.6370 

c 

77777 

0 

c 

00002 

J 

C 

33351 

0 

I 

40576 


I 
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the right oF Each wqrd; "6*' denote.^ unused fixed memory. 


unteRpRetive operator WORDS) OR «c« (Constants), 


0 


40050 

0 


51316 

1 


4005 1 

1 


51320 

1 

0 


40700 

1 


51314 

0 


40701 

0 


51316 

1 

0 


74501 

0 


10000 

0 


06037 

0 


34302 

1 

0 


40022 

0 


30022 

1 


313U 

0 


O 4 OOO 

0 

0 

C; 

02645 

1 

c 

2030a 

1 

c; 

36645 

0 

I ; 

47575 

0 

1 

C; 

36711 

0 

I 

5 I 574 

0 

1 ; 

65ll6 

1 

I : 

7 I 775 

1 

0 


O 30 O 7 

0 

c 

01407 

0 


O 4 OOO 

0 

1 : 

40576 

1 

0 

C; 

04353 

0 

1 

43575 

1 

1 ; 

76576 

1 

c; 

00043 

0 

1 

c 

01521 

0 

c 

20624 

0 

C! 

00051 

0 

I : 

64775 

0 

1 

c 

01335 

0 

c 

00002 

0 

I ; 

64775 

0 

1 : 

41022 

1 

0 

I 

64775 

0 

I 

63776 

1 

c; 

01331 

1 

c; 

01335 

0 

0 

c 

01333 

0 

I 

64775 

0 

I : 

66776 

i 

CI 

01337 

1 

1 

c 

013^3 

1 

I 

64776 

0 

c; 

01337 

1 

C: 

01333 

0 

0 

c 

00033 

1 

c 

77777 

0 

C; 

00002 

0 

Cj 

33513 

0 

0 

c 

33505 

1 

I 

40576 

1 

i: 

75776 

0 

c: 

01411 

1 

0 

c 

12237 

1 

c 

33477 

0 

I : 

75176 

0 

c: 

0 1 4 1 7 

1 

1 

I 

75775 

0 

I 

50776 

1 

c; 

01425 

0 

c J 

12241 

0 

1 

c 

12241 

0 

I 

75775 

0 

I; 

50 776 

I 

C; 

01513 

1 

0 

c 

33375 

0 

I 

75776 

0 

c; 

01477 

1 

CI 

12237 

1 

0 

c 

334 O 3 

0 

I 

40576 

1 

c: 

21333 

1 

CI 

13542 

0 

1 

c 

01341 

0 

I 

64775 

0 

I : 

65712 

0 

c; 

00045 

0 

0 

I 

47574 

1 

I 

64716 

0 

l: 

65776 

1 

C; 

01335 

0 

0 

c 

00041 

1 

c 

01333 

0 

1 : 

64775 

0 

1 1 

70716 

0 

0 

c 

32033 

0 

I 

75175 

0 

1 ; 

40576 

1 

CI 

00027 

1 

0 

c 

00002 

0 

c 

32033 

0 

I : 

47575 

0 

I : 

64776 

0 

1 

c 

01351 

1 

I 

64776 

0 

c; 

00033 

1 

c; 

01337 

1 

1 

I 

56776 

1 

c 

01345 

1 

c: 

00002 

0 

1 : 

64774 

1 

0 

c 

77777 

0 

c 

00002 

0 

c; 

33353 

1 

1 1 

40576 

1 

0 

1 

66712 

0 

c 

; OOO 43 

0 

c; 

01337 

1 

C 

77777 

0 

0 

I 

63742 

0 

c 

; 01335 

0 

Ci 

00002 

0 

c 

00041 

1 

1 

I 

64775 

0 

I 

; 7 O 7 I 6 

0 

Ci 

00045 

0 

C 

01337 

1 

1 

I 

45575 

1 

I 

: 75572 

0 

CI 

00052 

0 

c 

OOOOb 

1 


Nd^bTSA yUL System for AGC^; revision O of program SOLRUMS5 BY 


octal listing oF paragraph # 125i wiTH PARIjT 0lT IN BUMRT AT 
All valid words arf basic instructions except those marked "i" 


2S,6A00 

C 

12013 

0 

I 

76776 

0 

c 

122A3 

1 

I 

A3575 

2 5 1 6A 1 0 

C 

00005 

1 

c 

320A1 

0 

1 

A757A 

1 

I 

AA771 

2bf6A20 

I 

75176 

0 

r' 

OlAl 7 

1 

c 

i3All 

0 

I 

A5575 

2Si6A30 

I 

A7575 

0 

I 

7A622 

1 

c 

OlAll 

1 

c 

OOOO 5 

2S tbAAO 

C 

77777 

0 

c 

15573 

1 

c 

3 3 A 1 1 

0 

1 

AA 775 

2 5 » 6 A 5 0 

c 

00123 

1 

c 

33353 

1 

I 

AA576 

0 

c 

00052 

25 »6A60 

C 

X2A66 

0 

I 

53575 

U 

I 

52576 

1 

c 

00003 

25 tbAyO 

I 

65122 

0 

I 

62272 

1 

I 

53056 

1 

I 

75776 

25*6500 

c 

13376 

1 

c 

03325 

0 

c 

00006 

1 

c 

00050 

25*6510 

c 

135A2 

0 

c 

03325 

0 

c 

01026 

1 

I 

AI 773 

25,6520 

c 

01107 

0 

c 

01016 

1 

c 

7 7 777 

0 

c 

77777 

25,6530 

I 

AI 775 

1 

I 

AA776 

1 

c 

00766 

0 

c 

OO 77 A 

25 *65A0 

1 

66775 

1 

1 : 

56776 

1 

c 

13131 

0 

c 

0102A 

25,6550 

c 

01016 

1 

C: 

00002 

0 

c 

33375 

0 

I 

A7575 

25, 6560 

I 

6A776 

0 

C: 

0077A 

0 

c 

01016 

1 

c 

OOOOA 

25,6570 

c 

00001 

0 

C) 

13376 

1 

I 

67175 

0 

I 

56712 

25 ,6600 

n 66722 

0 

I 

65776 

1 

c 

13133 

1 

c; 

0102A 

25,6610 

I I 73653 

0 

I 

6 A 7 I 6 

0 

c 

13115 

0 

c 

13153 

25,6620 

c 

77777 

0 

c 

1310a 

0 

I 

6A77A 

1 

I 

7 O 722 

25,6630 

c: 00017 

1 

c 

131A3 

0 

c 

00005 

1 

c 

32025 

25 ,66A0 

I 

6 3776 

1 

c 

00025 

0 

c 

OOOO 2 

0 

I 

A1775 

25,6650 

I 

A757A 

1 

I 

A 176 6 

0 

I 

50622 

1 

c 

01531 

25,6660 

I 

6 A 77 I 

1 

I 

62732 

0 

I 

73653 

0 

I 

6 A 726 

25 ,6670 

c 

77777 

0 

c 

13135 

1 

c 

13121 

1 

c 

OI02A 

25,6700 

c 

00010 

0 

I 

A7575 

0 

I 

511A2 

1 

c 

131AI 

25,6710 

c 

00003 

1 

I 

A277A 

0 

I 

: 63732 

X 

I 

A3776 

25,6720 

c 

13111 

1 

I 

56775 

1 

I 

1 62766 

1 

c 

00001 

25,6730 

I 

50762 

1 

c 

01016 

1 

c 

; 00005 

1 

c 

77777 

25 ,67A0 

I 

7U7A 

0 

I 

75612 

0 

I 

: 56776 

1 

c 

0077A 

25,6750 

I 

65716 

1 

I 

65176 

1 

c 

; 01A25 

0 

c 

00003 

25,6760 

I 

56712 

0 

I 

7 O 7 O 6 

1 

1 

; 71672 

1 

c 

01030 

25,6770 

c 

77777 

0 

c 

13066 

0 

c 

: OOOOA 

0 

c 

3 3 A A 1 


NASA 1021108-021 


DEC A, 1966 


PAgE B6l 


the right of each word? Denotes unused fixed memory. 


(Interpretive operator woRdS) or «c" (constants). 


1 

I 

56776 

1 

c 

000A3 

0 

c: 

12A13 

1 

c: 

OOOAl 

1 

0 

I 

AA576 

0 

c 

00002 

0 

c: 

20A16 

0 

CJ 

00052 

0 

1 

I 

73A21 

1 

c 

00052 

0 

CJ 

010A2 

0 

CJ 

01A71 

1 

1 

I 

75775 

0 

I 

50766 

0 

c; 

OlOlO 

1 

c; 

01030 

0 

1 

I 

7A752 

1 

c 

01A17 

1 

c 

00002 

0 

c 

0077A 

0 

0 

I 

75575 

1 

I 

7A5 12 

1 

C 

00001 

0 

c 

00002 

0 

1 

c 

00002 

0 

I 

AAI 70 

1 

I 

62732 

0 

I 

51130 

1 

0 

c 

03325 

0 

c 

0102A 

0 

c 

15565 

0 

c 

03315 

0 

1 

c 

01016 

1 

I : 

A517A 

1 

I 

6A312 

0 

I 

53176 

1 

1 

I 

73006 

0 

I; 

756A2 

0 

I 

AA776 

1 

c 

OIOL 6 

1 

0 

c 

OOOOA 

0 

c; 

33A17 

0 

I 

76776 

0 

c 

12A31 

1 

0 

c 

00002 

0 

I: 

A7575 

0 

I 

73176 

0 

c 

33367 

0 

0 

c: 

00003 

1 

I 

A1775 

1 

I 

AA776 

1 

c 

01367 

1 

0 

l! 

A2776 

1 

c 

0077A 

0 

I 

A277A 

0 

I 

56712 

0 

0 

c: 

77777 

0 

c 

13131 

0 

I 

67175 

0 

I 

62776 

0 

0 

Cl 

OO 77 A 

0 

c 

00005 

1 

c 

13376 

1 

1 

6277A 

1 

0 

c 

77777 

0 

C! 

13131 

0 

C! 

13133 

1 

I 

A757A 

1 

1 

c 

00003 

1 

I 

66775 

1 

I; A3776 

0 

c 

13157 

0 

1 

I 

7 O 7 I 6 

0 

c 

OOOI 7 

1 

c: 131A7 

1 

c 

131A5 

0 

1 

I 

A7575 

0 

I 

55166 

0 

Ci 01531 

1 

1 

57 I 75 

0 

1 

I 

73176 

0 

c 

01531 

1 

c; 01016 

1 

c 

32027 

0 

1 

c 

77777 

0 

c 

mil 

0 

c 

00002 

0 

c 

33A33 

0 

0 

I 

6 I 7 A 6 

0 

I 

76A72 

1 

c 

13131 

0 

c 

77777 

0 

0 

c 

77777 

0 

c 

77777 

0 

c 

13125 

0 

c 

20265 

1 

1 

I 

A 757 A 

1 

I 

66633 

1 

I 

62776 

0 

c 

13137 

0 

0 

c 

01016 

1 

c 

01A33 

1 

c 

00003 

1 

c 

00005 

1 

0 

c 

00006 

1 

c 

00003 

1 

c 

01375 

1 

I 

75775 

0 

0 

c 

01A33 

1 

I 

A 7575 

0 

I 

» 7 II 76 

1 

c 

32003 

0 

0 

c 

; 01375 

1 

c 

00027 

1 

c 

00002 

0 

I 

71 17A 

0 

1 

c 

; 00002 

0 

I 

A7576 

0 

c 

32001 

1 

I 

6A773 

0 

0 

c 

; 00003 

1 

c 

00016 

0 

c 

77777 

0 

c 

13155 

1 

0 

I 

; A 7575 

0 

I 

75776 

0 

c 

01367 

1 

I 

75775 

0 


yUU System for agc-*; revision o of program solrumss by 


octal LISjINCj of paragraph # 126« *^lTH PARITY BIT IN BINARY AT 
All v'Alii^ words are basic Instructions except those mar<eo »!" 


2S 

, 7000 

1 

71176 

1 

c 

01002 

1 

c 

21742 

0 

c 

32005 

2b 

* /OlO 

C 

01030 

0 

c 

1316 7 

0 

c 

00006 

1 

c 

01375 

2b 

f 7020 

c 

01AA3 

0 

I 

47575 

0 

I 

55166 

0 

c 

01016 

2b 

t 7 O 3 O 

c 

00015 

0 

c 

77777 

0 

c 

00002 

0 

I 

64773 

2b 

t 7 0 AO 

c: 

00005 

1 

c 

00001 

0 

C: 

00002 

0 

c 

13074 

2b 

t7050 

I; 

75176 

0 

c 

00007 

0 

C ; 

33425 

1 

I 

75176 

25 

« 7 O 6 O 


OAOOO 

0 

I 

76575 

1 

I : 

76 776 

0 

c 

20265 

25 

» 7 O 7 O 

C: 

33AAI 

0 

I 

76776 

0 

C: 

12775 

1 

I 

7 5175 

2b 

»7100 

c 

33353 

1 

1 : 

76 11 b 

0 

C; 

13051 

1 

1 ; 

45176 

25 

*7110 

I 

77576 

0 


0300; 

0 

C; 

01403 

1 


07060 

25 

» 7120 

I 

77576 

0 


0300 1 

0 

C; 

01405 

1 


07060 

25 

♦ 7130 

c 

06145 

1 

CJ 

33650 

1 

C; 

02000 

0 

c: 

00000 

2b 

t7lA0 

c 

OOOOA 

0 

Cl 

OOuOO 

1 

C 

06010 

0 

CJ 

35650 

25 

♦ 7150 

c 

00467 

1 

C: 

16603 

0 

C 

33537 

0 

c; 15244 

25 

,7l60 

c 

03775 

1 

C: 

17232 

1 

C 

06052 

0 

C! 

12650 

25 

♦ 7 I 7 O 

I 

45175 

0 

1 : 

76776 

0 

C 

13376 

1 

c; 

13201 

2b 

♦ 7200 

1 1 

47574 

1 

I ; 

62 714 

1 

I 

53176 

1 

c 

01024 

2b 

,7210 

Cl 

01323 

1 

C: 

334 I 7 

0 

I 

76776 

0 

c 

12431 

25 

♦ 7220 

Ci 

00011 

1 

1 : 

73175 

0 

C 

01323 

1 

c 

33367 

2b 

♦ 7230 

1 1 

53176 

1 

Cl 

0101b 

i 

C 

1556b 

0 

c 

00035 

25 

^7240 

I 

47575 

0 

I 

70 766 

1 

c 

13261 

0 

Cl 

01367 

25 

♦ 7250 

c 

13261 

0 

c 

01016 

1 

C 

77777 

0 

c 

00037 

2b 

♦ 7260 

c 

01000 

0 

c 

00000 

L 

C 

00020 

0 

c 

00000 

25 

♦ 7270 

I 

45175 

0 

I 

56376 

0 

C 

00037 

0 

c 

00025 

25 

♦ 7300 

c 

00025 

0 

c 

01323 

1 

C 

00002 

0 

I 

45775 

25 

♦ 7310 

I 

47575 

0 

I 

50776 

1 

c 

01016 

1 

c 

33375 

25 

♦ 7320 

c 

00037 

0 

c 

77777 

0 

c 

00002 

0 

c 

33433 

25 

♦ 7330 

c 

33435 

0 

I 

47575 

0 

I 

56326 

0 

c 

00016 

2b 

♦ 73A0 

I 

53766 

0 

c 

01437 

0 

c 

0143b 

1 

c 

77 777 

2b 

♦ 7350 

I 

5677b 

1 

I 

65672 

1 

c 

01433 

1 

c 

OOOO7 

25 

,7360 

I 

b6766 

0 

I 

50622 

1 

I 

75776 

0 

c 

01437 

25 

,7370 

c 

77777 

0 

c 

00012 

1 

c 

334I7 

0 

I 

75776 


NASA 1021108-021 
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PAgE 862 


the right of each wqro; "©’• denotes unused fixed Memory. 


( INTERpRETIvE operator WORDS) or "C (CONSTANTS), 


0 

I 

47573 

0 

1 : 

62722 

1 

I 

63766 

0 

1 : 

50753 

0 

1 

1 

62775 

0 

1 : 

63142 

0 

c 

13165 

1 

CJ 

01024 

0 

1 

I 

57174 

1 

i: 

75762 

0 

I 

44776 

1 

c: 

00023 

0 

0 

1 

62716 

0 

1 : 

71672 

1 

I 

75771 

1 

c; 

00003 

1 

0 

c 

00002 

0 

c 

77777 

0 

c 

20265 

1 

c; 

33353 

1 

0 

c 

15575 

1 

c 

33411 

0 

I 

^^Slb 

0 

Cj 

00052 

0 

1 

c 

25657 

1 

1 

53776 

1 

c 

I3l6l 

0 

c; 

00015 

0 

0 

I 

75771 

1 

c 

77777 

0 

c 

15573 

1 

C! 

20265 

1 

0 

CJ 

13151 

0 

c; 

3202b 

1 

11 

76776 

0 

CI 

12635 

1 

0 

l\ 

77576 

0 


03007 

0 

C! 

01404 

0 


O7O6O 

0 

0 

I : 

77576 

0 


03007 

0 

c: 

01406 

1 


O7O6O 

0 

1 

c; 

00400 

0 

Cl 

00000 

1 

C! 

00010 

0 

c; 

uoooo 

1 

1 

c 

51120 

0 

c 

56532 

0 

C 

25641 

0 

CI 

36206 

0 

1 

c 

00000 

1 

c 

37200 

1 

c 

2O6O7 

1 

C; 

05301 

0 

1 

c 

03025 

0 

c 

05324 

1 

c 

36044 

1 

c; 

03661 

0 

0 

I 

45175 

0 

I 

63576 

0 

c 

13400 

1 

CI 

OOOO7 

0 

0 

c 

00021 

1 

I 

41775 

1 

I 

73166 

1 

c; 

OIOI6 

1 

1 

I 

62775 

0 

I 

63376 

0 

c 

13400 

1 

C; 

01024 

0 

0 

I 

47572 

1 

I 

42742 

0 

I 

64716 

0 

1 ! 

61742 

1 

1 

c 

00004 

0 

c 

77777 

0 

c 

13263 

1 

CI 

32033 

0 

1 

I 

66774 

0 

I 

75642 

0 

I 

! 75622 

0 

c; 

OOO33 

1 

0 

c 

00003 

1 

c 

33417 

0 

I 

! 76776 

0 

c; 

12431 

1 

1 

I 

63775 

1 

I 

53176 

1 

c 

i 13376 

1 

c; 

00002 

0 

0 

I 

75174 

1 

I 

45232 

0 

I 

; 73026 

1 

c: 

00766 

0 

0 

I 

46776 

0 

c 

01016 

1 

c 

I 00002 

0 

c; 

33367 

0 

0 

I 

71174 

0 

I 

7O742 

1 

I 

! 56776 

1 

c: 

01323 

1 

0 

I 

47575 

0 

I 

66676 

0 

c 

; 00037 

0 

c; 

00050 

1 

0 

c 

01437 

0 

I 

64773 

0 

I 

: 6I711 

1 

I : 

63253 

0 

0 

c 

00021 

1 

c 

OOOO2 

0 

c 

: 01425 

0 

c; 

01375 

] 

0 

c 

01437 

0 

c 

00005 

1 

I 

; 64772 

1 

1 1 

61653 

0 

0 

c 

01433 

1 

c 

77777 

0 

c 

; 00007 

0 

c; 

01367 

1 

0 

c 

12431 

1 

c 

O45O7 

1 

Ci 33420 

1 

c: 

03516 

0 


‘«mA‘j7aA yul System for agca; revision o of program solrumss by 
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2S « 7A00 

C: 

10273 

0 

l; 73176 

0 

C 

01353 

0 

c 

33353 

2S WAIO 

C: 

00003 

1 

C; 01411 

1 

I 

47571 

1 

I 

71110 

2S» 7A20 

C{ 

03631 

0 

C: 2lO<t3 

0 

c 

03631 

0 

c 

00003 

2S *7^30 

1; 

A7176 

1 

C! 01016 

1 

C 

33375 

0 

I 

43575 

25 t TAAO 

c; 

33375 

0 

I: 4757A 

1 

I 

41 753 

0 

11 

A7176 

2S < 7AS0 

I ; 

AA776 

1 

C: 010A4 

0 

c 

01115 

0 

Cl 

00003 

25«7A60 

c: 

00002 

0 

C: 33131 

1 

I 

72775 

1 

I; 

62746 

25 » 7 A 7 O 

C; 

32037 

1 

I: 47574 

1 

I 

55132 

1 

1 1 

75776 

25 » 7500 

I J 

50776 

I 

C: 00037 

0 

C 

01123 

0 

c 

01115 

25* 7510 

C; 

13520 

1 

C ; 0 1 1 <t 5 

0 

c 

Ul 145 

0 

c 

331A5 

25* 7520 

C; 

3A732 

0 

C: 2 O 3 O 4 

i 

C 

23351 

i 

c 

3 7200 

25*7530 

c: 

I 53 OI 

1 

C! 30523 

0 

c 

00147 

0 

c 

0Q13A 

25 *75aO 

c; 

33625 

0 

Ct 00450 

Q 

c 

) 37342 

0 


D75A3 

25*7550 


e 





3 



§ 

25*7560 


§ 


& 



i 



§ 

25 * 7570 




§ 



§ 



S 

25*7600 


§ 


© 






§ 

25*7610 


§ 


e 






s 

25*7620 


§ 





g 



§ 

25*7630 


§ 





B 



§ 

25*76AO 




& 



§ 



9 

25*7650 


e 


e 



§ 



§ 

25*7660 







@ 



§ 

25*7670 




@ 



§ 



§ 

25*7700 


§ 








3 

25*7710 




e 







25*7720 










s 

25.7730 







§ 



§ 

25 *77A0 


§ 


e 



§ 



& 

25*7750 


§ 


$ 



& 



g 

.Ak. 

25*7760 


(® 


@ 



B 



3 

25*7770 


§ 


6 



§ 



§ 


NASA 1021108-021 


DEC A, 1966 


PAgE 863 


thc right of each word; "e" denote^ unused fixed Memory. 
(Interpretive operator woRdSj or "c (constants). 


1 

I : 

A7574 

1 

I; 

40622 

0 

i: 

A6776 

0 

c: 

01411 

1 

1 1 

51126 

0 

I ; 

53120 

1 

i; 

63766 

0 

i: 

50753 

1 

C: 

01353 

0 

c; 

33367 

0 

I : 

4757 A 

1 

I : 

41753 

1 

1 : 

75033 

0 

C! 

0005A 

0 

c: 

134A2 

I 

c; 

01375 


1 

C: 

01367 

1 

c: 

33A03 

0 

I! 40576 

1 

I : 

A 177 5 

1 

C : 

33123 

1 

I ; 

4 75 ^5 

0 

I; 41622 

1 

c; 

OIO 4 A 

0 

c: 

00123 

1 

C! 

01145 

0 

c: 13520 

1 

c: 

I 35 O 7 

0 

C; 

15573 

1 

C l 

01131 

0 

I; 57 I 7 A 

1 

I : 

75642 


0 

c; 

33215 

1 

I : 

40576 

1 

1 ; 

53775 

1 

1 ; 

65776 

1 

1 ; 

A3776 

0 

c: 

13520 

1 

C; 

13463 

1 

C ; 

01015 

1 

C! 

00000 

1 

c; 

21601 

0 

Cl 

34 O 56 

0 

c: 

24605 

1 

C: 

27361 

0 

c; 

001 13 

1 

c; 

26154 

0 

CJ 

00216 

1 


075A4 

0 

CK5M 

61003 

0 


3 



3 



@ 



3 



§ 



3 



@ 



3 



3 



3 



3 



3 



3 



3 



& 



3 



3 



3 



@ 



3 



3 



§ 



@ 



3 



3 



3 



§ 



6 



3 



3 



3 



3 



3 



3 



§ 



3 
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3 



3 



3 
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1 

0 

0 

1 

1 

0 

1 

0 

1 

1 

i 

1 


YUL SY5TE.M FOR AGC<+; REVlSiuN 0 OF RRdGRAM 50LRUM55 BY 


qCtal. Listing qf paragraph i3o» with parit^ bit in binary at 
all valid Words are basic instructions except those marked *•!«» 


2fc *6000 

I 

77576 

0 


03A40 

1 

C; 

12 000 

1 


03452 

26t6010 

C 

00007 

0 

C; 

01A72 

1 

C; 

12013 

0 

I : 

76776 

26*6020 

1 

76576 

1 

Cj 

00001 

0 

C: 

20265 

i 

I : 

42774 

26*6030 

C 

15655 

0 

C; 

14102 

1 

I : 

41775 

1 

I : 

73176 

2 6 » 6 0 A 0 

I : 

66616 

0 

C 

01325 

1 

C; 

15543 

1 

C : 

15520 

26 *6050 

C: 

01323 

1 

I 

4517b 

0 

C: 

15575 

1 

C: 

32020 

26 * 6 0 60 

I ! 

A2 6 1 6 

0 

c 

00001 

0 

C; 

01367 

1 

C J 

77777 

26*6070 

C! 

OUll 

1 

c 

OOOOl 

0 

C: 

14076 

0 

I ; 

42576 

26*6100 

c 

14316 

0 

I 

A2775 

1 

I : 

73776 

0 

C 

01367 

2 1> * 6 1 10 

c 

15541 

0 

c 

15401 

0 

l! 

42773 

1 

I 

75622 

26*6120 

c 

01367 

1 


00003 

1 

CJ 

0U25 

0 

C 

01403 

26,bl30 

I 

41775 

1 

I 

42776 

1 

C; 

0U03 

1 

C 

0 1 a2 5 

26*61A0 

c 

00002 

0 

c 

33455 

0 

I 

65174 

0 

I ; 

66756 

2 6 * 6 1 5 0 

c 

15240 

0 

I 

53775 

1 

I 

75776 

0 

C; 

21043 

26*6160 

c 

0U55 

1 

c 

33A55 

Cl 

I 

77576 

0 


03440 

26 *6l70 

I 

42575 

0 

I 

76776 

u 

C 

00046 

0 

C! 

12167 

26*6200 

I 

45574 

0 

I: 76455 

i 

I 

65103 

0 

c: 

01455 

26*6210 

I 

65776 

1 

c 

15557 

1 

I 

55176 

1 

C; 

00025 

26*6220 

c 

77777 

0 

c 

15551 

1 

c 

00002 

0 

1 : 

45176 

26*6230 

I 

47056 

1 

I 

70633 

0 

c 

15563 

0 

1 ; 

45175 

26*62^0 

c 

32033 

0 

I 

A7575 

0 

I 

53776 

1 

C 

01325 

26*6250 

I 

47776 

1 

c 

OOOA? 

1 

c 

14300 

1 

I 

66776 

26 *6260 

c 

00027 

1 

c 

32010 

I 

I 

66775 

1 

1 

43776 

26*6270 

I 

76433 

1 

c 

OOOOl 

0 

c 

15551 

1 

c 

00023 

26*6300 

c 

00035 

1 

c 

00027 

1 

c 

32011 

0 

I 

70774 

26 * 6 3 1 0 

c 

00116 

1 

c 

00012 

1 

c 

OOOOl 

0 

I 

44576 

26*6320 

I 

43175 

0 

I 

62576 

1 

c 

00010 

0 

c 

77776 

26*6330 

c 

14341 

1 

c 

00044 

I 

1 

43176 

0 

c 

OOOll 

26*63^0 

1 

45175 

0 

I 

43433 

1 

c 

15573 

1 

c 

00050 

26*6350 

I 

75575 

1 

I 

42576 

0 

c 

OOOOl 

0 

c 

00051 

26*6360 

c 

ooaoo 

0 


04000 

0 

I 

64175 

0 

I 

65 6 1 6 

26*6370 

I 

42576 

0 

c 

: 00051 

0 

c 

14375 

0 

c 

00045 


NASA 1021108-021 


DEC At 1966 


PAGE B6A 


the right oP Each word; "e** denotes unused fixed memory. 
(Interpretive operator words) or t'C" (Constants), 


1 

c: 

04600 

0 


04000 

0 

I : 

75575 

1 

I : 

45572 

0 

0 

C: 

12110 

1 

I ; 

76776 

0 

C; 

12213 

1 

I ; 

74575 

0 

0 

I : 

66132 

1 

I : 

43776 

0 

c; 

01367 

1 

c; 

01411 

1 

0 

c: 

01367 

1 

c; 

01411 

1 

CJ 

33323 

0 

1 j 

65175 

1 

1 

I 

41775 

1 

I 

41753 

0 

c; 

01323 

1 

CJ 

15601 

1 

1 

I 

47575 

0 

I 

41776 

1 

C: 

01411 

1 

1 : 

41775 

1 

0 

C 

14351 

0 

I 

50775 

1 

1 : 

**2616 

0 

c; 

01367 

1 

0 

C 

00050 

1 

I 

76776 

0 

c; 

14201 

1 

1 : 

76776 

0 

1 

c 

OUll 

1 

c; 

15351 

1 

I ; 

47575 

0 

I : 

66756 

0 

0 

I 

74633 

1 

I; 

73012 

0 

C; 

01425 

0 

c: 

01367 

1 

1 

I 

47575 

0 

I : 

666l6 

0 

C! 

15655 

0 

c: 

14171 

0 

0 

c 

01367 

1 

1 : 

63775 

1 

I : 

61056 

0 

CJ 

OOOOl 

0 

0 

I ; 

76776 

0 

c; 

01371 

0 

c; 

15545 

1 

CJ 

14152 

1 

0 

C; 

01455 

1 

Cj 

01367 

1 

c; 

33323 

0 

1 : 

65176 

1 

1 

CJ 

04000 

0 


04000 

0 

I ; 

44576 

0 

c; 

01472 

1 

1 

I ; 

76776 

0 

c; 

12072 

1 

I ; 

44576 

0 

c: 

01472 

L 

1 

C 

15645 

1 

c 

OOOO 3 

1 

C: 

00003 

1 

1 : 

47575 

0 

0 

I 

57174 

1 

I 

62722 

1 

I: 

6 1072 

0 

c; 

00025 

0 

0 

c 

15563 

0 

I 

43176 

0 

c: 

00047 

1 

1 J 

45 I 74 

1 

0 

1 

43433 

1 

c 

15563 

0 

C! 

OOO 5 O 

1 

c; 

14242 

0 

1 

1 

47575 

0 

I 

66776 

1 

c: 

00031 

0 

i; 

A3175 

0 

1 

C 

00035 

1 

c 

00027 

1 

C; 

32007 

1 

I ; 

70776 

0 

0 

c 

00023 

0 

c 

15561 

1 

CJ 

14314 

1 

I : 

75575 

1 

0 

C 

32023 

1 

I 

76776 

0 

CJ 

14210 

1 

I ; 

66776 

1 

1 

I 

73535 

0 

I 

75576 

1 

c: 

00035 

1 

c: 

00027 

1 

0 

C 

01455 

1 

I 

43176 

0 

C; 

00007 

0 

C; 

3402b 

1 

1 

c 

34027 

0 

I 

43175 

0 

1 : 

73611 

0 

c; 

00047 

1 

1 

c 

32015 

1 

I 

43176 

0 

c: 

00012 

1 

C: 

32016 

1 

1 

c 

14347 

1 

c 

32020 

1 

u 

47576 

0 

c: 

32020 

1 

0 

I 

76575 

1 

I 

77576 

0 

CJ 

15645 

1 


03452 

1 

(j 

c 

02761 

0 

c 

15545 

1 

c: 

14714 

0 

1 J 

43575 

1 

0 

I 

44175 

1 

I 

43611 

0 

C! 

02761 

0 

c: 

14402 

1 


i 


I 


yUL SySTEM FOR AgC^; REVISION u OF ^jRDgRAM bOLRUMt?5 BV 


octal LISylNG oF PARAGRAPH # 131 , wIjH PARIjV BIT IN BINARY AT 

all valid words are basic instructions FXCEPT those marked "I” 


26 

,6A00 

C 

00050 

1 

1 

A317A 

1 

I : 

a3556 

0 

I 

76776 

26 

.6A10 

c 

1 A A 1 6 

1 

I 

A7575 

0 

I ! 

A7616 

0 

c 

1AA16 

26 

»6A20 

1 

A 277 A 

0 

I 

666 1 5 

Q 

I ; 

A7176 

1 

c 

01367 

26 

t6A30 

c 

33A33 

0 

1 

A7575 

0 

I ; 

A3 a3 3 

1 

c 

00051 

26 

6AA0 

c 

1A71A 

0 

I 

A317A 

1 

I 

66615 

0 

I 

A7176 

2b 

6 A S 0 

c 

32051 

1 

I 

A757b 

Q 

c 

32051 

1 

I 

A5175 

2b 

b A6 0 

c 

33A33 

0 

I 

A7575 

0 

I 

A 3 A 3 3 

1 

c 

00050 

26 

6A7O 

c 

01325 

1 

c 

33A33 

U 

I 

6A176 

0 

c 

02761 

26 

6500 

c 

00002 

0 

C! 

155A1 

Q 

c 

77776 

1 

c 

IA511 

26 

6510 

I 

7A173 

1 

I: 

A 1 bO A 

0 

I 

/3033 

0 

I 

A3A33 

26 

6520 

c 

1A523 

0 

c: 32025 

1 

I 

73575 

1 

I 

A fblb 

26 

6530 

c 

00002 

0 

I : 

A7575 

0 

I 

66673 

0 

c 

15553 

26 

65A0 

I 

70775 

0 

1 ! 

57176 

0 

c 

00033 

1 

c 

1S553 

26 

6550 

c 

15555 

0 

Cl 

320A5 

1 

1 

A5176 

0 

c 

210A3 

26 

6560 

c 

2O5OA 

1 

C: 

15565 

y 

c 

32033 

0 

I 

A2776 

26 

6570 

I 

A2633 

1 

I ! 

63703 

0 

I 

5 6656 

1 

c 

02?55 

26 

6600 

c 

33A55 

0 

I ! 

66776 

1 

c 

01 a55 

1 

c 

00033 

26 

6610 

c 

01A55 

1 

C 

3 AO 3 0 

0 

I 

7AI75 

1 

I 

A2723 

2b 

6620 

c 

00003 

1 

1 

A757A 

1 

I 

70663 

0 

I 

6A7I6 

26 

6630 

I 

66773 

1 

I 

65063 

1 

I 

6A7I6 

0 

I 

65616 

26 

66A0 

c 

15571 

0 

c 

1A71A 

0 

I 

?6776 

0 

c 

IA2OI 

26 

6650 

c 

1A673 

0 

I 

AAl7b 

1 

c 

00030 

1 

I 

A3776 

26 

6660 

c 

3A026 

1 

I 

A5l7b 

u 

c 

3A030 

0 

I 

76776 

26 

667O 

I 

76776 

0 

c 

1A71A 

0 

I 

A3775 

0 

I 

A1A23 

26 

6700 

I 

A3176 

0 

c 

: 00012 

i 

c 

: 3AO3O 

0 

I 

76776 

26 

6710 

I 

A3176 

0 

c 

: 00010 

0 

c 

; 3A030 

0 

I 

A3i 75 

26 

6720 

1 

A357A 

0 

I 

; 53An 

0 

I 

; 76776 

0 

c 

00051 

26 

6730 

I 

A3 175 

0 

I 

: A7776 

1 

c 

: 00050 

1 

c 

15520 

26 

67A0 

c 

; 01367 

1 

I 

; A1775 

1 

I 

A2776 

1 

c 

01323 

2 6 

6750 

I 

: A2633 

1 

1 

: 63703 

0 

1 

53672 

1 

c 

77777 

26 

6760 

c 

; 3A032 

1 

I 

; A3 175 

0 

I 

52565 

0 

c 

00050 

26 

677 O 

I 

; 66776 

1 

c 

: 000 3 A 

0 

c 

00015 

0 

I 

A7575 
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tHe right oe each wqrd; *'©» Denote^ unusld fixed memory. 


< Interpretive operator woRdSj or "c (constants) 


0 

c 

00020 

0 

c 

00050 

1 

c 

IAA 12 

0 

c 

IA 7 I A 

0 

1 

c 

IA 71 A 

0 

I 

A2776 

1 

c 

OlAll 

1 

c 

OOOOl 

0 

1 

c 

00001 

0 

c 

77777 

0 

c 

00050 

1 

c 

1AA32 

1 

0 

c 

1 AA37 

1 

c 

33A33 

0 

I 

A 7575 

0 

I 

A3776 

0 

1 

c 

00050 

1 

c 

15567 

1 

c 

00051 

0 

c 

1AA52 

1 . 

0 

I 

A3A33 

1 

c 

15573 

i 

c 

OOO 5 I 

0 

c 

1AA62 

1 

1 

c 

IAA67 

1 

c 

33A33 

0 

I 

A7575 

0 

I 

53776 

1 

0 

I 

5677A 

0 

I 

66711 

0 

I 

73776 

0 

c 

00023 

0 

1 

I 

76776 

0 

c 

1A201 

1 

I 

76776 

0 

c 

1A673 

0 

1 

c 

02755 

1 

c 

15601 

1 

c 

02755 

1 

c 

OOO 5 O 

1 

0 

c 

000A7 

1 

I 

61175 

0 

I 

56776 

1 

c 

00023 

0 

0 

I 

66775 

1 

I 

57122 

1 

c 

15555 

0 

c 

OOO 33 

1 

0 

I 

7077A 

1 

I 

57122 

1 

1 1 

61653 

0 

c 

OOO 33 

1 

0 

c 

320A1 

0 

1 

76575 

1 

li 

76526 

1 

c 

156A3 

1 

1 

c 

01323 

1 

c 

00025 

0 

1 1 

7Al72 

0 

I 

AI 753 

0 

1 

c 

01323 

1 

c 

00025 

0 

c; 

00002 

0 

c 

00002 

0 

1 

c 

i 

3A026 

1 

I 

76575 

1 

I ; 

70776 

0 

c 

156A7 

0 

1 

c 

02755 

1 

c 

00001 

0 

ii 

65175 

1 

I 

61176 

0 

0 

c 

15557 

1 

c 

00033 

1 

Cl 

00002 

0 

c 

32021 

0 

0 

c 

15557 

1 

c 

77777 

0 

c; 

77777 

0 

c 

00002 

0 

1 

I 

66775 

1 

1 

73776 

0 

ci 

15571 

0 

c 

00021 

1 

0 

c 

01A33 

1 

c 

1 A666 

1 

I ■ 

A3176 

0 

c 

OOOO 7 

0 

0 

c 

IA 7 IA 

0 

I 

A3176 

0 

c 

00010 

0 

c 

3A030 

0 

1 

c 

01A33 

1 

c 

IA 7 O 6 

0 

c 

OOOO 7 

0 

c 

3 a02 6 

1 

0 

c: 1 A 71 A 

0 

I 

A3176 

0 

c 

ooou 

1 

c 

3A026 

1 

0 

I 

70636 

0 

c 

00050 

1 

c 

131A1 

1 

c 

1A731 

1 

0 

c 

1A731 

1 

c 

00023 

0 

c 

00051 

0 

c 

IA355 

1 

1 

I 

76575 

1 

I 

A1776 

1 

c 

15651 

1 

c 

01A77 

1 

1 

c 

; 01367 

1 

c 

00025 

0 

c 

32023 

1 

I 

73173 

0 

0 

c 

: 01323 

1 

c 

00002 

0 

c 

77777 

0 

c 

00002 

0 

1 

c 

; 00001 

0 

c 

OOOOl 

0 

c 

32037 

1 

1 

A2l7b 

1 

0 

I 

! 666 16 

0 

c 

15573 

1 

c 

IA 77 A 

0 

I 

A 7575 

0 


A84578A yul System for agc<»: revision o of program solrumss by 


OCTAL listing of PARAGRAPH if 132, WITH PARItT BIt IN BINARY AT 

All vAlID words are basic instructions except those marked ”1'* 


26» ?000 

I 

70756 

1 

c 

15573 

1 

c 

15000 

0 

c 

3AD01 

26% /OlO 

C 

77776 

1 

I 

43175 

U 

I 

65 756 

0 

c 

00050 

26 » 7 0 2 0 

C 

00037 

0 

c 

15567 

i 

c 

15333 

0 

I 

66775 

26*7030 

1 

66775 

1 

I 

73776 

0 

c 

00003 

1 

c 

00001 

26»70A0 

c 

00005 

1 

C; 

1543A 

0 

I 

66775 

1 

I 

73776 

26*7050 

I 

56732 

1 

1: 

76776 

0 

c 

00044 

1 

c 

15317 

26*7060 

I 

66775 

1 

1 : 

73776 

0 

c 

00007 

0 

c 

00001 

26*7070 

C 

oooaa 

1 

C: 

15317 

0 

c 

00001 

0 

c 

00003 

26*7100 

I 

73772 

1 

c 

00007 

0 

c 

00003 

1 

c 

15066 

26*7110 

c 

00001 

0 

c 

15131 

u 

I 

66775 

1 

I 

73776 

26*7120 

I 

56732 

1 

I 

76776 

0 

c 

0004A 

1 

c 

15317 

26*7130 

I 

66775 

1 

I 

73776 

0 

c 

00003 

1 

c 

00005 

26* 71A0 

c 

00003 

1 

c 

15170 

0 

I ! 

66775 

1 

I 

43772 

26*7150 

I 

66775 

1 

I 

73776 

0 

C! 

00007 

0 

c 

00005 

26*7160 

c 

OOOAA 

1 

c 

15317 

0 

C: 

00005 

1 

c 

00003 

26*7170 

I 

73772 

1 

c 

00007 

0 

C: 

00005 

1 

c 

15520 

26 * 7200 

c 

00003 

1 

c 

15156 

i 

c 

15520 

1 

I 

47574 

26*7210 

C 

15565 

0 

c 

15225 

0 

I 

47574 

I 

I 

706l6 

26*7220 

c 

15225 

0 

I 

47575 

0 

I 

66776 

1 

c 

15565 

2 6 * 72 3 0 

I 

A3576 

1 

c 

00045 

0 

c 

15657 

1 

I 

76 776 

26*72A0 

I 

A1606 

1 

1 

73176 

0 

c 

20265 

1 

c 

01367 

26*7250 

I 

41753 

0 

c 

21043 

0 

c 

01371 

0 

c 

01367 

26*7260 

C 

00001 

0 

c 

0000? 

0 

c 

00002 

0 

c 

32021 

26*7270 

c 

15316 

1 

I 

75174 

1 

I 

41612 

1 

I 

73776 

2o*7300 

1 

45175 

0 

I 

437A2 

1 

c 

01455 

1 

c 

15316 

26*7310 

I 

73732 

0 

c 

01455 

1 

c 

15316 

1 

c 

21043 

26*7320 

c 

0003 ? 

0 

c 

0004A 

i 

I 

43176 

0 

c 

00013 

26*7330 

c 

00016 

0 

c 

14731 

1 

I 

66775 

1 

I 

73776 

26* 73AO 

I 

56732 

1 

I 

76776 

0 

c 

00044 

1 

c 

15 317 

26*7350 

I 

47575 

0 

I 

70616 

i 

c 

15653 

0 

c 

14033 

26*7 360 

c 

15601 

1 

c 

15653 

0 

c 

15374 

0 

I 

41775 

26*7370 

c 

33323 

0 

I 

767 76 

0 

c 

14040 

0 

I 

75176 


NASA 1021108-021 
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the right of each WoRDT •’©» DeNOTE^> unused fixed memory, 
(Interpretive operator woRdS) or »c'* (constants). 


1 

1 : 

73575 

1 

I 

62515 

1 

c 

00047 

1 

c; 

77777 

0 

1 

c: 

00037 

0 

c 

14770 

1 

I 

7 O 775 

0 

1 : 


1 

1 

l: 

73776 

0 

c 

OOOO 5 

1 

c 

00001 

0 

CJ 

15106 

1 

0 

c: 

15061 

1 

I 

66775 

1 

I 

73776 

0 

c; 

00003 

1 

0 

c 

00007 

0 

c 

00001 

0 

c 

15520 

1 

i; 

43574 

0 

0 

c 

00001 

0 

c 

00002 

0 

c 

00007 

0 

c; 

15204 

0 

0 

c 

15100 

1 

I 

43574 

0 

I 

70672 

0 

It 

66772 

0 

1 

c 

00002 

0 

c 

OOOO 7 

0 

CJ 

15204 

0 

I ; 

66775 

1 

0 

c 

15520 

1 

I 

66775 

1 

I 

73776 

0 

c: 

00003 

1 

0 

c 

00007 

0 

c 

00005 

1 

c 

15520 

1 

ii 

43574 

0 

0 

c 

00005 

1 

c 

OOOO 2 

0 

c 

00007 

0 

c; 

15204 

0 

1 

c 

15151 

0 

I 

66775 

1 

I ; 

73776 

0 

C! 

OOOO 7 

0 

1 

c 

00007 

0 

c 

00001 

0 

Cl 

15120 

0 

c; 

15520 

1 

1 

c 

15176 

0 

I 

43574 

0 

II 

70672 

0 

It 

66772 

0 

1 

c 

00002 

0 

c 

OOOO 7 

0 

c: 15204 

0 

I ; 

66775 

1 

1 

c 

15120 

0 

I 

66775 

1 

I i 

73772 

1 

c; 

OOOO 7 

0 

1 

I 

66756 

0 

I 

66772 

0 

Cl 

15565 

0 

c: 

15213 

0 

1 

I 

7 O 772 

1 

c 

15573 

1 

Cl 

15222 

1 

c; 

15565 

0 

0 

I 

47575 

0 

I 

63776 

1 

C! 

00002 

0 

c; 

33455 

0 

0 

c 

15240 

0 

I 

76776 

0 

c. 

15657 

1 

1 ; 

76574 

0 

1 

c 

01477 

1 

c 

01367 

1 

I 

53774 

0 

I : 

75606 

0 

1 

c 

15601 

1 

c 

01367 

1 

I 

\ 42775 

1 

I ; 

63703 

0 

0 

I 

65175 

1 

I 

66756 

0 

c 

; 01455 

1 

c; 

00021 

1 

0 

c 

77777 

0 

c 

77777 

0 

c 

; 0136T 

1 

c: 

15310 

1 

1 

c 

21043 

0 

c 

33455 

0 

I 

: 40576 

1 

I i 

45175 

0 

0 

c 

33455 

0 

I 

40576 

1 

1 

T T2575 

0 

I : 

42576 

0 

0 

c 

32015 

1 

I 

73575 

1 

I 

; 67572 

0 

c; 

00014 

1 

0 

c 

00003 

1 

c 

00001 

0 

c 

; 15520 

1 

I : 

43574 

0 

0 

c 

00001 

0 

c 

; OOOO 2 

0 

c 

; 00003 

1 

c; 

15204 

0 

1 

I 

42774 

0 

I 

: 65132 

1 

I 

: 43776 

0 

C; 

01367 

1 

1 

I 

41753 

0 

c 

I 01367 

1 

c 

I 15601 

1 

c; 

01367 

1 

0 

c 

01403 

1 

c 

; 33323 

0 

I 

: 76776 

0 

c: 

14040 

0 


I 


i 


48Ab78A Yuu System for agca; revisun o of program solrumss by 


OC-TAL listing of paragraph # 133» I^ITH PARITY BIT IN BINARY AT 

All valid ^^oRd^ are basic inSirlcuons except those marked "I" 


2 6 1 7 A 00 

I 

A 1775 

1 

I 

73176 

0 

c 

01367 

1 

c; 01411 

26 WALO 

I 

66756 

0 

c 

0 1 45 5 

1 

c 

15553 

0 

c; 15520 

26t /A20 

C 

01367 

1 

c 

33323 

0 

I 

65176 

1 

c; 01455 

26 » 7A30 


04000 

0 

I 

44576 

0 

c 

01472 

1 

i: 43173 

26 * 7 A AO 

c 

15567 

1 

C: 

l550a 

1 

c 

00051 

0 

c: 15460 

26»7A50 

c 

15507 

1 

I; 

56775 

1 

I 

66772 

0 

C: OODOl 

2b »7A60 

I 

A3776 

0 

C: 

00007 

0 

c 

00005 

1 

C; 15472 

2b *7A70 

c 

15507 

1 

1 : 

7077A 

1 

l! 

56732 

1 

l; 76776 

26i7500 

c 

15204 

0 

I 

43175 

u 

1 : 

43^72 

1 

Cl 00051 

26» /510 

I 

A5175 

0 

I 

56 776 

1 

C; 

01455 

1 

C; 03002 

26*7520 

c 

15530 

0 

1 

77576 

u 


03452 

1 

C; 04000 

26f ?530 

I 

63703 

0 

c 

01367 

i 

C; 

01411 

1 

c: 00002 

26 » f5A0 

c 

07772 

1 

c 

1A276 

1 

c 

16203 

1 

c; DA007 

26.7550 

c 

3 O 5 O 6 

1 

c 

22276 

i 

c 

OO 1 O 4 

1 

c: 10421 

26.7560 

c 

OO 2 IO 

1 

c 

210A1 

1 

c 

04000 

0 

cr 03000 

26.7570 

c 

06553 

1 

c 

06165 

0 

c 

20000 

0 

c: 00300 

26.7 600 

c 

00000 

1 

c 

00000 

1 

c 

20000 

0 

c; 03000 

26.7610 

c 

00000 

1 

c 

00000 

1 

c 

67222 

1 

c: 52116 

26.7620 

c 

00000 

1 

c 

00003 

1 

c 

10555 

0 

c: 25661 

2b. 7630 

c 

00133 

0 

c 

00327 

L 

c 

00243 

1 

CJ 327 O 3 

26.76A0 


50123 

1 


O 47 O 3 

1 


34475 

0 

07637 

26.7650 


33544 

1 


07637 

I 

c 

07 777 

1 

Cs IA256 

26.7660 

I 

: 41406 

0 

c 

01367 

1 

c 

01411 

1 

c; 15655 

26t 7670 

I 

: 75753 

1 

c 

210A3 

0 

c 

OI 5 OI 

1 

c: 33323 

26.7700 

c 

33A55 

0 

I 

76 71b 

0 

c 

15522 

0 

C; 1A250 

26.7710 

c 

05075 

0 

I 

66774 

0 

I 

73615 

1 

I; 666l6 

26. 7720 

c 

25302 

1 

c 

15770 

0 

c 

15755 

1 

i: 52775 

26.7730 

c 

33306 

1 

I 

52775 

0 

I 

44776 

1 

C: 01101 

26. 77A0 

c 

; 2 I 6 A 3 

0 

I 

: 77576 

0 


02276 

0 

C; 03005 

26.7750 


51672 

0 


47771 

Q 


05720 

1 

C; 61613 

26 .7760 


51671 

0 


51672 

u 


03430 

0 

c; 20000 

26. 7770 

c 

: 00372 

1 

c 

: 65303 

1 


07772 

1 

07773 


NASA 1021108-021 


DEC A, 1966 


page 867 


THe right OF EACH v^oRDt "fe" DeNOTES UNUSeD FIXeD MeMORY. 


t iNTERpRETIVE operator WORdS) OR "C” (CONStANTSj , 


1 

c 

33323 

0 

I! 

76776 

0 

c: 

15520 

1 

i; 

65175 

1 

1 

I 

53775 

1 

1 : 

75776 

0 

CI 

21043 

0 

c; 

01455 

1 

1 

c 

33455 

0 

1 : 

77576 

0 


03440 

1 

c; 

O4OOO 

0 

0 

I 

65132 

1 

i: 

67605 

0 

i: 

43016 

1 

CJ 

OOO5I 

0 

1 

I 

66775 

1 

1 

737 76 

0 

c: 

00007 

0 

c; 

00001 

0 

0 

c 

00002 

0 

c 

OOOO7 

0 

C; 

15204 

0 

I : 

66775 

1 

1 

I 

66775 

1 

I 

A3776 

0 

c; 

00007 

0 

c: 

00003 

1 

0 

c 

00003 

1 

c 

00005 

1 

c; 

00002 

0 

c; 

OOOO7 

0 

0 

c: 

15445 

0 

c 

15460 

1 

I i 

76776 

0 

c; 

15530 

0 

0 

C: 

33455 

0 

I 

76776 

0 

c; 

15522 

0 

I : 

76776 

0 

0 


04000 

0 

I 

44576 

0 

c; 

01472 

1 

i: 

42775 

1 

0 

c: 

33455 

0 

I 

40576 

1 


03062 

0 


03062 

0 

1 

c 

07207 

0 

c 

02705 

1 

c; 

16666 

0 

CJ 

17272 

0 

1 

c 

02631 

1 

c 

23146 

0 

c; 

02525 

1 

C; 

12524 

1 

1 

c 

10000 

0 

c 

00000 

1 

c; 

00002 

0 

c; 

00000 

1 

1 

c 

00000 

1 

c 

00000 

1 

c; 

00000 

1 

c; 

00000 

1 

1 

c 

00000 

1 

c 

00000 

1 

CJ 

15326 

1 

c; 

14356 

1 

0 

c 

00000 

1 

c 

00000 

1 

C; 

20000 

0 

C! 

00000 

1 

1 

c 

00000 

1 

c 

00000 

1 

c; 

15326 

1 

CJ 

14356 

1 

1 

c 

00525 

0 

c 

12374 

1 


33540 

0 


60067 

0 

1 


335A2 

1 


07637 

1 


33554 

0 


07637 

1 

0 

c 

07737 

0 

c 

27II6 

1 

I; 

A277A 

0 

I; 

7O6I6 

1 

0 

c 

15410 

0 

c 

15601 

1 

c; 

01477 

1 

I ; 

53775 

1 

0 

I 

45175 

0 

I 

56776 

1 

CJ 

15557 

1 

CJ 

00002 

0 

0 

c 

00520 

0 

c 

lA3l3 

0 

c; 

27520 

0 

CJ 

OOI34 

1 

0 

c 

01465 

1 

c 

01672 

0 

C; 

25302 

1 

CJ 

00023 

0 

0 

I 

44776 

1 

c 

OIIO7 

0 

C! 

01052 

1 

c; 

00002 

0 

0 

c 

01052 

1 

c 

00003 

1 

c; 

33300 

1 

I ; 

76776 

0 

1 


O343O 

0 

c 

; 20000 

0 


34476 

0 


51671 

0 

1 

1 

: 77576 

0 


03007 

0 

c: 

01411 

1 


34476 

0 

0 


04000 

0 

I 

; 76776 

0 

c; 

25302 

1 

c; 

00000 

1 

0 

CKSM 45517 

0 
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YUL SYSTEM FOR AGC<t; REVISION 0 OF PROGRAM 50LRUM55 BV 


O^-TmL listing oF paragraph 0 134» with PARITY BIT IN BINARY AT 
ALL VALID WORDS ARe BASIC INSTRUCTIONS EXCEPT THOSE MARKED »• I " 


2 / f 0 0 0 

C 

61364 

1 


36000 

1 


06005 

1 

C! 

6l3l3 

2 / »6010 

C 

00005 

1 


37200 

1 


02173 

0 

C: 

5 b004 

27*6020 

c 

57147 

1 


32152 

0 


02046 

1 

c; 

56033 

27*6030 

c 

OOOO5 

1 


02256 

1 

C: 

00062 

0 


31350 

27 *60A0 


41001 

0 


51^03 

1 


41003 

1 


51407 

27*6050 


05654 

0 

C: 

3101 7 

u 


04000 

0 

I; 

76776 

2 7 * 6060 

1 ; 

75776 

0 

C; 

00774 

0 

C: 

21132 

1 

Ci 

33315 

27*6070 

c: 

I6O77 

0 

C: 

01016 

i 

C; 

01044 

0 

CJ 

21154 

27*6100 

c 

33570 

0 

I; 

63776 

1 

C; 

00035 

1 

c; 

00003 

27 » 6 1 10 

C 

33432 

1 

I; 

63776 

1 

C: 

00037 

0 

C: 

00002 

27*6120 

c 

01016 

1 

C: 

00002 

0 

C; 

33347 

1 

1 : 

45176 

27 *61 30 

I 

47776 

1 

C; 

01002 

1 

C: 

00003 

1 

c: 

21134 

27*6140 

c 

01315 

1 

C: 

01016 

1 

C 

33562 

0 

i: 

43575 

27.6150 

c 

33145 

1 

I; 

76776 

0 

C 

13463 

1 

I: 

47575 

2 ^*6l60 

I 

42773 

1 

I : 

666 1 6 

0 

I 

7O7I6 

0 

I : 

61176 

2 / *6170 

c 

21064 

0 

C: 

00002 

0 

c 

33111 

0 

I : 

77576 

27*6200 

c 

01375 

1 

CJ 

56216 

1 

I : 

77576 

0 


36201 

27*6210 


02312 

0 

C; 

00003 

1 


40067 

1 


4OOOO 

27*6220 

I ' 

66756 

0 

I; 

41556 

1 

C; 

01620 

1 

c; 

01365 

27 * 6 2 3 0 

c 

0134? 

0 

Ct 

16524 

0 

1 ; 

66775 

1 

I : 

43776 

27*6240 

I 

70653 

0 

1 : 

65722 

0 

C: 

01363 

0 

c 

01331 

27 *6250 

I 

47575 

0 

I ; 

65722 

u 

C: 

01365 

0 

c 

01341 

2 7*6260 

c 

01624 

0 

C: 

16303 

0 

I ; 

47571 

1 

I 

6 4 7 1 2 

27.6270 

c 

01^36 

1 

C: 

01440 

0 

C: 

21162 

1 

c 

21164 

27*6300 

c 

01626 

1 

C: 

33626 

0 

I 

66775 

1 

I i 

73776 

27*6310 

c 

01101 

0 

C : 

01327 

0 

I 

66775 

1 

I ! 

62776 

27*6320 

I 

( 64712 

1 

I : 

70732 

u 

I 

64712 

1 

C! 

01347 

27*6330 

C: 01624 

0 

C: 

01622 

u 

C 

21114 

0 

I i 

7I773 

27*6340 

c 

! 00001 

0 

C: 

21242 

0 

c 

1 6346 

1 

c 

21224 

27*6350 

c 

; OOOO5 

1 

C; 

01341 

a 

C 

16372 

0 

1 

47576 

27 * 6 3 6 0 

1 

: 64776 

0 

C: 

16740 

0 

c 

01363 

0 

c 

21122 

27*6370 

c 

; 16740 

0 

1 ; 

7657 5 

1 

I 

64772 

1 

c 

2O6O7 
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the right of each word; ”&» denote^ unused fixed Memory, 


(Interpretive operator woRdsj or (Constant^). 


1 


36003 

1 


05750 

0 


33535 

1 


02312 

0 

0 


41465 

0 


50667 

0 


36032 

0 


02173 

0 

1 


355O3 

1 


5 1 4 1 4 

1 


33536 

1 


02312 

0 

0 


65503 

1 


31350 

0 


34516 

1 


5IO35 

0 

0 


41005 

1 


51413 

0 


02276 

0 

c; 

01705 

1 

0 

c 

21551 

0 


02276 

0 

c: 

02105 

1 


O4OOO 

0 

0 

I 

43574 

0 

1 : 

41766 

0 

I : 

50776 

1 

c; 

00010 

0 

1 

c 

01315 

1 

c; 

33315 

0 

I : 

47575 

0 

I ; 

73176 

0 

1 

c 

33343 

0 

I 

66776 

1 

c; 

01343 

1 

c: 

21055 

1 

0 

c 

33620 

0 

I 

42775 

1 

I; 

63776 

1 

C J 

01315 

1 

0 

c 

01363 

0 

c 

33416 

1 

I ; 

71174 

0 

I ; 

63722 

0 

1 

c 

21024 

1 

c 

33363 

1 

1 : 

41 775 

1 

I : 

73176 

0 

1 

I 

45176 

0 

CJ 

OOOlO 

0 

c: 

20773 

0 

ci 

01465 

1 

0 

I 

42771 

0 

C; 

01562 

1 

C; 

20265 

1 

C; 

33113 

1 

0 

c 

01215 

0 

CJ 

01016 

1 

c: 

21064 

0 

c; 

21031 

0 

0 


02276 

0 

c: 

O22O5 

1 


O4OOO 

0 

1 : 

44576 

0 

1 


51374 

0 


02362 

1 

c; 

00065 

1 


44516 

0 

0 


50123 

1 


04000 

0 

I : 

66773 

1 

I ; 

43605 

0 

0 

Ci 

16442 

1 

C! 

01363 

0 

c; 

01327 

0 

c: 

16470 

0 

0 

Ci 

01363 

0 

C! 

01602 

1 

C! 

I667I 

0 

1 ; 

64774 

1 

1 

c 

01630 

0 

c 

21043 

0 

c; 

01632 

1 

c; 

33624 

1 

0 

c 

33626 

0 

I 

66775 

1 

I : 

73635 

0 

c; 

01612 

0 

I 

I 

7O722 

1 

I 

64722 

1 

I : 

62712 

1 

I : 

65776 

1 

1 

c; 

00001 

0 

c 

77777 

0 

CJ 

01434 

0 

C! 

01624 

0 

0 

c 

01363 

0 

c 

21240 

1 

c: 

16320 

1 

I ; 

66776 

1 

0 

c 

01363 

0 

c 

01327 

0 

c; 

33622 

1 

I ; 

66773 

1 

0 

c 

01626 

1 

c 

01622 

0 

C! 

21112 

0 

CJ 

01620 

1 

1 

I 

65132 

1 

I 

! 73722 

1 

I ; 

70656 

0 

c; 

16372 

0 

0 

c 

21242 

0 

I 

63775 

1 

I : 

70746 

0 

c; 

77777 

0 

0 

c 

33223 

1 

I 

47573 

0 

li 

43605 

0 

1 : 

66756 

0 

0 

c 

16740 

0 

c 

21057 

0 

c; 

33223 

1 

1 : 

76776 

0 

1 

c 

21144 

0 

c 

16354 

1 

I : 

45I76 

0 

c: 

01225 

0 


4e^578A yUL SySThM FOR AqC^: REvISIuN 0 OF pROGRAM SOLRUM55 BY 


OLTAL LlSjlNO OF PARAGRAPH # 135» WITH PARItV BIT IN BINARY AT 

All valid words ARl basic instructions except those marked "I" 


27 ♦ 6 A 00 

C: 33325 

0 

1 1 

A5l76 

0 

c 

01365 

0 

c; 

33371 

27 » 6 A 1 0 

c: 01375 

1 

I : 

64776 

0 

c 

01432 

0 

c; 

21200 

27 t bA20 

C; 21116 

i 

C; 

01620 

I 

c 

01347 

0 

c; 

21130 

27t6A30 

1 : 63746 

i 

I : 

76776 

0 

c 

01363 

0 

c; 

77777 

2 7 *6A40 

C; 1635A 

1 

1 : 

66774 

0 

I 

64742 

1 

I 

64 742 

27 »6A60 

C: 21130 

0 

C; 

21 1 A& 

1 

I 

66775 

1 

I 

51112 

27 » 6 A 6 0 

II 62706 

1 

1 ; 

66776 

1 

c 

01365 

0 

c 

01343 

27 « 6 A 70 

36521 

i 


51374 

u 


02362 

1 

c; 

00066 

27»6500 

C; 21142 

0 

C 

16516 

L 


03373 

0 

c 

AOlOO 

27*6510 

C: 21070 

0 

C 

01363 

0 

c 

16 5 32 

1 

I 

77576 

27*6520 

0650A 

0 

c 

56475 

1 

c 

56544 

1 

I 

66775 

27.6530 

C: 16233 

1 

I 

42575 

u 

I 

77576 

0 

C! 

00011 

27*65A0 

5137A 

0 


02362 

1 

c 

00067 

0 


04000 

27*6550 

I I 73775 

0 

C! 

01620 

1 

c 

2U20 

1 

c: 

17006 

27.6560 

c: 01562 

1 

C: 

16676 

i 


45642 

0 


51107 

27.6570 

11107 

1 


06563 

1 


6A516 

1 


51420 

27*6600 

31420 

0 


25777 

1 


5 I 42 O 

0 


51422 

27*6610 

51107 

0 


20000 

0 


47203 

0 


21107 

27*6620 

67203 

1 


21421 

0 


51100 

1 


11421 

27*6630 

25777 

1 


41105 

0 


51420 

0 


41346 

27 *66A0 

25777 

1 


4 1 1 0 4 

1 


6U20 

0 


61102 

27 * 6 6 5 0 

C; OIIO 7 

0 

C 

00004 

0 

c 

: oiiu 

1 

1 

43173 

27*6660 

cj 77777 

0 

C 

00006 

i 

c 

: 16705 

1 

c 

21170 

27 . 667 O 

I; A5i76 

0 

c 

21144 

0 

c 

; 33223 

1 

I 

76776 

27*6700 

C: 211AA 

0 

c 

33223 

1 

I 

: 76776 

0 

c 

16712 

27*6710 

C: 33223 

l 

I 

66774 

0 

I 

; 43742 

1 

1 

73722 

27*6720 

c: 16671 

0 

c 

2120& 

0 

I 

; 64775 

0 

I 

70722 

27*6730 

I: 70653 

0 

I 

70756 

1 

c 

; 21210 

1 

c 

01343 

27 *67A0 

I: 6 A 7 A 2 

1 

c 

! 00007 

0 

c 

: 16776 

0 

c 

I 01343 

27*6750 

I; 66756 

0 

I 

; 41456 

0 

I 

; 73605 

0 

I 

I 56776 

27*6760 

C: 01373 

1 

c 

; 17070 

0 

c 

; 00025 

0 

c 

; 00002 

27*6770 

c: 01113 

0 

c 

: 01373 

1 

c: 00025 

0 

c 

; 16776 


NASA 1021108-021 


DEC A* 1966 


PAgE 869 


iHl right of each word; denotes unused fixed 

(INTERPRETIVE OPERATOR WORpS) OR ”C” (CONSTANTS) 


1 

I 

75575 

1 

I 

76535 

0 

C: 23010 

1 

c 

0 

1 

64774 

1 

I 

62742 

1 

l: 6A742 

1 

c 

0 

I 

A5176 

0 

C 

21116 

1 

l: 66773 

1 

I 

0 

c 

21126 

1 

c 

77777 

0 

c; oooii 

1 

C 

1 

c 

01620 

1 

C; 

01365 

0 

c: 21144 

0 

C 

1 

c 

01365 

0 

C; 

01620 

1 

C; 21222 

0 

I 

1 

c 

01602 

1 

1 : 

767/6 

0 

c; 16427 

1 

I 

1 


04000 

0 

1 1 

66775 

1 

I! 73775 

0 

c 

1 


04000 

0 

I 

70775 

0 

l; 66756 

0 

c 

0 


07032 

1 

I 

77576 

0 

03405 

0 

c 

1 

1 : 

666l6 

0 

c 

01620 

1 

c; 0l6l6 

1 

c 

1 


445 1 6 

0 


02312 

0 

c; 00003 

1 


0 

I ; 

66772 

0 

I ; 

73605 

0 

l: 43576 

1 

1 

1 

C; 

00007 

0 

Cl 

16700 

1 

C; 01215 

0 

c 

0 


41617 

1 


21107 

1 

67203 

1 


0 


21107 

1 


47203 

0 

21107 

1 


1 


34477 

1 


51421 

1 

37201 

0 


1 


67204 

0 


2577 7 

1 

41422 

0 


0 


06605 

I 


41101 

1 

aoooo 

0 


0 


60000 

1 


60000 

1 

60000 

1 


0 


31106 

1 


O 4 OOO 

0 

1; 43 I 75 

0 

I 

0 

I 

6 I 7 I 6 

0 

I 

71742 

0 

I; 71776 

1 

c 

1 

C 

16705 

1 

c 

33223 

1 

i; 76776 

0 

c 

0 

C 

I 674 O 

0 

I 

42576 

0 

c; 00007 

0 

I 

1 

1 

76575 

1 

I 

64776 

0 

CI 20607 

1 

c 

1 

c 

21202 

1 

c 

01363 

0 

c; 16740 

0 

t 

1 

C 

0U32 

0 

c 

21204 

1 

C! 21144 

0 

I 

1 

C 

77777 

0 

c 

01347 

0 

CI I 667 I 

0 

I 


1 

c; 

21150 

0 

C: 

21152 

1 

c; 

32025 

1 

1 

1 

C: 

01223 

0 

C: 

21176 

1 

Cl 

16766 

1 

c 

0 

c: 

32025 

1 

I : 

53774 

0 

1 1 

66756 

0 

I 

0 

C: 

17045 

0 

l; 

62774 

1 

I : 

56703 

0 

I 


Memory, 


20265 1 
21206 0 
6A742 1 
16372 0 

013A7 0 
51l7A 1 
77576 0 
01363 0 


01327 0 
AOlOO I 
21066 1 
36522 1 

A1612 1 
01016 1 
10000 0 
67204 0 

6110 ? 0 
21107 1 
61362 1 
61103 1 


: 56726 1 

; oiloi 0 

; 16712 1 

; 47I76 1 
; 21IAA 0 

; 21202 1 

; 6277A 1 

! 43575 I 

; 65172 0 
; 01113 0 

; 76576 1 
; 53776 1 


4tj4b78A yul System for agc4: revision o of m^ogRAm solrumss by 


ULtAL listing qF paragraph # 136, rtiTH PARliY Blj IN BINARY Aj 

All valid wqRdS arl basic inStRuchuns except those marked "I" 


27 

,7000 

C: 01223 

0 

C: 

21144 

0 

c: 

00002 

0 

c; 

01373 

27 

* 7010 

41472 

0 


50115 

1 


J4504 

1 


25777 

27 

,7020 

07024 

0 


20000 

u 


34477 

1 


60115 

27 

♦ 7030 

645 1 4 

0 


50675 

0 


02276 

0 

C; 

OI4O5 

2 7 

♦ 7O4O 

032S0 

0 


03362 

0 


02124 

1 

c: 

00662 

27 

♦ 7C5O 

O47O3 

1 


07053 

0 


O47O3 

1 


11372 

2 7 

♦ 7 C 6 0 

51450 

1 


O47O3 

1 


20000 

0 


34477 

2 7 

♦ 7O7O 

C: 21176 

1 

C: 

01223 

0 

c: 

33223 

1 

I ; 

76776 

27 

*7100 

02256 

1 


OAOOO 

0 

I ; 

^6776 

0 

C! 

212AA 

27 

♦ 7110 

C; 01521 

0 

Cj 

00017 

1 


30115 

1 


60000 

2 7 

*7120 

60117 

0 


31352 

1 


^,0000 

0 


50117 

2 7 

♦ 7l30 

51352 

1 


41522 

1 


4OOOO 

0 


60000 

27 

*7l40 

30702 

1 


2001 7 

0 


37146 

0 


02173 

27 

♦ 7 1 5O 

2 14I4 

0 


5I4OO 

1 


4OO45 

1 


2U14 

27 

*7l60 

11414 

0 


07165 

1 


35503 

1 


5 1 4 1 4 

27 

f 7I7O 

C; 57147 

1 


02256 

1 


32151 

0 


02052 

27 

♦ 7200 

c: 00310 

0 

C 

00017 

1 

c: 

73777 

1 

C! 

00000 

27 

♦ 7210 

c; 03721 

0 

c 

05230 

0 

C: 

06213 

1 

C: 

10550 

2 7 

*7220 

C; 1645? 

0 

c 

25570 

1 

C: 

77573 

0 

c: 

77573 

2 7 

♦ 7230 

c: 76071 

0 

c 

75570 

1 

C; 

7A66I 

0 

c: 

7AA36 

27 

♦ 7240 

c; Aoooo 

0 

r- 

00000 

1 

C; 

00000 

1 

c: 

77632 

27 

♦ 7250 

C: 75322 

0 

Vo. 

73237 

0 

C: 

72104 

1 

C: 

70301 

27 

♦ 7260 

c: 76265 

1 

c 

76265 

i 

C: 

7A435 

0 

c: 

7A333 

2 7 

♦ 727O 

CJ 76200 

1 

c 

75735 

1 

C: 

75140 

0 

c: 

7AO75 

27 

♦ 7300 

C: 00000 

1 

c 

00020 

0 

Ci 

00066 

1 

c: 

00^06 

27 

*7310 

C: 02374 

0 

c 

03123 

1 

C: 

04051 

1 

C! 

05767 

27 

t 7320 

C: 76234 

0 

c 

75472 

i 

C: 

74604 

0 

c; 

74210 

27 

♦ 7330 

c: 73155 

1 

c 

7A151 

1 

C: 

76703 

1 

c: 

77575 

27 

♦ 73 4O 

C; 00204 

1 

C; 

00407 

1 

C: 

01113 

0 

c; 

02161 

2 7 

♦ 7350 

c: 13476 

0 

c 

: 20324 

0 

Cs 

2I577 

1 

C; 

21677 

27 

♦ 7360 







& 

W 




27 

♦ 7370 












NASA 1021109-021 


DEC 4* 1966 


tHe right of each word; denotes unuseo fixed Memory, 
{ iNTEf^pRETlVE operator WOKpS) OR "C" (CONSTANTS), 


1 

Cl 

33473 

1 

1 : 

/7576 

0 


34503 

0 


25777 

1 

1 


41352 

0 


6OII5 

1 


61450 

1 


501 15 

1 

1 


20017 

0 


5O7OO 

0 


44514 

1 


70675 

1 

1 


03302 

0 


O7O42 

0 


37043 

1 


03100 

0 

0 


41372 

1 


51372 

0 


11222 

0 


O47O3 

1 

1 


37202 

0 


O7O57 

1 


47202 

1 


61450 

1 

1 


61450 

1 


51450 

1 


04703 

1 

1 ; 

53776 

1 

0 

c: 

16776 

0 


32150 

1 


02046 

1 

Ci 

57IOI 

0 

0 

I: 

76776 

0 

CI 

04353 

0 

1 1 

66775 

1 

I ; 

77576 

0 

1 


50117 

0 


07121 

1 


20000 

0 


34477 

1 

0 


61352 

1 


50000 

1 


07131 

0 


40117 

1 

1 


3O7OI 

1 


41524 

1 


40000 

0 


60000 

1 

0 

C: 

57075 

1 


02124 

1 

Ci 

00003 

1 


4OO44 

0 

0 


51404 

0 


40046 

1 


21414 

0 


51410 

0 

1 


02256 

1 


51414 

1 


37I77 

1 


02173 

0 

1 

C: 

57176 

0 


02256 

1 


02124 

1 

c; 

00062 

0 

1 

c: 

00153 

0 

CI 

00527 

1 

Cl 

01235 

1 

CI 

02337 

1 

0 

C: 

11717 

0 

CI 

13314 

0 

C! 

14736 

0 

CI 

16255 

1 

0 

C: 

77516 

0 

CI 

77360 

1 

c; 

77IO6 

0 

c: 

76516 

1 

0 

c: 

73212 

1 

c: 

71640 

0 

CI 

54557 

1 

c; 

40000 

0 

0 

c: 

77563 

1 

c; 

7 ?354 

0 

CI 

76/12 

1 

c: 

76066 

0 

1 

C: 

65635 

1 

c: 

57311 

0 

CI 

50575 

0 

C; 

50575 

0 

1 

C! 

74433 

0 

CI 

74763 

0 

c; 

75432 

0 

CI 

75735 

1 

0 

CI 

73312 

0 

ci 

73732 

0 

c: 

73732 

0 

C I 

00000 

1 

0 

C; 

00431 

1 

C: 

00712 

0 

CI 

01136 

1 

CI 

O2OI5 

1 

1 

C; 

07476 

0 

Cl 

07476 

0 

CI 

765U 

0 

CI 

76511 

0 

1 

c: 

74052 

0 

CI 

73735 

1 

c; 

73217 

1 

CI 

73013 

1 

0 

c: 

77575 

0 

CI 

00006 

1 

c; 

00006 

1 

CI 

00116 

1 

0 

Cl 

03260 

0 

c: 

0371 7 

0 

c: 

05411 

0 

CI 

10057 

1 

1 


07354 

1 


07355 

0 

Ck,5M 

66062 

0 


@ 




§ 






& 



@ 




§ 



§ 









48^&78A VUL system FOR AGc^ti RtVIbljN 0 OF PRjGRAM SoLRUMSb BY 


octal listing of paragraph § lAO* with paritv' bit in binary at 

all \yALlD WORDS ARe BASIC INSTRUCTIONS EXCEPT THOSE MARKED "I" 


30 i6000 

I ; 

5357a 

1 

I 

A5535 

0 

I 

76776 

0 

c: 

00002 

30,6010 

I; 

A5535 

0 

c 

OOOO3 

I 

c 

01303 

0 

C; 

01301 

30,6020 

1 ; 

75535 

0 

I 

75535 

0 

I 

75535 

0 

c: 

15575 

30,6030 

C! 

00005 

1 

c 

01312 

0 

C 

00023 

0 

c: 

013U 

30 t60AO 

c: 

33115 

1 

I 

A7576 

0 

C 

33123 

1 

I : 

A 7 576 

3O ,60^0 

C ! 

OOOO7 

0 

I 

75375 

1 

I 

51622 

0 

C: 

02231 

3 0 , 6060 

I : 

A7576 

0 

r- 

w 

36311 

i 

I 

51576 

1 

c; 

20052 

30,6070 


OAOOO 

0 

I 

71575 

0 

I 

5 5AA5 

1 

c; 

01301 

30,6100 

I : 

A3576 

I 

c 

00023 

0 

c 

10310 

1 

i; 

72776 

30,6110 

C; 

01267 

0 

c 

OllA? 

1 

c 

20aOA 

0 

C: 

OOOIA 

3O ,6120 

1 : 

737A2 

1 

I 

66756 

0 

c 

20132 

0 

C: 

01263 

30,6130 

C: 

O71 10 

0 

I 

A5175 

0 

I 

53776 

1 

c: 

20250 

30*61A0 

I : 

76776 

0 

c 

071AA 

1 

I 

A3175 

0 

I : 

73636 

30,6150 

1 : 

55576 

0 

c 

00015 

u 

c 

00007 

0 

I; 

75375 

30 ,6160 

c; 

00002 

0 

f- 

36231 

1 

I 

75375 

1 

I : 

52622 

30,6170 

c; 

36A61 

1 

I 

51576 

1 

c 

2015A 

0 

I : 

AA576 

30,6200 

I : 

75176 

0 

c 

01107 

0 

c 

33223 

1 

I : 

71575 

30,6210 

I; 

70775 

0 

1 

75535 

u 

c 

01267 

0 

C; 

202A2 

30,6220 

c; 

2OO7O 

1 

I 

7 5775 

0 

1 

52622 

0 

c: 

01101 

30,6230 

1 : 

70775 

0 

I 

75535 

u 

c 

01267 

0 

c; 

202AA 

30,62A0 

c: 

20070 

1 

C; OOOOA 

0 

c 

: 2 7 ‘♦AO 

1 

c : 

00000 

30,6250 

C; 

00A51 

1 

C 

• 30000 

1 


02676 

1 


AO572 

30 ,6260 


35501 

0 


50066 

1 


50117 

0 


05237 

30,6270 


36302 

0 


50102 

1 


60067 

0 


50001 

30,6300 


06271 

0 


0A703 

1 

c 

; 000A5 

0 


10115 

30,6310 


06312 

1 


A550i 

i 


3003A 

0 


30115 

30,6320 


30116 

1 


3003A 

0 


30115 

1 


05237 

30,6330 


35501 

0 


60115 

L 


60115 

1 


10000 

30,63a0 


05237 

1 


20000 

0 


3AA77 

1 


60115 

30,6350 


20067 

1 


5OOA0 

u 


A 00A5 

1 


AOOOO 

30,6360 


20067 

1 


5OOA A 

1 


20016 

1 


355OI 

30,6370 


20067 

1 


500A5 

0 


5OO66 

1 


A55D1 


NASA 1021108-021 


DEC A, 1966 


PAGE b71 


tHe right oF each word? '*©•' denotes unused fixed memory. 


(Interpretive 

operator 

WORDS) OR '»Cw (CONSTANTS), 


0 

c 

01303 

0 

c ; 

01301 

1 c 

20015 

1 

I 

53575 

0 

1 

1 

75170 

0 

I : 

^5535 

0 I 

75535 

0 

I 

75535 

0 

1 

c 

00001 

0 

c; 

0130a 

1 c 

00021 

1 

c 

01313 

1 

0 

c 

07A31 

0 

C : 

OlOAO 

1 c 

20070 

1 

c 

01305 

0 

0 

c 

331A5 

1 

I : 

75575 

1 I 

55576 

0 

c 

00015 

0 

0 

c 

27273 

1 

c: 

01052 

I c 

00003 

1 

c 

36231 

1 

i 

I 

A5176 

0 

c: 

01211 

i c 

33267 

1 

I 

77576 

0 

i 

c 

00002 

0 

C; 

20101 

0 1 

76776 

0 

c 

2010A 

0 

i 

c 

00123 

1 

I : 

6677A 

0 I 

76516 

1 

I 

62776 

0 

1 

c 

07A31 

0 

C: 

33263 

0 I 

71773 

1 

I 

65132 

1 

1 

c 

202A6 

0 

CJ 

201A1 

1 c 

202A6 

0 

c 

20250 

1 

i 

c 

01263 

1 

C! 

33263 

0 I 

76776 

0 

c 

O 7 IIO 

0 

0 

c 

01301 

1 

c: 

20176 

0 c: 

20222 

1 

1 

75575 

1 

1 

I 

52622 

0 

C; 

02231 

0 C; 

27277 

0 

c 

OIO 52 

1 

0 

c 

02A61 

0 

c: 

27277 

0 Cl 

01052 

1 

c 

00002 

0 

0 

c 

01303 

0 

i; 

75176 

0 c. 

01101 

0 

c 

33215 

1 

0 

I 

55AA5 

1 

c; 

01301 

1 c 

00002 

0 

c 

20150 

1 

1 

c 

00001 

0 

C; 

01301 

1 c 

33267 

1 

I 

76776 

0 

0 

c 

1352A 

0 

C5 

01052 

1 c 

00002 

0 

c 

33231 

1 

1 

c 

00002 

0 

c; 

01301 

1 c 

33267 

1 

I 

76776 

0 

1 

c 

00620 

0 

c; 

00000 

1 c 

1AA52 

1 

c; 12317 

1 

0 

50115 

1 


AOS n 

1 

50116 

1 


20016 

1 

1 


A0067 

1 


AOOOO 

0 

50123 

1 


0A703 

1 

0 


35501 

0 


20001 

1 

50000 

1 


10102 

0 

0 


06311 

1 


06311 

1 

06307 

0 


AA52 2 

1 

i 


25777 

1 


AA522 

1 

3003A 

0 


60003 

1 

i 


35501 

0 


30116 

1 

60000 

1 


5003A 

0 

0 


6A516 

1 


0633? 

0 

AOOOO 

0 


50115 

1 

1 


06337 

0 


20017 

0 

aooaa 

0 


AOOOO 

0 

0 


20067 

1 


500A2 

1 

aOOA6 

1 


^0000 

0 

0 


20067 

1 


5 OOAI 

1 

2006 1 

1 


500A3 

0 

1 


052A0 

1 


20067 

1 

A00A6 

1 


AOOOO 

0 


48-^b78A YUL SYSTEM l-OR A&C4: REVISION 0 0^ R^OGRAM S0LRUMS5 BY 


octal listing oF paragraph * iAi» ^ith parity bit in binary at 

ALL VALID WORDS ARf BASIC INSTRUCTIONS EXCEPT THOSe MARKED mIh 


30i6400 


05654 

0 

C: 

31‘t33 

1 

04 703 

1 


05654 

30,d410 


50115 

1 


34502 

1 


1 


04024 

30,6420 


50100 

0 


6000D 

I 

60070 

0 


20000 

30,6430 


10077 

0 


50077 

i 

10100 

1 


06420 

30 <6440 

I : 

47574 

1 

I ; 

57726 

0 

1; 77576 

0 

c: 

00040 

30 , 6450 

C: 

00000 

1 

Cj 

01001 

1 

C: 14 636 

1 

C; 

00325 

30,64 60 


50117 

0 


36502 

0 

30116 

1 


50100 

30,6470 


40037 

1 


05422 

0 

30117 

0 


30116 

30,6500 


0523; 

1 

c 

00542 

1 

Cl 34414 

1 


06563 

30,6510 

I : 

70746 

0 

I 

47653 

1 

I: 61746 

0 

I ; 

56713 

30,6520 

c; 

00045 

0 

C 

20557 

1 

C: 00002 

0 

I : 

73 774 

30,6530 

C; 

77777 

0 


065 63 

1 

05237 

1 

1 : 

47174 

3D<6540 

c: 

21174 

0 

c 

20532 

1 

I; 47575 

0 

i: 

66771 

30,6550 

C: 

00002 

0 

c 

20506 

0 

I: 45175 

0 

I : 

76576 

30,6560 

Cl 

21055 

1 

c 

00045 

0 

C: 20532 

1 


30120 

30,6570 


20067 

1 


30035 

1 

50121 

0 


40061 

30,6600 


74720 

1 


30063 

1 

72261 

1 


40000 

30,6610 


06621 

1 


06612 

1 

34500 

0 


50115 

30,6620 


05237 

1 


34476 

0 

06613 

0 


35503 

30,6630 


20072 

0 


40001 

i 

40000 

0 


60000 

30,6640 


20072 

0 


60000 

i 

10000 

0 


6A516 

30,6650 


06656 

1 


2000D 

0 

34477 

1 


20071 

30 ,6660 


50066 

1 


45503 

0 

05240 

1 


35503 

30,6670 


20071 

0 


40115 

0 

25777 

1 


44520 

30,6700 


06701 

1 


44522 

1 

60003 

I 


2 OO 72 

30,6710 


50000 

1 


10071 

0 

06664 

0 


A5501 

30,6720 


41520 

0 


25777 

1 

44503 

1 


50116 

30,6730 


06733 

0 


34476 

0 

51450 

1 


41450 

30,6740 


06751 

1 

c 

; 74000 

1 

44503 

1 


61450 

30,6750 


06744 

0 


66741 

0 

lOOOO 

0 


3^^50 3 

30 ,6760 


50115 

1 


06765 

0 

20000 

0 


34477 

30,6770 


04703 

1 

c 

; 74000 

I 

I; 43575 

1 

1: 

64776 


NASA 1021108-021 


DEC 4* 1966 


PAGE 872 


THe right of- each v^oRDi "6" DENOTE^ UnUSED FIXED MEMORY. 


(Interpretive operator woRdsi or wCh (Constantsj, 


0 

c: 

07154 

0 


05237 

1 


3641 4 

0 


60115 

1 

0 

C: 

07020 

1 


36435 

0 


5 OO 77 

1 


35503 

1 

0 


40000 

0 


40000 

0 


05654 

0 

c; 

30361 

0 

1 


06373 

0 

c: 

OO 7 O 2 

1 


06563 

1 


O 4 OOO 

0 

0 

C; 

21043 

0 


05554 

0 

c; 

00006 

1 

c; 

00000 

1 

0 

C: 

07310 

1 

c: 

00541 

1 

C; 

16735 

1 


35501 

0 

0 


36501 

0 


30115 

I 


30077 

1 


20067 

1 

1 


30115 

1 


05171 

0 

Cj 

00077 

1 


06563 

1 

1 


O 4 OOO 

0 

I : 

51176 

0 

CJ 

OOO 4 5 

0 

I ; 

51172 

1 

1 

C; 

00041 

1 

C; 

777 n 

0 

c; 

20547 

0 

c; 

20553 

0 

1 

I : 

41423 

1 

I : 

77576 

0 

c; 

00041 

1 

c; 

20534 

1 

0 

1 : 

43742 

1 

1 : 

76576 

1 

c; 

?7777 

0 

c: 

20543 

1 

0 

c; 

21174 

0 

c: 

20532 

1 

1 : 

47575 

0 

I ; 

45772 

1 

1 

C: 

21057 

0 

Cj 

20532 

1 

I; 

53775 

1 

I: 

76576 

1 

1 


20067 

1 


3 OO 34 

0 


50120 

1 


30121 

0 

1 


60063 

1 


20067 

1 


30036 

1 


50063 

1 

0 


5 OO 6 I 

0 


00001 

0 


10115 

0 


06621 

1 

1 


50116 

1 


5 OII 7 

0 


35501 

0 


50066 

1 

1 


50071 

1 


60000 

1 


6 OO 7 O 

0 


50072 

1 

1 


50034 

0 


35501 

0 


20072 

0 


60000 

1 

1 


06646 

0 


40000 

0 


2 OO 7 I 

0 


50115 

1 

0 


60115 

I 


06646 

0 


IOO 7 I 

0 


06624 

1 

1 


50071 

1 


60000 

1 


6 OO 7 O 

0 


50072 

1 

0 


50073 

0 


10003 

0 


35501 

0 


06702 

1 

0 


50001 

0 


35501 

0 


6 OO 73 

0 


2 OO 72 

0 

1 


50065 

1 


04024 

0 


03362 

0 


04703 

1 

1 


34504 

1 


6 O 7 OO 

0 


76771 

1 


51450 

1 

0 


6 O 7 OO 

0 


60116 

1 


64504 

1 


10000 

0 

1 


51450 

1 


06756 

0 


20000 

0 


44477 

0 

0 


06743 

1 


06756 

0 


40116 

0 


61450 

1 

1 


60115 

1 


25777 

1 


4450 1 

0 


51520 

1 

0 

C; 

00011 

1 

C! 

21010 

0 

C! 

01111 

1 

c: 

21136 

0 


‘♦b^bTBA YUL SYSTtM FOR REVISION 0 OF PROGRAM S0LRUMi>5 BY 


OCTAL LISTING OF PARAGRAPH f lAZt ^ITH PARITY BIT IN BINARY At 


ALL VALID WORDS ARe BASIC INSTRUCTIONS EXCEPT THQSe MARKED "I" 


30,7000 

C 

33357 

0 

I 

47575 

0 

I 

70776 

0 

c 

01465 

30,7010 

I 

43611 

0 

c 

01620 

1 

c 

21055 

1 

c 

21016 

30,7020 

c 

21140 

1 

c 

01620 

1 

c 

21002 

0 

I 

45176 

30, 7O3O 

I 

47573 

0 

I 

66723 

1 

I 

63653 

1 

I 

64776 

30,7 OaO 

1 

76576 

1 

c 

16175 

0 

c 

37777 

1 

c 

37777 

30,7050 

c 

03146 

1 

c 

14632 

0 

c 

06314 

1 

c 

31463 

30,7060 

c 

00000 

1 

c 

00001 

u 

c 

OOOOO 

1 

c 

07777 

30,7070 

c 

05512 

1 

c 

02000 

0 

c 

OOOOO 

1 

c 

76407 

30, ?100 

c 

21616 

0 

C: 

01073 

i 

c 

26234 

0 

c 

00172 

30,7110 

c 

O5IO4 

1 

C; 

11322 

L 

c 

32265 

1 

c 

75047 

3O, 7120 

c 

35746 

1 

CJ 

06751 

i 

c 

275I5 

0 

c 

00001 

30,7130 

c 

75516 

1 

c: 320^,7 

0 

c 

2 4 367 

0 

c 

37200 

30,7140 

c 

30730 

0 

C 

OOOCtO 

u 

c 

30447 

0 

c 

11463 

30,7150 

c 

3 1463 

1 

C 

OOOOO 

1 

c 

17565 

1 

c 

03657 

30,7160 

c 

ooooo 

1 

C 

0400D 

0 

c 

OOOOO 

1 

c 

07534 

30, 7I7O 

c 

03656 

1 

c 

00336 

1 

c 

21610 

0 

c 

20000 

30,7200 

c 

62716 

0 

c 

06314 

1 

c 

31463 

1 

c 

14631 

30,7210 

c 

31027 

0 

c 

04555 

0 

c 

27667 

0 

c 

37173 

30,7220 

c 

33575 

0 

c 

02233 

1 

c 

21637 

0 

c 

03146 

30,7230 

c 

14575 

0 

c 

02436 

1 

c 

27024 

1 

c 

31463 

30 , 7 24O 

c 

13103 

1 

c 

00146 

1 

c 

14632 

0 

I 

76573 

30,7250 

c 

01016 

1 

c 

01044 

0 

c 

21212 

0 

c 

00774 

30,7260 

c 

32021 

0 

I 

45176 

0 

c 

01473 

0 

c 

32017 

30,7270 

c 

00017 

1 

I 

41774 

0 

I 

73166 

1 

I 

5O753 

30,7300 

I 

: 4I753 

0 

I 

: 75762 

0 

c 

UOOOl 

0 

c 

: 21216 

30,7310 

c 

: 00002 

0 

c; 33513 

0 

1 

40576 

1 


455OI 

30,7320 


51002 

1 


51004 

1 


5 1006 

0 


51035 

30,7330 


5 1464 

0 


4 OO4 4 

0 


51034 

1 


31031 

30,7340 


5IO34 

1 


31032 

1 


3OO45 

0 


51003 

30,7350 


30046 

0 


5IOO5 

0 


5 1 006 

0 


45501 

30,7360 


70675 

1 


64516 

1 


50675 

0 


05761 

30,7370 


O7373 

1 


07353 

0 


07353 

0 


11004 


NASA 1021108-021 


DEC A, 1966 


PAGE B73 


Tht right of each ^ordj »§•• deNoteS unused fixed Memory. 


(Interpretive 

operator WORDS) 

1 

C: 

33145 

1 

1 

76776 

0 

0 

C; 

00010 

0 

I 

64775 

0 

0 

C; 

21061 

0 

c 

33363 

1 

0 

C; 

21062 

0 

c 

00016 

0 

i 

c 

12525 

0 

c 

12525 

0 

1 

c 

10000 

0 

c 

OOOOO 

1 

1 

c 

ooooo 

1 

c 

00236 

0 

0 

c 

76670 

1 

c 

05260 

0 

0 

c 

03571 

1 

c 

13132 

0 

0 

c 

72454 

1 

c 

05125 

1 

0 

c 

05732 

1 

c 

OIOO 3 

0 

1 

c 

05636 

1 

c 

00046 

0 

0 

c 

06315 

0 

c 

00023 

0 

0 

c 

00206 

0 

c 

00121 

0 

1 

c 

05075 

0 

c 

75267 

0 

0 

c 

OOOOO 

1 

c 

11207 

1 

0 

c 

23146 

0 

c 

00433 

0 

0 

c 

26300 

0 

c 

71045 

0 

1 

c 

14632 

0 

c 

00034 

0 

1 

c 

06315 

0 

c 

06314 

1 

1 

I 

41766 

0 

I 

50753 

0 

0 

c 

21214 

0 

I 

47575 

0 

0 

I 

47575 

0 

I 

55166 

0 

0 

c 

00021 

1 

c 

OOOOl 

0 

1 

c 

33477 

0 

I 

A75 75 

0 

i 


51031 

1 


51032 

1 

0 


02677 

0 


40573 

1 

1 


30044 

1 


5 IOUI 

1 

0 


5 IOO 4 

1 


400^6 

1 

I 


51002 

1 


51004 

1 

1 


11035 

1 


07313 

1 

0 


07377 

0 


O74O6 

1 


OR ”C'* (CONSTANTS). 


c 

16152 

0 

1 

66775 

1 

I 

62772 

1 

c 

01111 

1 

I 

76776 

0 

c 

I6l37 

0 

c; 

21156 

0 

c 

33111 

0 

c 

02525 

1 

c 

12525 

0 

c 

OOOOO 

1 

c 

OOOOO 

1 

c 

36763 

0 

c 

00012 

1 

c 

05572 

1 

c 

12343 

0 

c 

33062 

0 

c 

00160 

0 

c 

33500 

1 

c 

U0475 

1 

c 

06315 

0 

c 

71435 

0 

c 

13137 

0 

c 

00017 

1 

c 

06315 

0 

c 

00314 

1 

c 

17460 

0 

c 

OlOOO 

0 

c 

64700 

1 

c 

05605 

1 

c 

05301 

0 

c 

777OO 

0 

c. 

02775 

0 

c 

OOOOO 

1 

c 

73065 

0 

c 

00541 

1 

c 

30623 

0 

c 

I74I4 

0 

c. 

31463 

1 

c 

01310 

1 

1 

75776 

0 

c 

20265 

1 

I 

i 41753 

0 

c 

01016 

L 

c 

00021 

1 

I 

57I76 

0 

c 

33505 

1 

I 

47574 

1 

I 

: 41622 

1 

c 

01505 

0 


51033 

0 


35501 

0 


51465 

1 


40572 

0 


51002 

1 


4OO45 

1 


5IO34 

1 


31O33 

0 


51006 

0 


445 1 6 

0 


11006 

1 


07353 

0 


07377 

0 


IIO33 

1 


YUL SYSTEM FOR AGC4; REVlSlQr4 o OF PROGRAM SOLRUM55 BY 


qCtal Listing oF paragraph # iab* with parity bit in binary at 
ALL \/alio Words are basic instructions e^lept those marked 


30*7400 

0740a 

0 


0740a 

0 


07a04 

0 

07345 

30*7410 

07A21 

1 


07A1 2 

1 


11032 

0 

07A17 

30,7420 

073A3 

1 


11031 

0 


07426 

0 

07426 

30,7430 

02276 

0 

Cl 

0320a 

1 


02276 

0 

Cl D2305 

30,7440 

20016 

1 


02362 

1 

C: 

00063 

1 

3 7516 

30,7450 

5I35O 

0 


51352 

1 


37520 

1 

51027 

30,7460 

70645 

1 


67523 

1 


50645 

0 

20016 

30,7470 

Cl 20721 

1 

C; 

0077A 

0 

C! 

01016 

1 

c: 01115 

30,7500 

c: 01016 

1 

C: 

01115 

0 

c 

00002 

0 

C! 33111 

30,7510 

C; 01145 

0 

C; 

331A5 

1 

I 

7 6 776 

0 

C: 13450 

30,7520 

C; 14400 

0 

C; 

31000 

0 

c 

01741 

1 

c; 013AI 

30,7530 

c: 00766 

0 

C: 

000A7 

1 

c 

00003 

1 

c; oiOAi 

30 1 7540 

I ; A4376 

0 

C; 

00766 

0 

c 

00035 

1 

c: 32/66 

30,7550 

I; 75776 

0 

C; 

01002 

1 

c 

21742 

0 

1: 75775 

30,7560 

c; ooooi 

0 

I : 

47573 

0 

I 

45642 

0 

I; 75620 

30,7570 

c; OOOOI 

0 

^ • 

V. f 

00766 

0 

c 

00052 

0 

c; 33300 

30t7600 

I : S0626 

0 

I ; 

50776 

1 

C! 

01030 

0 

c: 77777 

30,7610 

I; 77576 

0 


20067 

1 


40051 

1 

51313 

30,7620 

20017 

0 


37641 

0 


5OII5 

1 

20115 

30,7630 

10115 

0 


07622 

0 


44515 

0 

70675 

30,7640 

05723 

1 

C; 

0001 3 

0 

I 

73576 

1 

C! 010A2 

30,7650 

l: 63776 

1 

C; 

00037 

0 

c 

00002 

0 

Cl 3302A 

30,7660 

l: 45575 

1 

I : 

61576 

1 

c 

00034 

0 

c; oiOAi 

30,7670 

I: 47574 

1 

I: 

51122 

1 

I 

63726 

1 

C: 21746 

30,7700 

c: 21754 

1 

C: 

01026 

1 

c 

OOOOI 

0 

c; 32030 

30,7710 

C; 01016 

1 

C; 

01016 

1 

I 

64775 

0 

I; 75642 

30,7720 

l; 76776 

0 

C: 

21750 

0 

c 

21732 

1 

l; 75176 

30,7730 

c: 00007 

0 

I : 

47574 

1 

I 

62714 

1 

I! 75776 

30,7740 

C; 00034 

0 

C: 

23126 

0 

c 

^5370 

1 

c: 04000 

30,7750 

C; 21756 

0 

C; 

00164 

1 

c 

34A14 

1 

C: 00173 

30*7760 




& 



S 



30*7770 

§ 



§ 



§ 
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the right of Each wqko; denotes unused fixed memory. 


(Interpretive operator wordsj or «ci* (Const antSj, 


1 


A1034 

0 


07351 

1 


11002 

0 


07412 

1 

1 


07417 

1 


O74I7 

1 


07337 

1 


41034 

0 

0 


07426 

0 


0732a 

0 


41034 

0 


O7335 

0 

0 


20017 

0 


32150 

1 


O2OA6 

1 

C: 

57IOI 

0 

1 


51374 

0 


375I7 

0 


51042 

0 


35501 

0 

0 


37521 

0 


5O755 

0 


47522 

1 


2OOI7 

0 

1 


OAOOO 

0 

1: 

76574 

0 

I ; 

41612 

1 

I ; 

47I7I 

0 

0 

C; 

2O6O7 

1 

c: 

33373 

0 

IJ 

42775 

1 

I : 

63703 

0 

0 

I 

75176 

0 

C: 

01215 

0 

C! 

33115 

1 

i: 

47176 

1 

1 

I 

76576 

1 

C; 

I7O33 

1 

C; 

62701 

0 

C; 

61664 

1 

0 

I 

71173 

1 

I : 

577I5 

0 

I : 

67515 

1 

1 ; 

67425 

0 

0 

c 

00017 

1 

c: 

01042 

0 

c; 

00052 

0 

1 : 

75175 

0 

1 

I 

76776 

0 

c 

21645 

0 

I ; 

44576 

0 

CJ 

00052 

0 

0 

I 

73432 

0 

c 

01010 

1 

c; 

01030 

0 

C; 

01042 

0 

1 

I 

50625 

0 

c 

OOOO5 

1 

c: 

00774 

0 

c; 

01030 

0 

1 

I 

76776 

0 

c 

21645 

0 

I ; 

47673 

0 

I : 

75632 

1 

0 

Cl 

77777 

0 

Cl 

00005 

1 

c; 

00774 

0 

C! 

33306 

1 

1 


40662 

1 


64516 

1 


02312 

0 

C; 

OOOO5 

1 

0 


41277 

0 


40000 

0 


20115 

0 


50765 

0 

1 


64515 

1 


50675 

0 


20016 

1 


41313 

0 

0 

I 

47575 

0 

I 

73176 

0 

c; 

33016 

0 

1 : 

45I75 

0 

1 

I 

63776 

1 

c 

00035 

1 

c; 

00003 

1 

c; 

33026 

0 

0 

I 

42776 

1 

c 

01016 

1 

c; 

01044 

0 

c; 

32032 

1 

1 

c 

00005 

1 

C 

21744 

0 

I : 

62775 

0 

1 ; 

63376 

0 

u 

I 

47574 

1 

I 

64766 

1 

i; 

50776 

1 

c; 

77777 

0 

0 

c 

00030 

1 

c 

00032 

0 

c: 

01044 

0 

I : 

45I75 

0 

0 

c 

01016 

1 

I 

45175 

0 

I ; 

63576 

0 

c: 

21752 

1 

0 

c 

01026 

1 

c 

00013 

0 

c; 

33010 

0 

I : 

44576 

0 

0 

c 

; 00000 

1 

c 

24000 

1 

c: 

00000 

1 

c; 

00022 

1 

1 

c 

; 00416 

1 


07755 

1 


07756 

1 

CKSM 

66010 

0 






§ 










§ 












. ■ 


<^faA&78A YUL SYSTEM FOR AGC<t: REVISION 0 OF PROGRAM SOLRUM 55 BY 


OCTAL listing qF PARAGRAPH 0 14A» rtiTh PARlTV BIT IN BINARY Aj 


all valid words are Basic instructions except those markeo "I" 


3 1 « 6000 

1 : 

77576 

0 


11723 

1 


06006 

1 


06006 

31,6010 


10000 

0 


45503 

0 


20067 

1 


50046 

31,6020 

C: 

20265 

1 

C; 

3201 7 

0 

I : 

67I74 

1 

I : 

64722 

31 ,6030 

C: 

00002 

0 

C; 

06304 

u 

I : 

47575 

0 

I ; 

56712 

31 ,6040 

I : 

73776 

0 

c 

22A65 

0 

II 

64 774 

1 

1 : 

53122 

3 1 , 60 sO 

C; 

00024 

1 

c 

22313 

0 

C: 

32015 

1 

I; 

4I773 

31 ,6060 

C; 

OO774 

0 

C 

00002 

0 

c: 

22307 

0 

Cl 

000 1 3 

31,6070 

C: 

22077 

1 

I 

66775 

1 

I : 

73776 

0 

c; 

00013 

31 »6100 

c; 

00013 

0 

I 

66776 

1 

C: 

06304 

0 

c; 

00005 

31,6110 

1 : 

42774 

0 

I 

63722 

0 

I : 

76576 

1 

c; 

OO766 

31,6120 

C; 

32011 

0 

I 

64774 

1 

I : 

66771 

0 

1 : 

70776 

31,6130 

C; 

00011 

1 

c 

32011 

0 

I : 

66775 

1 

I : 

76522 

31 t61A0 

c: 

33457 

1 

I 

40576 

1 


20067 

1 


20020 

31 ,6l50 


50115 

1 


20067 

1 


50022 

1 


04024 

3 1 , 6 1 60 


35501 

0 


30117 

0 


30116 

1 


50115 

31 ,6170 


10116 

0 


06177 

0 


04024 

0 


35501 

31,6200 

Cj 

07322 

0 


O4O2 4 

0 


34476 

0 


51456 

31,6210 


04000 

0 

I 

40576 

1 


20067 

1 


20020 

31,6220 


30116 

1 


50115 

1 


20067 

1 


20020 

3 1 ,6230 


06323 

0 


6011? 

0 


30115 

1 


20067 

31,6240 


06243 

1 


35501 

0 


06203 

0 


20067 

31,6250 


50115 

1 


30003 

1 


50116 

1 


04024 

31,6260 


66304 

0 


50000 

1 


06277 

0 


66305 

31,6270 


50020 

0 


60000 

i 


20067 

1 


50021 

31 ,6300 


06267 

1 


44516 

0 


06267 

1 

C; 

37440 

31 ,6310 

C: 

II2I7 

0 

c 

: 27040 

0 

c: 

i 4 44 1 

0 

c: 

37327 

31,6320 

c: 

00171 

0 

c 

: 04316 

1 

c: 

25 750 

L 


30001 

31,6330 


10116 

0 


06341 

1 


06341 

1 


06335 

31, 6340 


50116 

1 


10115 

0 


06355 

1 


06434 

31,6350 


40115 

0 


50115 

1 


10116 

0 


06341 

31,6360 


10000 

0 


0636 7 

0 

C; 

67237 

0 


35501 

31,6370 


60116 

1 


50021 

1 


30115 

1 


60116 


NASA 102U0B-021 


DEC A, 1966 


PAGE b 7 S 


the right of EACH WQRDt DENOTES UNUSED FIXED MEMORY. 

(Interpretive operator woRdsi or **Cii (Constants), 


1 


35501 

0 


060U 

1 


36320 

0 


70647 

0 

0 


04000 

0 

I 

44175 

1 

I : 

76576 

1 

c: 

33607 

0 

1 

I ; 

63726 

1 

C 

OO774 

0 

c: 

22307 

0 

c; 

01024 

0 

0 

c: 

00002 

0 

c 

01024 

0 

c: 

32013 

1 

I ; 

47575 

0 

0 

1 1 

577O6 

1 

c 

OOOI3 

0 

c: 

22311 

1 

c; 

00013 

0 

1 

I: 

44733 

0 

I 

64722 

1 

1 : 

76576 

1 

C; 

00766 

0 

0 

CI 

22255 

0 

I 

47575 

0 

I : 

66616 

0 

c; 

15710 

0 

0 

C: 

22322 

1 

C! 

22465 

0 

1 : 

64776 

0 

c; 

0001 7 

1 

1 

1 : 

64775 

0 

1 

53176 

1 

CI 

00013 

0 

c; 

22307 

0 

0 

C; 

00774 

0 

c 

00002 

0 

C; 

77777 

0 

C; 

22143 

1 

0 

C; 

77777 

0 

c 

77777 

0 

c: 

77777 

0 

c; 

22155 

0 

0 

c: 

OOOO7 

0 

c 

77777 

0 

c: 

22213 

1 

c: 

00015 

0 

1 


34513 

1 


05416 

1 


30117 

0 


301 16 

1 

0 


20067 

1 


20021 

0 


34510 

1 


05416 

1 

1 


10115 

0 


06177 

0 


O6I7O 

1 


06202 

1 

0 


50115 

1 


50116 

1 


04024 

0 


05654 

0 

1 


51457 

0 


40067 

1 


40000 

0 


50123 

1 

1 


34513 

1 


05416 

1 


20067 

1 


40010 

1 

1 


36316 

0 


25777 

1 


40116 

0 


50117 

0 

1 


30022 

1 


66237 

1 


60072 

1 


50000 

1 

1 


20023 

1 


34513 

1 


25777 

1 


401 15 

0 

0 


36303 

1 


6OII5 

1 


50000 

1 


06275 

1 

1 


BOOOO 

1 


06301 

0 


44515 

0 


20067 

1 

1 


04024 

0 


34516 

1 


06267 

1 


35501 

0 

0 

C; 

77747 

0 

c 

: 77771 

0 

Ci 

33453 

0 

c; 

02065 

0 

0 

Cl 

76563 

0 

c 

: 75347 

0 

CJ 

72717 

0 

CJ 

65640 

0 

0 


50071 

1 


34502 

1 


50073 

0 


5OO72 

1 

1 


06340 

0 


40072 

0 


5OO72 

1 


40116 

0 

1 


06346 

0 


06434 

1 


4OO72 

0 


50072 

1 

1 


00071 

1 


25777 

1 


46362 

1 


60ll6 

1 

0 


50073 

0 


30116 

1 


0637 1 

1 


40115 

0 

1 


50000 

1 


06401 

1 


30021 

1 


30021 

i 


^»8^57eA YUL SYSTEf^ FOR AGCA; REVISION 0 OF PROGRAM SOLRUMi>5 BY 


oCtal liStIno of- Paragraph ^ ia5» ^ith parity bit in binary at 
ALL valid words ARe BASIC INSTRUCTIONS EXCEPT THOSE MARKe^ "I” 


31 *6A00 


6A522 

0 


50115 

1 


3 0021 

1 


25777 

31 ,6A10 


50116 

1 


25777 

1 


46441 

1 


66440 

31 ,6A20 


A0116 

0 


66436 

0 


60000 

1 


25777 

31 *6A30 


30001 

0 


00071 

1 


40001 

1 


64522 

31 f 6 A AO 

c: 

27656 

1 

c 

46450 

1 

I 

73773 

0 

I 

7 IAO 5 

31 ,6A50 

C: 

0002A 

1 

c 

00015 

0 

c 

00027 

1 

c 

20265 

31 * 6 A 6 0 

c; 

210A3 

0 

c 

20265 

1 

c 

33457 

1 

I 

A0576 

31 »6A70 

C: 

32017 

0 

1 

41775 

1 

I 

71116 

1 

c 

00766 

31^6500 

C: 

22307 

0 

c 

00002 

0 

I 

47575 

0 

I 

64776 

31 i6510 

C; 

00766 

0 

c 

00774 

0 

c 

00003 

1 

c 

00003 

31,6520 

C; 

0102A 

0 

c 

226 7 4 

i 

I 

47576 

0 

c 

33726 

31,6530 

1 ; 

56776 

1 

c 

00005 

1 

c 

00002 

0 

I 

66 775 

31 •65A0 

I : 

65616 

0 

C! 

15706 

1 

c 

00002 

0 

c 

00013 

31,6550 

C; 

00774 

0 

Cj 

22443 

1 

I 

62774 

1 

I 

66672 

31,6560 

C; 

00002 

0 

C; 

oooo? 

0 

I 

47576 

0 

I 

73726 

31,6570 

I : 

A7176 

1 

C: 

22674 

1 

c 

00015 

0 

I 

56 774 

3 1,6600 

c; 

00005 

1 

c 

22674 

1 

c 

00002 

0 

C! 

00007 

31,6610 

I: 

7077A 

1 

I 

61653 

0 

I 

47176 

1 

C! 

22674 

31,6620 

c: 

00002 

0 

c 

22674 

1 

I 

66775 

1 

1! 

73722 

31,6630 

I ; 

6A776 

0 

c 

00023 

0 

c 

00023 

0 

1 . 

51175 

3 1 ,66A0 

I : 

65722 

0 

I 

70776 

0 

c 

00011 

1 

c 

00002 

31,6650 

I; 

63653 

1 

I 

64722 

1 

I 

56771 

0 

c 

00013 

31, 6660 

C: 

00010 

0 

c 

20265 

1 

c 

33457 

1 

I 

40576 

31,6670 

C; 

33A67 

1 

I 

40576 

1 

I 

40576 

1 

c 

20000 

31 ,6700 

C: 

63007 

0 

I 

45176 

0 

c 

01576 

1 

c 

33223 

31 ,6710 

C; 

22770 

1 

c 

01363 

u 

c 

21142 

0 

c 

167A0 

31,6720 


OAOOO 

0 

I 

45176 

0 

c 

21144 

0 

c 

33223 

31,6730 

I : 

77576 

0 

c 

00020 

0 

c 

01620 

1 

c 

21230 

31 ,67A0 

I : 

76776 

0 

c 

167A0 

0 

I 

62776 

0 

c 

OI 3 A 7 

31,6750 

I ; 

707A6 

0 

I 

73605 

0 

I 

A7176 

1 

c 

; 77777 

31,6760 

C; 

167A0 

0 

c 

21144 

0 

c 

33576 

0 

I 

; 47576 

31,6770 

I : 

43605 

0 

I 

45176 

0 

c 

21232 

1 

c 

; 01363 


NASA 1021108-021 


DEC A, 1966 


page 876 


the right oF Each wqrd; denoted unused fixed memory. 


(Interpretive operator woRDsj or "C" (Constant^), 


1 


50115 

1 


50115 

1 


25777 

1 


40000 

0 

1 


25777 

1 


40116 

0 


66437 

1 


25777 

1 

1 


40115 

0 


60073 

0 


50001 

0 


IOO 72 

0 

0 


64522 

0 


00071 

1 

C; 

12133 

0 

C; 

62723 

0 

0 

I 

45 O 7 O 

1 

I 

76576 

1 

c; 

0001 7 

1 

c; 

22457 

1 

1 

c 

33457 

1 

I 

40576 

1 

I : 

45175 

0 

1 : 

76576 

1 

1 

I 

45175 

0 

I 

/6576 

1 

c; 

00013 

0 

c; 

20265 

1 

0 

c 

OO 77 A 

0 

c 

00003 

1 

i: 

47575 

0 

I ; 

64716 

0 

0 

c 

00001 

0 

I 

7317A 

1 

I : 

A2722 

0 

I : 

63643 

0 

1 

I 

6277A 

1 

I 

66643 

0 

I ; 

70653 

0 

c : 

00005 

1 

1 

I 

47575 

0 

I 

65672 

1 

C! 

22674 

1 

c; 

00002 

0 

1 

I 

61776 

0 

c 

22674 

1 

c: 

00011 

1 

1 : 

56775 

1 

0 

c 

22457 

1 

I 

A2775 

1 

I : 

43776 

0 

c; 

00766 

0 

1 

I 

62776 

0 

c 

00005 

1 

C; 

01024 

0 

C ; 

22674 

1 

0 

c 

2245? 

1 

c 

22674 

1 

1 ; 

70774 

1 

I : 

61653 

Q 

0 

1 

61732 

0 

I 

567l2 

0 

c; 

15706 

1 

c; 

00002 

0 

0 

I 

47575 

0 

I 

73726 

0 

ct 

22A57 

1 

c; 

22674 

1 

1 

c 

00021 

1 

I 

56775 

1 

1 ; 

70776 

0 

C; 

000 U 

1 

1 

c 

00023 

0 

c 

0001 7 

1 

c; 

22665 

1 

I : 

51175 

0 

0 

I 

64726 

0 

c 

OOOI 7 

1 

c; 

00017 

1 

1 ; 

56774 

0 

c 

c 

22676 

0 

c 

77777 

0 

C! 

00025 

0 

I ; 

64773 

0 

0 

c 

22307 

0 

c 

00002 

0 

C; 

00013 

0 

C; 

00027 

1 

1 

I 

45175 

0 

I 

76576 

1 

c; 

05174 

0 

c; 

20265 

1 

0 

c 

00000 

1 

c 

05252 

1 

c; 

25253 

1 

C! 

56A75 

1 

i 

I 

A 357 A 

0 

I 

66756 

0 

n 

77576 

0 

c; 

00020 

0 

0 


03373 

0 

c 

40100 

1 


02362 

1 

C; 

00064 

0 

1 

I 

; 47576 

0 

c 

335 76 

0 

I ; 

42574 

1 

I : 

66616 

0 

0 

c 

: 227A3 

1 


36677 

I 


5137A 

0 


O 4 OOO 

0 

0 

c 

01620 

1 

I 

A75 ?1 

1 

1 ; 

51122 

1 

1 : 

62732 

0 

0 

c 

21226 

1 

c 

21230 

0 

C; 

01620 

1 

c; 

16740 

n 

0 

c 

33223 

1 

I 

76776 

0 

CJ 

16 740 

0 

I : 

66774 

0 

0 

c 

23000 

0 

c 

; 21144 

0 

CJ 

33223 

1 

I i 

70775 

0 


^8^b78A yUL SvSTtM FOR AgC<»: REylSIUN 0 OF pRO^RAM SOLRUMb5 BY 


OC-JaL LIStING OF paragraph 146% WIjH PARIyY Blj IN BINARY At 
all valid WORdS are BASIC INSTRUCTIONS EXCEPT THOSE MARKED "I" 


31 

,7000 

I ; 

73775 

0 

c 

01347 

0 

c 

21172 

0 

c 

16 740 

31 

»7010 

C; 

21051 

0 

c 

33 3 41 

1 

I 

66774 

0 

I 

73605 

31 

♦ 7020 

C: 

21053 

1 

c 

33341 

1 

I 

45176 

0 

c 

01363 

31 

,7030 

I : 

73775 

0 

I 

41423 

1 

c 

01347 

0 

c 

23037 

31 

, 7 O 4 O 

C 

01347 

0 

c 

01421 

1 

c 

01620 

1 

c 

33365 

31 

, 70s0 

c 

OI 347 

0 

c 

01421 

1 

c 

21220 

1 

c 

01363 

31 

, f 0(}0 

I 

43776 

0 

c 

01347 

0 

c 

23067 

1 

I 

45176 

31 

,7070 

c 

00012 

1 

c 

23106 

1 

c 

00012 

1 

I 

45176 

31 

*7100 

c 

21066 

1 

C; 

33371 

1 

I 

45176 

0 

c 

21104 

31 

*7110 

c 

01602 

1 

C; 

2122D 

1 

c 

01365 

0 

c 

20265 

31 

* 7120 

I 

65706 

0 

C! 

21043 

0 

c 

01365 

0 

c 

33632 

31 

*7130 

c 

01630 

0 

C; 

01602 

i 

c 

33331 

0 

1 

64774 

31 

,7140 

c 

01630 

0 

c 

21043 

0 

C! 

01632 

1 

c 

3 3616 

31 

*7150 

c 

01341 

0 

c 

01616 

1 

Ci 

32027 

0 

I 

66775 

31 

*7160 

I 

51176 

0 

c 

0161 6 

1 

C: 

33504 

0 

I 

66775 

31 

*7170 

c 

33440 

1 

I 

45176 

0 

C! 

21174 

0 

c 

33512 

31 

* 7200 

c 

23207 

0 

c 

014 4 0 

0 

c 

33440 

1 

I 

45176 

31 

,7210 

I 

63643 

0 

I 

66712 

0 

C 

01612 

0 

c 

00002 

31 

*7220 

c 

01331 

1 

c 

33434 

1 

I 

56775 

1 

I 

62732 

31 

*7230 

c 

33436 

0 

I 

47572 

1 

I 

7 O 722 

1 

I 

64722 

31 

* 7240 

c 

01440 

0 

c 

0144D 

0 

C 

01434 

0 

c 

01604 

31 

*7250 

I 

56726 

1 

c 

01610 

1 

c 

00003 

1 

c 

21174 

31 

,7260 

I 

70653 

0 

c 

01604 

1 

c 

21174 

0 

c 

01604 

31 

* 7270 

I 

64774 

1 

I , 

64712 

1 

I 

63116 

1 

c 

01604 

31 

,7300 

I 

64775 

0 

I 

70742 

1 

c 

01616 

1 

c 

21076 

31 

, 7310 

I 

64775 

0 

I 

70776 

0 

c 

OlblO 

1 

c 

21236 

31 

,7320 

I 

64712 

1 

c 

01365 

0 

c 

01327 

0 

c 

01604 

31 

* 7330 

I 

64775 

0 

I 

64712 

1 

c 

21166 

0 

c 

01347 

31 

*7 340 

I 

70742 

1 

c 

21102 

1 

c 

: 01610 

1 

c 

21100 

31 

*7350 

c 

33225 

1 

I 

47572 

1 

I 

; 65132 

1 

I 

73615 

31 

, 7360 

c 

00013 

0 

c 

23370 

1 

c 

; 01225 

0 

c 

16377 

31 

1 73 7 O 

I 

56712 

0 

I 

61672 

0 

c 

; 01325 

1 

c 

01225 


NASA 1021108-021 


DEC 4, 1966 


pAcE 877 


the right of each WORD; '*&'• denote^ unused fixeo Memory. 


(Interpretive operator woRdS) or *'C" (constants). 


0 


36700 

0 


51374 

0 


04000 

0 

I : 

45176 

0 

0 

I ; 

45176 

0 

c 

01363 

0 

C! 

21122 

0 

c: 

23026 

1 

0 

c: 

33101 

1 

1 

45176 

0 

c; 

21144 

0 

C! 

33421 

0 

1 

c: 

01341 

0 

c 

33421 

0 

I : 

62775 

0 

1 ; 

7 O 776 

0 

1 

I 

51173 

0 

I 

62712 

1 

I : 

70722 

1 

I 

6^712 

1 

0 

c 

01365 

0 

c 

01365 

0 

C: 

01343 

1 

c 

33602 

0 

Q 

c 

01602 

1 

c 

33101 

1 

li 

43575 

1 

I 

42576 

0 

0 

c 

21057 

0 

c 

33325 

0 

i: 

70776 

0 

c 

01365 

0 

1 

c 

33327 

1 

I 

64774 

1 

I ; 

62771 

1 

I 

62712 

1 

1 

c 

01365 

0 

c 

01341 

0 

c ; 

33630 

1 

I 

47575 

0 

0 

I 

66775 

1 

I 

647l2 

1 

c; 

01630 

0 

c 

21043 

0 

1 

I 

70653 

0 

I 

65722 

0 

c: 

01327 

0 

c 

01331 

1 

0 

I 

47574 

1 

I 

65722 

0 

1 ; 

62776 

0 

c 

01365 

0 

1 

I 

73776 

0 

c 

0l6l6 

1 

C; 

21106 

0 

c 

16532 

1 

1 

I 

73776 

0 

c 

21174 

0 

CJ 

Ol6l6 

1 

c 

16405 

1 

1 

I 

47574 

1 

I 

66756 

0 

I : 

65776 

1 

c 

01365 

0 

0 

c 

01365 

0 

c: 

33612 

1 

I i 

56773 

1 

1 

62726 

0 

0 

c 

01632 

1 

Cl 

21174 

0 

C; 

00002 

0 

c 

01630 

0 

0 

c 

0U34 

0 

Cl 

00006 

1 

c: 

0132 ? 

0 

c 

21160 

0 

1 

I 

62712 

1 

1 1 

65756 

0 

c; 

21162 

1 

c 

21164 

1 

1 

c 

00027 

1 

c: 23450 

1 

c; 

33610 

0 

1 1 

51175 

0 

0 

c 

33606 

1 

I 

66773 

1 

u 

64722 

1 

1, 

64716 

0 

1 

c 

01606 

0 

c 

01606 

0 

c: 

00003 

1 

c 

21 O 72 

1 

1 

c 

01606 

0 

c 

01610 

1 

C! 

77777 

0 

c. 

00002 

0 

0 

c 

21074 

1 

I 

64776 

0 

C! 

00027 

1 

c 

21234 

1 

0 

c 

32027 

0 

I 

51173 

0 

l: 

64712 

1 

I 

62771 

1 

1 

c 

01602 

1 

CJ 20437 

0 

C( 

21110 

1 

c 

00027 

1 

0 

c 

01620 

1 

c 

; OI 6 O 2 

1 

1 ; 

6677A 

0 

I 

64742 

1 

0 

I 

47575 

0 

I 

! 65672 

1 

C! 

01111 

1 

c 

00005 

1 

1 

I 

41556 

1 

I 

: 41532 

0 

C; 

21124 

0 

c 

16203 

1 

0 

c 

01365 

0 

c 

: 01371 

0 

c: 

33600 

1 

I 

66774 

0 

0 

c 

00003 

1 

c 

; 01600 

0 

c; 

01225 

0 

c 

OOOO 3 

1 


4b^57BA YUL SYSTEM FOR A&CA; REVISION 0 OF pRogRAm SOLRUM55 BY 


octal listing oF paragraph # i^tT* with PARItV bit in binary At 
All valid words are basic instructions except those marked "I" 


31 t7AOO 

c: 

33600 

1 

I; 77576 

0 


02276 

0 

c; 

02003 

3 1 1 7 A 1 0 


04000 

0 

I I 4757A 

1 

I : 

65616 

0 

I : 

7O776 

3 1 t7420 

1 ; 

7O774 

1 

l! 66756 

0 

I : 

4I472 

0 

c; 

01600 

31 f 7A30 

Cf 

00002 

0 

C: 33600 

1 

I : 

70776 

0 

Cl 

01365 

31 1 7A40 

C; 

33325 

0 

I: 43575 

I 

I : 

42572 

1 

c 

00013 

3 1 * ? ASO 

1 : 

64722 

1 

C: 01616 

1 

C; 

21045 

0 

I 

6^776 

31 WA60 

I : 

62712 

1 

I; 65706 

0 

C; 

0 1 436 

1 

c 

210A7 

31 ,7^70 

I: 

70776 

0 

C: 01616 

1 

C; 

33616 

0 

I 

47573 

31 ♦ ?500 

C; 

21043 

0 

C; 01630 

0 

Ci 

01331 

1 

c 

33327 

31 , I510 

C! 

21057 

0 

C; 33610 

0 

I : 

76776 

0 

c 

23250 

3i»7520 


04000 

0 

I; 51776 

0 

C; 

01101 

0 

c 

01052 

31 t7530 

c: 

01052 

1 

C; 00002 

0 

C; 

33107 

1 

I 

77576 

31 *75^»0 


§ 


& 



S 



§ 

31 17550 




@ 



§ 



§ 

31 1 7560 




© 






§ 

31 1 7570 


§ 


@ 



& 



& 

km- 

31f 7600 




§ 



s 



s 

31 i7610 




§ 



s 



& 

•m* 

31 W620 


§ 


/S 



s 



& 

31 i7630 


§ 


g 






S' 

31 *76A0 


§ 


S 






G 

31 17650 


S 


§ 



§ 



§ 

31 f 7660 


§ 


§ 






§ 

31*7670 










& 

31 * 7700 




§ 







31*7710 


€> 





s 



& 

31*7720 


§ 





& 

w 



G 

31 * 7730 




g 



§ 



§ 

31*7740 




g 



§ 




31*7750 




g 



& 



9 

31*7760 


§ 





& 




31 * 7770 


f 


g 



9 
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The right oF each WORD! OeNOTES UNUSeO FIXeD MeMQRY. 


(Interpretive operator worqS) or «q» (constants). 


0 


375U 

0 


51374 

Q 


35501 

0 


50122 

0 

0 

c: 

21120 

1 

C: 

23421 

1 

c; 

01600 

0 

c; 

33600 

1 

0 

C: 

0l6l6 

1 

C; 

21174 

0 

c; 

23433 

1 

c; 

01600 

o 

0 

C: 

0 

0 

r-^ 

0 

0 

c: 

33365 

1 

I ; 

A5176 

0 

c: 

01225 

0 

0 

C; 

23106 

1 

C: 

00013 

0 

c; 

23106 

1 

I ; 

47575 

o 

0 

C; 

01341 

0 

C; 

21045 

0 

I; 

70773 

0 

I ; 

64722 

1 

1 

C; 

0 1 44O 

0 

c; 

21164 

1 

c; 

0 1 4 3 4 

0 

c; 

0l6l6 

1 

0 

I ; 

62726 

0 

1 ; 

51132 

0 

1 : 

62776 

0 

c: 

01632 

1 

1 

1 : 

51176 

0 

c; 

01616 

1 

c; 

33604 

0 

I : 

45176 

o 

1 

C; 

56513 

0 


03462 

1 

C; 

00140 

1 


O7OO6 

0 

1 

C: 

33101 

i 

1 : 

51775 

0 

i; 

44776 

1 

c; 

OIIO7 

0 

0 


02124 

1 


07535 

0 


07536 

0 

CKSM 

?1506 

1 



e 



g 



g 



g 







g 



g 



g 




e 



g 



g 



g 




g 



g 



g 



g 




@ 



g 



g 



g 




§ 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



10 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



0 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 




g 



g 



g 



g 



/* » I 

I . 


<tBAb78A YUL SYSTEM FOR AGC^; REVISION 0 Of PROGRAM SOLRUM 55 BY 


octal listing oF paragraph 0 ISOi with parity bit in binary At 
ALL valid words ARe SASIC InStRUCtIjNS eXClPT THOSe MARKEO 


32 tPOOO 

20017 

0 

U2b77 

0 


a0572 

0 


5U62 

32 tSOlO 

33533 

1 

02312 

0 

C; 

OOOOA 

0 


10000 

32 tbOZO 

02173 

0 

C; 64025 

1 


03A16 

1 

C! 

00002 

32t6030 

35501 

0 

50665 

1 


3A5l6 

1 


02312 

32t60A0 

6 A 52 O 

1 

64520 

1 


30667 

0 


33565 

32 tbOsO 

A3565 

0 

61563 

0 


02173 

0 

C! 

6AD66 

32 1 6 0 6 0 

50035 

1 

02256 

1 


32 I 7 O 

0 


02052 

32 t6070 

C; 6A07A 

0 

03416 

1 

C! 

OOOAO 

0 


02256 

32*6100 

I; 66776 

1 

C; 20253 

1 

C 

01565 

0 

c 

33571 

32,6110 

C; 07227 

1 

C: 33571 

i 

I 

A7573 

0 

I 

66756 

32,6120 

C: 01567 

1 

C: 00033 

i 

c 

33571 

1 

I 

4517A 

32,6130 

c: 00017 

1 

C; 2A2A6 

1 

c 

00005 

1 

c 

32025 

32 *61 AO 

l; 55175 

1 

I : 41176 

1 

c 

00025 

0 

c 

32027 

32,6150 

C; 32027 

0 

I; 47176 

1 

c 

OlAll 

1 

c 

32033 

32 , 6 1 60 

I; 76576 

1 

Cl 20253 

1 

c 

01563 

0 

c 

OI 7 OI 

32 ,6l70 

I; A7576 

0 

C; 32025 

1 

I 

47575 

0 

I 

57176 

32*6200 

Cl 0002^ 

1 

C: 33417 

0 

I : 

55175 

1 

1 

47176 

32,6210 

I; AA776 

1 

C; 00027 

1 

C; 00002 

0 

c 

33A25 

32,6220 

C: 12167 

1 

I; 76776 

0 

C; 12072 

1 

I 

47576 

32,6230 

10000 

0 

0607A 

1 


20017 

0 


41572 

32,62a0 

50665 

1 

35503 

1 


02312 

0 

c; 00003 

32,6250 

33553 

1 

02312 

0 

C 

00003 

1 


32155 

32,6260 

C: 30163 

0 

0565A 

0 

C 

30331 

0 


03066 

32,6270 

I : 76776 

0 

C; OOOO 7 

0 

C 

12001 

0 

1 

; 75176 

32,6300 

32155 

1 

O 2 OA 6 

1 

C 

50046 

0 


3^516 

32,6310 

74516 

0 

10000 

0 


06321 

1 


AOOll 

32,6320 

C; 6 A 7 IO 

0 

36335 

i 


70647 

0 


10000 

32,6330 

02256 

1 

4A5l6 

0 


02312 

0 

c 

: 00003 

32 ,63A0 

03A30 

0 

Cl 20000 

0 


03373 

0 

c 

: A0221 

32,6350 

03A16 

1 

C; 01000 

0 


02276 

0 

C; OiAOA 

32.6360 

03302 

0 

06365 

1 


03362 

0 


03A16 

32,6370 

02052 

1 

C: 111A7 

0 


20016 

1 


06363 


NASA 1021106-021 


Dec At 1966 


PAGE 679 


the right of each word? "&'* denotes unused fixed memory. 


(Interpretive operator wokdS) or "C« (Constants), 


0 


A 0573 

1 


51463 

1 

AO 000 

0 


5 O 666 

1 

0 


06022 

1 


06022 

1 

20017 

0 


37567 

1 

0 


03151 

1 


33557 

0 

02312 

0 

c; 

OOOOa 

0 

0 

C; 

00003 

1 


35501 

0 

60667 

0 


61463 

1 

1 


50036 

1 


33560 

1 

O 23 I 2 

0 

C: 

OOOOa 

0 

0 


321A6 

0 


020A6 

1 

C: 50000 

1 


35501 

0 

1 

C: 

11 1A7 

0 


06030 

1 

321 A3 

0 


O 2 OA 6 

1 

1 


02276 

0 

c: 

O 32 O 3 

o 

oaooo 

0 

I : 

76575 

1 

1 

I 

A757A 

1 

I 

A3605 

0 

i; A5176 

0 

c; 

2a113 

1 

0 

I 

A1a23 

1 

I 

425^6 

o 

C; 01567 

1 

C; 

2A12A 

0 

1 

I 

76516 

1 

I 

76516 

1 

c; 01571 

0 

c; 

20A0A 

0 

1 

I 

57176 

0 

c 

00025 

0 

I! 45176 

0 

c: 

07227 

1 

0 

I 

47576 

0 

CJ 

33411 

o 

i; 45176 

0 

c: 

01415 

0 

0 

I 

76672 

0 

I ; 

66712 

0 

I; 66756 

0 

1 : 

A1 A23 

1 

0 

C 

OI 7 O 3 

1 

c; 24171 

0 

c: 0722 ? 

1 

c; 

20265 

1 

0 

c 

32023 

1 

I 

47575 

0 

n 63766 

0 

c; 

00002 

0 

1 

c 

00025 

0 

c 

33421 

o 

i: 47574 

1 

I ; 

A7166 

0 

1 

I 

45176 

0 

c 

00023 

0 

C; 33A2/ 

0 

I; 

76776 

0 

0 

c 

327 OI 

0 

I 

77576 

0 

3A5U 

0 


70646 

1 

1 


AOOOO 

0 


02173 

0 

C: 6A250 

1 


A0036 

0 

1 


0212A 

1 


3353a 

0 

5157A 

0 


01573 

1 

1 


020A6 

1 

c 

64257 

0 

06325 

0 


0565A 

0 

1 


02362 

1 

c 

OOOU 

L 

OAOOO 

0 

1 ; 

75575 

1 

0 

c 

01315 

1 

c 

333A5 

0 

i; 77576 

0 


0212A 

1 

1 


7 O 6 A 6 

1 


lOOOO 

0 

06325 

0 


A0647 

0 

0 


7A502 

0 


10000 

0 

06325 

0 


05720 

1 

0 


06331 

0 


36677 

1 

02173 

0 

C! 

6A300 

0 

1 


02256 

1 

c 

j 00016 

0 

A0036 

0 


50666 

1 

1 


34516 

1 


70646 

1 

10000 

0 


06462 

1 

0 


20017 

0 


36505 

1 

02173 

0 

c; 

64374 

0 

1 

c 

; 00200 

0 


0212a 

1 

20017 

0 


32170 

0 

1 


32160 

1 


02052 

1 

C: 64A00 

1 


02256 

1 


4{1^578A yul System fdr agc^: revision o program solrumss by 


OCTAL listing oF PARAGRAPH # 151, *^ITH PARITY BIT IN BINARY AT 

all valId woRdS are basic Instructions except those maRkeo "I" 


32,6400 


34516 

1 


51446 

0 


03430 

0 

C: 

20000 

32,6410 


20017 

0 


36504 

0 


02173 

0 

c: 

64663 

32,6420 


5I47O 

0 


02276 

0 

C: 

02 5 O4 

1 


02362 

32*6430 

c: 

00002 

0 


02276 

0 

C; 

02004 

1 


2001 7 

32 * 6 4 4 0 


05654 

0 

C : 

30223 

1 


03516 

0 


35461 

32 , 64S0 


51442 

1 


03416 

1 

C; 

OOOlO 

0 


02362 

32 ,646® 


03151 

1 

C: 

52530 

0 


03504 

0 

c; 

00001 

32,6470 


36700 

0 


02173 

0 

C: 

64527 

0 


20016 

32*6500 

c: 

20000 

0 


03373 

0 

c; 

42000 

1 


02124 

32,6510 

C; 

OO574 

1 


03373 

0 

C; 

<+0200 

1 


33550 

32,6520 


33551 

0 


02312 

0 

C: 

00004 

0 


37151 

32,6530 


02312 

0 

C; 

OOOO4 

0 


40036 

0 


5O666 

32*6540 

c; 

00004 

0 


36676 

0 


02173 

0 

c; 

64545 

32,6550 


02312 

0 

C: 

00004 

0 


36676 

0 


02173 

32 ,6560 

c: 

00004 

0 


02256 

1 


4 A 5 0 2 

0 


51447 

32,6570 


40572 

0 


51462 

0 


4O573 

1 


51463 

32,6600 


10000 

0 


06603 

i 


06636 

1 


10651 

32*6610 


06611 

1 


44516 

0 


02312 

0 

c; 

00002 

32,6620 


36707 

1 


70647 

0 


iOOOO 

0 


05625 

32 * 66 30 


36701 

1 


02173 

0 

C: 

64710 

0 


03430 

32 * 6640 


10000 

0 


06660 

1 


33546 

0 


02312 

32*6650 


02256 

1 


345O2 

1 


02046 

1 

c; 

66322 

32 * 6660 


03430 

0 

C; 

00010 

0 


06556 

1 


03406 

32*6670 


02173 

0 

C; 

64527 

0 


33535 

1 


02312 

32*6700 

c: 

00372 

1 

a 

00A54 

1 

C: 

00536 

1 

c; 

00764 

32*6710 


44502 

0 


7OOII 

0 


50011 

1 


02677 

32,6720 


03430 

0 

C: 

0002 0 

0 


4OO44 

0 


51222 

32,6730 


03405 

0 

C: 

40020 

1 


40647 

0 


76463 

32*6740 


03416 

1 

Cl 

01400 

1 


3A501 

1 


70645 

32,6750 

C: 

64527 

0 


3642 6 

1 


5I47O 

0 


32160 

32,6760 

c; 

OOOO 4 

0 


0350£, 

0 

C; 

00010 

0 


06331 

32,6770 

c: 

00003 

1 


O35O4 

0 

C: 

00004 

0 


02256 


5 . 


"1 
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tHe right of each word; "&» denote^ unused fixed Memory. 


tiNTERpRETiVE 

operator 

woRl)S) or 

"C” 

(CONSTANTS) , 



0 


34501 

1 


70645 

1 


IOOOO 

0 


06A27 

0 

0 


20016 

1 


O 35 O 4 

0 

c: 

00010 

0 


36426 

1 

1 

C: 

00031 

0 


03151 

1 

a 

52454 

0 


03504 

0 

0 


36510 

0 


02173 

0 

c; 

64527 

0 


20016 

1 

1 


51470 

0 


35503 

1 


51446 

0 


37655 

0 

1 

c: 

00073 

0 


05654 

0 

C; 

30331 

0 


O 3 O 66 

1 

0 


33537 

0 


02312 

0 

c; 

00004 

0 


20017 

0 

1 


02362 

1 

CJ 

00074 

1 


06360 

1 


03462 

1 

1 

C: 

01476 

0 

c: 

00252 

1 

c; 

22244 

0 

CJ 

O 2 O 32 

1 

1 


02312 

0 

C; 

OOOOit 

0 


40036 

0 


50666 

1 

0 


02173 

0 

c: 

6452? 

0 


02256 

1 


33542 

1 

1 


O 34 O 5 

0 

c; 

40001 

1 


33543 

0 


02312 

0 

1 


02256 

1 


03373 

0 

c: 

40002 

1 


33544 

i 

0 

C: 

64562 

1 


02256 

1 


44516 

0 


02312 

0 

1 


70011 

0 


64502 

1 


50011 

1 


02677 

0 

1 


03416 

1 

c: 

00030 

1 


33550 

1 


70647 

0 

1 


64341 

0 


10000 

0 


06642 

1 


06642 

1 

0 


32170 

0 


02052 

1 

c; 

11147 

0 


06642 

1 

0 


06636 

1 


33547 

1 


02312 

0 

CJ 

OOOO 4 

0 

0 

C! 

00010 

0 


02256 

1 


36463 

0 


70647 

0 

0 

c; 

00004 

0 


40646 

1 


76634 

1 


IOOOO 

0 

1 


36703 

0 


02173 

0 

c; 

64645 

1 


02256 

1 

0 

C: 

40020 

1 


03416 

1 

c; 

00400 

0 


36706 

0 

0 

c; 

00004 

0 


02256 

1 

c; 

00031 

0 

c; 

00144 

0 

1 

c; 

01130 

1 

c: 

02734 

0 

C! 

21366 

1 

c; 

00140 

i 

0 


40572 

0 


51462 

0 


40573 

1 


51463 

1 

1 


4 OO 45 

1 


51223 

0 


40046 

1 


51224 

i 

1 


10000 

0 


06774 

0 


34516 

1 


51446 

0 

1 


10000 

0 


06764 

1 


36506 

1 


02173 

0 

1 


02052 

1 

c: 

64423 

0 


33535 

1 


02312 

0 

0 


36461 

1 


51470 

0 


34473 

0 


02312 

0 

1 


33554 

0 


02312 

0 

c: 

00004 

0 


41463 

0 


4b^‘j7aA yul System hor agca; revision o of program solrumss by 


OCTAL listing OT PARAGRAPH # 152, wlTH PAR 1 1 Y BIT IN BINARY At 

all valid woRdS are basic Instructions except those marked "i” 


32,7000 


50665 

1 


50666 

1 


40647 

0 


7 6 416 

32,7010 

C; 

50114 

0 


37150 

1 


02173 

0 

c; 

65110 

32 , 7020 


02312 

0 

c: 

OOOO4 

0 


O35O4 

0 

c: 

00020 

32,7030 


O7O5O 

0 


37I A6 

0 


02173 

0 

c; 

31550 

32 1 70A0 


02312 

0 

C; 

OOOO3 

1 


33232 

I 


02312 

32,7050 


4064 7 

0 


77046 

0 


10000 

0 


O7O7O 

32,7060 


02173 

0 

C: 

6^511 

0 


32144 

1 


02052 

32 , 7O7O 


32144 

1 


02052 

1 

C: 

65140 

1 


33532 

32 » aoo 

c: 

00004 

0 


37150 

1 


02173 

0 

c: 

65110 

32,7110 


36702 

1 


O2I73 

0 

C; 

65124 

0 


0 3 4 0 5 

32*7120 


02256 

1 


O34O5 

0 

C: 

4O2OO 

1 


06331 

32, njO 

cr 

OOOO3 

1 


36676 

0 


02173 

0 

c: 

65135 

32 * 7140 


02362 

1 

C: 

00023 

0 


02124 

1 


02362 

32,7150 

C; 

01274 

1 

C: 

02176 

0 


37254 

0 


05750 

32,7160 


50667 

0 


35503 

1 


51035 

0 


34514 

32,7170 


77256 

0 


10000 

0 


03062 

0 


07216 

32,7200 


37567 

I 


02173 

u 

C: 

65152 

1 


32152 

32,7210 

c; 

00005 

1 


02256 

1 


37567 

1 


02173 

32 ,7220 

C! 

66657 

0 


07203 

1 


34516 

1 


51030 

32,7230 


10000 

0 


07234 

0 


37255 

1 


07153 

32, 7240 


10572 

0 


07232 

0 


07232 

0 


37260 

32,7250 


A0572 

0 


O2I73 

u 

C; 

65232 

1 


02256 

32,7260 

c: 

00372 

1 

f « 
^ * 

00620 

0 


05654 

0 

c; 

31017 

32,7270 


51001 

1 


51002 

1 


51003 

0 


51004 

32 ,7300 

c; 

15712 

1 

I : 

76776 

0 

C: 

21551 

0 


33533 

32,7310 


51263 

1 


10115 

0 


07304 

1 


4 1 446 

32,7320 

C; 

02705 

1 


04000 

0 

I : 

43576 

I 

c: 

00036 

32,7330 

I ; 

75575 

1 

I: 

43565 

0 

Cl 

00001 

0 

c: 

00003 

32,7 3 AO 

C: 

331A5 

1 

I : 

74176 

1 

c: 

O33OI 

0 

c: 

33115 

32,7350 


51030 

0 


05720 

1 

C: 

61430 

1 

I ; 

76^76 

32,7360 

c; 

25454 

0 

f - • 

C « 

00766 

u 

C: 

00002 

0 

c ; 

33101 

32,7370 


41456 

0 


64476 

u 


10000 

0 


03462 
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THe right of each word; DENOTE^ UNUSeD FIXeD MeMORY. 


( iNTERpRETl VE operator WORdSi OR »C” (CONSTANTS), 


0 


10000 

0 


0 7070 

1 


36507 

0 


02173 

0 

1 


35502 

0 


02312 

0 

c; 

00003 

1 


34473 

0 

0 


02256 

1 


40647 

0 


77023 

0 


10000 

0 

0 


36704 

1 


021 73 

0 

c; 

64511 

0 


35362 

0 

0 

C: 

00004 

0 


03504 

0 

c: 

00040 

0 


02256 

1 

1 


33536 

1 


02312 

0 

C; 

00004 

0 


36704 

1 

1 

C: 

65143 

1 


O35O4 

0 

CI 

00100 

0 


02256 

1 

0 


02312 

0 

c; 

00003 

1 


44516 

0 


02312 

0 

1 


35502 

0 


02312 

0 

C: 

QOOO3 

1 


02256 

1 

0 

Cs 

4O2OO 

1 


34477 

1 


02312 

0 

c; 

OOOO3 

1 

0 


O34O5 

0 

c; 

4OOO2 

1 


34475 

0 


02312 

0 

0 


02256 

1 


03373 

0 

c: 

40001 

1 


06331 

0 

1 

c: 

OOO44 

1 


02124 

1 

c: 

00113 

1 

c: 

OOI44 

0 

0 


355O3 

1 


02312 

0 

C{ 

00005 

1 


41465 

0 

0 


70646 

1 


10000 

0 


U7212 

1 


40646 

1 

0 


37257 

0 


70647 

0 


10000 

0 


07222 

1 

0 


02046 

1 

C; 

65262 

1 


34473 

0 


02312 

0 

0 

c; 

56004 

0 


O72O3 

1 


3756 7 

1 


O2I73 

0 

0 


37260 

1 


07201 

0 


37257 

0 


70647 

0 

1 


47260 

0 


60667 

0 


60036 

1 


30572 

1 

1 


60572 

1 


64476 

0 


50000 

1 


07232 

0 

1 

C; 

61313 

1 

C; 

61364 

1 

C! 

40000 

0 

c; 

OOOOb 

1 

0 


40645 

1 


74503 

L 


10000 

0 


07276 

0 

1 


51005 

0 


51006 

0 


04000 

0 

1 : 

76776 

0 

1 


50115 

1 


20115 

0 


41416 

1 


20115 

0 

1 


51261 

0 


41447 

0 


51262 

0 


02276 

0 

1 

C: 

25354 

1 

1 : 

45176 

0 

c; 

21144 

0 

C: 

33576 

0 

1 

C: 

25337 

1 

C: 

000 11 

1 

i: 

46176 

0 

c; 

03275 

1 

1 

1 : 

76776 

0 

C: 

13450 

1 

I : 

77576 

0 


35501 

0 

0 

C; 

22001 

0 

1 : 

43575 

1 

l : 

75026 

1 

C: 

OOO22 

1 

1 

1 1 

75176 

0 

c; 

00774 

0 

c: 

33107 

1 

1 : 

77576 

0 

1 

C; 

10000 

0 


O74O6 

1 


41720 

1 


40000 

0 


4b457BA YUL System for AGC^^; revision O or program solrumss by 


OCTAL LISTING qF PARAGRAPH # 153» WITH PARITV BIT IN BINARY AT 

All vAlID WORqS are basic instructions except those marked "I" 


32 

*7AOO 


51 A56 

1 


A1721 

0 


AOOOO 

0 


51457 

32 

* 7AlO 

c; 

01A5 7 

0 

C; 

25571 

0 

C; 

33211 

0 

1 ; 

47574 

32 

* 7 A 2 0 

c: 

01A63 

1 

C: 

0 1 A6 5 

1 

C; 

33557 

0 

1 : 

77576 

32 

t7A30 

Cl 

AOOOO 

0 


0212a 

1 

I ; 

77576 

0 


03Al6 

32 

» 7AAO 

c; 

AOOOO 

0 


AA5 1 6 

0 


02312 

0 

c: 

00002 

32 

*7A50 


02052 

1 

C : 

lllA? 

0 


OAOOO 

0 

I i 

43575 

32 

t7A60 

C: 

01677 

0 

C: 

2551a 

u 

I : 

77576 

0 


20017 

32 

♦ 7A70 


07A77 

1 


07A77 

1 


07473 

0 


03Al6 

32 

t 7500 

C! 

00032 

0 


0350A 

0 

C; 

00020 

0 


40036 

32 

*7510 


03A7A 

0 

C: 

10000 

0 


04000 

0 

I ; 

43574 

32 

*7520 

c: 

01A57 

0 

C: 

25601 

1 

C: 

25542 

0 

C ; 

00032 

32 

* 7530 

I : 

666 1 6 

0 

C ; 

25577 

0 

C: 

25603 

0 

I : 

77576 

32 

♦ 75AO 


075A6 

1 

I ; 

77576 

0 


05654 

0 

c; 

67037 

32 

*7550 


07741 

1 


33533 

1 


50115 

1 


20115 

32 

*7560 


07552 

1 


A 1 2 6 1 

1 


5 1 446 

0 


41262 

32 

. 7570 

c: 

00010 

0 

C: 

15A20 

0 

C; 

OOOOO 

1 

c; 

27340 

32 

« 7600 

c: 

00000 

1 

C; 

2243A 

1 

1 1 

77576 

0 


40646 

32 

*7610 


76772 

1 


10000 

0 


07617 

0 


02362 

32 

*7620 

1 : 

75176 

0 

C; 

00774 

0 

c: 

33107 

1 

I : 

76776 

32 

*7630 


07633 

0 


51446 

0 


07741 

1 


04000 

32 

*76A0 


32 1 A6 

0 


020A5 

1 

C: 

6 6 a04 

1 


34516 

32 

*7650 

C: 

0OA02 

1 


03430 

0 

C: 

OO4OO 

0 


07741 

32 

*7660 


07662 

1 


07737 

0 


51446 

0 


07741 

32 

*7670 


OAOOO 

0 

I : 

71174 

0 

I : 

66 7 56 

0 

I ; 

77576 

32 

.7700 


51AA7 

1 


0565 4 

0 

C: 

66002 

0 

i: 

77576 

32 

*7710 


51AA7 

1 


07741 

I 


03007 

0 

C: 

01A02 

32 

*7720 


76AI6 

0 


10000 

0 


07735 

1 


20017 

32 

*7730 


03A30 

0 

C: 

00010 

0 


02276 

0 

c: 

04104 

32 

*77A0 

c; 

67037 

1 


056 54 

0 

c: 

66241 

0 


07743 

32 

*7750 


@ 



§ 



& 



& 

32 

* 7760 


6 



§ 



w 



& 

32 

• 7770 





@ 



& 



& 
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tHe right of each word? denotes unused fixed Memory, 

( iNTERpRETlVE operator WORpS) OR «C" (CONSTANTS). 


0 


03A74 

0 

C: 

loooo 

0 


OAOOO 

0 

1 : 

66776 

1 

1 

1 ; 

66 756 

0 

I : 

66742 

0 

c; 

25573 

1 

c; 

25433 

1 

0 


41A65 

0 


AOOOO 

0 


50755 

0 


03440 

1 

1 

CJ 

OOaOO 

0 


3A5l6 

1 


51AA6 

0 


03430 

0 

0 


44516 

0 


02312 

0 

c; 

OOOOA 

0 


32151 

0 

1 

I : 

666 1 6 

0 

C ; 

OOOOa 

0 

C; 

255IA 

0 

C; 

01457 

0 

0 


37575 

1 


02173 

0 

c; 

50A63 

0 


11722 

0 

I 

C; 

OOaOO 

0 


3A5l6 

1 


51AA6 

0 


02362 

1 

0 


50666 

1 


33556 

1 


02312 

0 

c; 

OOOOa 

0 

0 

I ; 

65132 

1 

I : 

73615 

1 

c: 

00027 

1 

c; 

25603 

0 

0 

C; 

25530 

0 

1 : 

77576 

0 


O774I 

1 

1 : 

A7575 

0 

0 


0565A 

0 

c: 

6703? 

1 


03A16 

1 

c: 

00100 

0 

1 


03430 

0 

C: 

01000 

0 


03416 

1 

c: 

OAOOO 

0 

0 


41263 

0 


20115 

0 


51416 

0 


10115 

0 

1 


5I447 

1 


07321 

0 

c: 

OOOOO 

1 

C ; 

00310 

0 

0 

C; 

00077 

1 

C! 

2 1 A50 

0 

C! 

OOOOO 

1 

c: 

2AA0a 

1 

1 


74506 

1 


10000 

0 


07664 

1 


A0647 

0 

1 

Ci 

00071 

1 


3765 A 

1 


51442 

1 


OaOOO 

0 

0 

c: 

12421 

0 

1 : 

77576 

0 


11446 

1 


07631 

1 

0 

l: 

76776 

0 

c: 

26256 

1 

i: 

77576 

0 


20017 

0 

i 


5 1 A46 

0 


37655 

0 


5LA42 

1 


02276 

0 

1 

Cj 

02647 

0 

C; 

03071 

1 

I ; 

77576 

0 


1 1 AA6 

1 

1 


40646 

1 


74512 

1 


10000 

0 


07741 

1 

0 

C; 

01002 

1 

c: 

26001 

1 

C; 

25704 

0 


4451b 

0 

0 


11447 

0 


O77I2 

1 


07717 

1 


33532 

0 

0 


11447 

0 


51447 

1 


07741 

1 


40647 

0 

0 


34516 

1 


02173 

0 

c: 

64710 

0 


20016 

1 

0 


07741 

1 


03416 

1 

c: 

01000 

0 


05654 

0 

0 


07744 

1 

cksm 

50116 

1 


& 



@ 




§ 



@ 






& 




& 



$ 






§ 







@ 









YUL system KOR AGC^r; REVISION 0 OF PROGRAM SOLRUM55 SY 


OCTAL LIStINCj oF PARAGRAPH ^ ^ITH PARIlY Blj IN BINARY AT 

ALL VALID WORDS ARe BASIC INStRUCUONS eXCePT THOSe MARKED mI« 


33 *6000 

c: 

00005 

1 

c: 

06565 

1 


40646 

1 


74513 

33*6010 

c: 

12421 

0 

1 ; 

77576 

0 


02276 

0 

C: 

OO 5 O 5 

33,6020 


5l36l 

1 


51362 

1 


5136 3 

0 


51364 

33,6030 


1 1446 

1 


51446 

0 


06241 

0 

C; 

00076 

33 ,60^0 

I 

46753 

1 

C: 

01002 

1 

C: 

21 742 

0 

c: 

OUl 1 

33 ,60s0 

c 

26235 

1 

C: 

32033 

0 

I ; 

70776 

0 

c: 

00037 

33,6060 

I 

64772 

1 

C: 

00033 

1 

C: 

26163 

1 

c; 

0000a 

33,6070 

c 

26173 

0 

I ; 

45176 

u 

C; 

OOQ37 

0 

c; 

33A45 

33*6100 

I : 

57706 

1 

I 

75606 

0 

I : 

44376 

0 

CI 

01353 

3 3 , 6 i 1 0 

C ; 

00002 

0 

C 

33345 

0 

I ; 

47575 

0 

I : 

75542 

33,6120 

I : 

43776 

0 

c 

26171 

1 

C; 

2612 6 

0 

I : 

75176 

33,6130 

c; 

01361 

1 

C 

20265 

1 

C; 

12375 

0 

I ; 

44^5 

33,6 1 aO 


06 156 

0 


20067 

1 


4 0040 

1 


50616 

33,6l50 


40044 

0 


50620 

u 


36157 

1 


03100 

33 , 6 1 60 

C: 

06057 

0 

C: 

03250 

0 

C: 

37656 

0 

c; 

02437 

33,6l70 

c; 

00026 

0 

C; 

30133 

0 

I ; 

47574 

1 

I ; 

56633 

33,6200 


30115 

1 


51460 

1 


20017 

0 


40036 

33,6210 


06213 

1 


64516 

1 


40000 

0 


61460 

33,6220 


06222 

0 


35501 

0 


64516 

1 


02173 

33,6230 

C; 

00010 

0 


02275 

0 

C: 

00204 

1 


06241 

33 ,62A0 

C: 

65717 

0 


11030 

1 


36252 

1 


66253 

33,6250 

C; 

00105 

0 


02124 

1 

C; 

03100 

0 

c; 

14400 

33 ,6260 

c: 

00001 

0 

C; 

00052 

0 

C: 

00054 

0 

c; 

26266 

33,6270 

I , 

\ 42176 

1 

Cl 

20271 

1 

C: 

03621 

1 

c; 

32 OO 7 

33,6300 

I 

42176 

L 

c 

03611 

1 

C: 

32005 

0 

I : 

47575 

33,6310 

I 

51640 

1 

1 

73176 

0 

C: 

00045 

0 

Cl 

01367 

33,6320 

C 

26310 

1 

c 

00052 

0 


04000 

0 

I : 

75575 

33,6330 

I 

76776 

0 

C 

12110 

1 

1 : 

75776 

0 

c: 

OI 477 

33,6340 

C 

: 01513 

1 

C 

12237 

1 

C; 

77777 

0 

c; 

00054 

33,6350 

I 

J 41766 

0 

I 

44772 

0 

C; 

00766 

0 

c: 

01505 

33,6 360 


40646 

1 


74513 

0 


10000 

0 


02124 

33,6370 


40647 

0 


74513 

0 


10000 

0 


02124 
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the right oF each ^oRd; denotes unused fixed memory. 


(Interpretive operator words) or hCm (Constants* , 


0 


lOOOO 

0 


06241 

0 


04000 

0 

i: 

76776 

0 

1 


11446 

1 


0601? 

1 


06034 

0 


51360 

0 

1 


51365 

0 


36033 

1 


51444 

1 


5I445 

0 

0 


03452 

1 

C; 

02000 

0 


O4OOO 

0 

I: 

75775 

0 

1 

c 

33403 

0 

1 : 

47575 

0 

I : 

426l6 

0 

CI 

01353 

0 

0 

c 

0 1 445 

0 

I : 

64773 

0 

1 : 

63746 

1 

1 : 

62746 

0 

0 

c 

26072 

0 

c; 

77777 

0 

C: 

26072 

0 

CI 

01030 

0 

1 

I 

64776 

0 

c: 

26165 

1 

C: 

01030 

0 

1 1 

71173 

1 

0 

c 

00050 

1 

c 

77777 

0 

c: 

01353 

0 

CI 

01403 

1 

0 

c 

26167 

0 

c 

01361 

1 

I ; 

47574 

1 

II 

71132 

1 

0 

c 

33361 

0 

I 

50775 

1 

I : 

T6572 

0 

CI 

01345 

1 

1 

I 

47175 

1 

c 

01353 

0 

c; 

00003 

1 


O33O2 

0 

0 


20067 

1 


40042 

0 


50617 

1 


20067 

1 

o 


03250 

0 


03362 

0 


0624 1 

0 

CI 

00640 

0 

0 

c; 

03204 

1 

c; 

33423 

1 

c: 

02436 

1 

c; 

27O24 

1 

1 

I ! 

43575 

1 

Ci 

OOOO5 

1 

c: 

00035 

1 

c: 

26134 

0 

o 


50666 

1 


61465 

1 


10000 

0 


64500 

0 

1 


61560 

0 


51461 

0 


lOOOO 

0 


06222 

0 

0 

C! 

64710 

0 


02276 

0 

C! 

00104 

1 


03430 

0 

0 

I ; 

77576 

0 


O3OO7 

0 

c; 

01401 

0 


05654 

0 

0 


51027 

0 


60000 

1 


50755 

0 


02276 

0 

0 

c 

00007 

0 

I 

53574 

1 

I ; 

45415 

0 

I : 

53576 

0 

1 

c 

00003 

1 

1 

76776 

0 

CJ 

13402 

0 

1 1 

76575 

1 

1 

I 

47575 

0 

I 

47065 

1 

C! 

OOOO7 

0 

c: 

32003 

0 

0 

I 

47165 

0 

c 

00023 

0 

CI 

32015 

1 

1 1 

74I74 

0 

1 

c 

03021 

1 

c 

37065 

0 

I : 

51575 

1 

1 1 

44576 

0 

1 

I 

54572 

0 

c 

OOOO7 

0 

c; 

26360 

0 

c: 

12013 

0 

1 

c 

12241 

0 

I 

; 75774 

1 

I : 

50615 

0 

1 1 

47I76 

L 

0 

c 

; 26347 

0 

c 

; 32027 

0 

I : 

47573 

0 

1 f 

41753 

0 

o 

c 

; 26403 

1 

c 

: 00004 

0 

C; 

12402 

1 

1 : 

77576 

0 

1 


34512 

0 


70647 

0 


lOOOO 

0 


06377 

1 

1 


02362 

1 

c 

; 00041 

1 


02124 

1 


02362 

1 


^8Ab78A VUL SYSTEM FOR aOC^: REVISION 0 OF RRoGRAM SOLRUMSS BY 


OCTAL listing of PARAGRAPH wiTH PAKItY BIT IN BINARY Aj 

ALL valid words are basic inSxructions e^gept those marked "I" 


33 

♦ 6 A 00 

c; 

000A2 

1 


0212<+ 

1 

c: 

00516 

0 

c: 

07363 

33 

t 6 A 1 0 

C; 

30331 

0 


0306^ 

1 


OAOOO 

0 

I : 

75776 

33 

t6A20 


02173 

0 

C: 

66525 

0 


0212A 

1 


OAOOO 

33 

»oA30 

I: 

A7576 

0 

C: 

32701 

0 

I: 

A3575 

1 

I ; 

A3575 

33 

t 6 A AO 


03A16 

1 

C: 

OOOOA 

0 


AA516 

0 


02312 

33 

t6A50 

C; 

00022 

1 

C; 

26A60 

1 


03Al6 

1 

C; 

10000 

33 

t b A 6 0 

c : 

00056 

1 

c: 

26A73 

0 

I : 

n576 

0 


20017 

33 

t6A70 


51AA6 

0 


06A73 

1 

I : 

77576 

0 


A A5 1 6 

33 

♦ 6500 

I 

76776 

0 

r- 

01A75 

0 

Cl 

lAOOl 

0 

I 

A3576 

33 

♦ 6510 

I 

A3A55 

1 

c 

OOOOl 

0 

C; 

OOOA5 

0 

C 

25521 

33 

♦ 6520 

I 

AA176 

1 

c 

33A61 

1 

C: 

33A53 

0 

I 

AA576 

33 

♦ 6530 


7A50A 

0 


lOOOO 

0 


06552 

0 


36526 

33 

♦ 65 AO 


02173 

0 

C: 

66525 

u 


02256 

1 


32156 

33 

♦ 6550 

C: 

66527 

1 


02256 

1 


U3A52 

1 

C! 

01000 

33 

♦ 6560 


OAOOO 

0 

I : 

66775 

1 

I ; 

A3633 

0 

c; 

01A53 

33 

♦ 6570 

C5 

26601 

1 

1 : 

A5176 

0 

C: 

CiU55 

1 

CJ 

33A53 

33 

♦ 6600 

1 ; 

75775 

0 

1 : 

AA772 

0 

C; 

01323 

1 

CJ 

0U53 

33 

♦ 6610 

Cl 

2661A 

0 

I; 

77576 

0 


U212A 

1 

I ! 

77576 

33 

♦ 66 20 


0212A 

1 


02362 

1 

C: 

00021 

1 


OAOOO 

33 

♦ 6630 

1 : 

A3175 

0 

1 1 

A1033 

1 

C; 

0167A 

0 

Cl 

33315 

33 

♦ 664 O 

I ; 

76776 

0 

Cl 

12110 

1 

I ; 

76776 

0 

C! 

12213 

33 

♦ 6650 

Cl 

01375 

1 

Cl 

33A17 

0 

I : 

75176 

0 

C; 

01A03 

33 

♦ 6660 


51001 

1 


51002 

1 


51003 

0 


5100A 

33 

♦ 667 O 


10000 

0 


03062 

0 


02256 

1 


35362 

33 

♦ 6700 


3A513 

1 


02312 

0 

C 

00005 

1 


35712 

33 

♦ 6710 

C: 66713 

1 


02256 

1 

C 

OO 3 IO 

0 


A 0 6 A 6 

33 

♦ 6720 

I - 

A5176 

0 

Cl 

27036 

1 

c 

33030 

1 

I 

75176 

33 

♦ 6730 

C 

3366A 

0 

1 1 

77576 

0 


02276 

0 

c 

01205 

33 

♦ 67A0 

C 

01656 

0 

c 

33101 

1 

I 

75176 

0 

c 

0156A 

33 

♦ 6750 

I 

AA776 

1 

c 

01231 

0 

c 

00002 

0 

c 

32766 

33 

♦ 6760 

I 

75176 

0 

c 

OIIO 7 

0 

c 

3277A 

1 

I 

75575 

33 

♦ 6770 

I 

75175 

0 

I 

AA776 

1 

c 

01101 

0 

c 

00002 


NASA 102110B-021 
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the right of each WORD; DENOTE^ UNUSeD FIXeD MeMORY, 


(Interpretive operator words) or "C" (Constants), 


0 


0565A 

0 

C 

30223 

1 


035 I 6 

0 


0565A 

0 

0 

c 

26500 

0 

I 

7 ^576 

0 


20017 

0 


3A516 

1 

0 

I 

76776 

0 

C 

26500 

0 

I : 

?7576 

0 


0212A 

1 

1 

c 

00025 

0 

C 

26 AA 7 

1 

c; 

OOOA3 

0 

c; 

26A73 

0 

0 

C: 

00003 

1 


0212A 

1 

1 ; 

A 3575 

1 

i; 

77576 

0 

0 


02362 

1 

Cl 

00022 

1 


O 6 A 73 

1 

I; 

A3576 

1 

0 


3A5l6 

1 


02173 

0 

c: 

6A527 

0 


35503 

1 

0 


02312 

0 

C; 

OOOO 2 

0 


0212A 

1 

I ; 

A5575 

1 

1 

c 

000A6 

0 

CJ 

26A31 

0 

I ; 

5357A 

1 

1 : 

A3A55 

1 

0 

c 

00003 

1 

Cj 

000A3 

0 

C; 

26521 

0 

Cj 

OOOO 5 

1 

0 

c 

0U75 

0 


03AAO 

1 

c; 

01000 

0 


A06A7 

0 

0 


706A7 

0 


10000 

0 


a65A3 

0 


36556 

1 

1 


020A6 

1 

c 

66560 

1 


36557 

0 


02173 

0 

0 


02256 

1 

c 

00000 

1 

c: 

0076A 

1 

c; 

00062 

0 

1 

Cl 

01A55 

1 

c 

26572 

0 

CJ 

33A55 

0 

1 : 

76776 

0 

0 

I ! 

77576 

0 


03A52 

1 

CJ 

01000 

0 


O 4 OOO 

0 

1 

Cl 

00002 

0 

C! 

12375 

0 

i: 

A3576 

1 

c; 

00047 

1 

0 


20017 

0 


321A6 

0 


020A6 

1 

c: 

66A23 

1 

0 

1 1 

A3176 

0 

c; 01676 

1 

I : 

A3176 

0 

c; 

01675 

1 

0 

II 

75575 

1 

1 1 

76776 

0 

c; 

00007 

0 

c; 

12041 

1 

1 

I: 75176 

0 

c: 01367 

1 

c: 

33A11 

0 

1 : 

75176 

0 

1 

C 

33A25 

1 

II 

76776 

0 

cj 

26AIA 

1 


45501 

1 

1 


51005 

0 


51006 

0 


3A500 

0 


70646 

1 

0 


02312 

0 

Cl 

OOOO 5 

1 


A0036 

0 


50667 

0 

0 


02173 

0 

c: 66666 

1 


321A7 

1 


02046 

1 

1 


7 A 5 O 2 

0 


10000 

0 


O 7 O 3 O 

0 


O 4 OOO 

0 

0 

C 

: OllOl 

0 

C 

33656 

1 

1 : 

75176 

0 

c: 

01 107 

0 

1 


03A30 

0 

C 

50000 

1 


04000 

0 

I i 

75176 

0 

1 

C 

33107 

1 

I 

76776 

0 

c: 

20001 

1 

1 ; 

75175 

0 

1 

1 

76575 

1 

I 

76776 

0 

C! 

20265 

1 

C; 

216A3 

0 

1 

1 

57572 

0 

c 

12A62 

1 

c: 

01A71 

1 

Cl 

12421 

0 

0 

C 

32766 

1 

I 

76776 

0 

c: 

216A3 

0 

I ; 

76776 

0 
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All valid 

words 

are basic 

Instruct ions 

EXCEPT those 

marked "I" 

(iNTERpRETlVE 

operator 

WORpS) OR 

(*C>i 

(CONSTANTS) . 



33,7000 

c; 

12A21 

0 

I ; 

76776 

0 

C: 

26256 

1 

I ; 

45176 

0 

C: 

27034 

0 

c: 

33030 

1 

i; 

75176 

0 

c; 

01223 

0 

33,7010 

c; 

3277A 

1 

I : 

75175 

0 

I : 

44776 

1 

c; 

01215 

0 

C; 

00002 

0 

c; 

32766 

1 

I : 

^6776 

0 

c; 

21643 

0 

33*7020 

I : 

77576 

0 


3451b 

1 


5 1 446 

0 


02362 

1 

C: 

00024 

1 


02276 

0 

C! 

02405 

1 


02124 

1 

33*7030 


02276 

0 

c: 

OI3O5 

u 


02124 

1 

Cl 

I44OO 

0 

C: 

00000 

1 

c; 

31000 

0 

c; 

00000 

1 


20017 

0 

33,7040 


32162 

0 


02052 

1 

C: 

11147 

0 


20016 

1 


34516 

1 


50037 

0 


445 1 6 

0 


02312 

0 

33 » fOsO 

C; 

00004 

0 


44516 

0 


02312 

0 

Cl 

00002 

0 


33232 

1 


02312 

0 

Ci 

OOOO3 

1 


O57O2 

1 

33*7060 


20017 

0 


44502 

0 


7OOII 

0 


50011 

1 


03A05 

0 

C: 

40020 

1 


O343O 

0 

c: 

00430 

0 

33*7070 


05654 

0 

C! 

30223 

1 


03516 

0 


36254 

1 


70647 

0 


10000 

0 


O7IOI 

0 


03504 

0 

33*7100 

c; 

00100 

0 


05654 

0 

C: 

30331 

0 


03066 

1 


40036 

0 


50665 

1 


34505 

0 


70646 

1 

33*7110 


10000 

0 


O7II6 

0 


3 4 5 1 0 

1 


70646 

1 


10000 

0 


07126 

0 


34507 

1 


70725 

0 

33*7120 


10000 

0 


07147 

i 


34515 

1 


7 0/25 

0 


10000 

0 


07156 

1 


40646 

1 


74503 

1 

33*7130 


10000 

0 


07215 

0 


34505 

0 


70646 

1 


10000 

0 


07211 

1 


03452 

1 

C; 

O2OOO 

0 

33 *7 1 AO 


20017 

0 


36556 

1 


02173 

0 

c: 

67260 

1 


02276 

0 

C: 

01303 

0 


02124 

1 


20017 

0 

33*7150 


36712 

0 


02173 

0 

C: 

67166 

1 


02276 

0 

CI 

O27O3 

1 


02124 

1 


20017 

0 


37221 

i 

33*7160 


02173 

0 

c: 

67177 

1 


20016 

1 


02276 

0 

c: 

03003 

1 


02124 

1 


03405 

0 

Cl 

40200 

1 

33 *7170 


37221 

1 


02173 

0 

C; 

67177 

1 


33551 

0 


02312 

0 

Cl 

OOOO3 

1 


02256 

1 


03405 

0 

33*7200 

C: 

4OOO2 

1 


37220 

0 


02173 

0 

c; 

67205 

1 


02256 

1 


32162 

0 


02052 

1 

c; 

67126 

0 

33 * 7210 


02256 

1 


20017 

0 


32146 

0 


02046 

1 

C; 

67224 

1 


03373 

0 

c: 

4OOOL 

1 


02124 

1 

33 1 7220 

c; 

00031 

0 

C: 

00536 

1 

C: 

00764 

1 

c; 

01274 

1 


02362 

1 

C: 

00061 

0 


O4OOO 

0 

i: 

73175 

0 

33,7230 

I : 

75633 

0 

C; 

00774 

0 

C: 

27257 

1 

1 1 

47575 

0 

I : 

41753 

0 

Cl 

00766 

0 

CJ 

33417 

0 

I : 

47573 

0 

33 *72A0 

I : 

A1753 

0 

I : 

75642 

0 

I : 

47176 

1 

c: 

00774 

0 

C: 

27255 

0 

Cl 

33411 

0 

I : 

47575 

0 

i : 

41753 

0 

33*7250 

C; 

01417 

1 

C: 

33425 

1 

I : 

76776 

0 

C; 

26414 

1 

Ci 

33555 

1 

Cl 

01106 

1 

c; 

20000 

0 

Cl 

00000 

1 

33*7260 


36556 

1 


02173 

0 

Cl 

67342 

0 


34501 

1 


02046 

1 

c: 

67274 

1 


03405 

0 

Cl 

40007 

1 

33,7270 


3353A 

0 


02312 

0 

C: 

00003 

1 


02256 

1 


4O7OO 

1 


^0000 

0 


51314 

0 


11314 

1 

33 * 7300 


6A516 

1 


07303 

0 


64516 

1 


50115 

1 


25777 

1 


47353 

1 


64504 

1 


77354 

0 

33*7310 


30115 

1 


25777 

1 


44504 

0 


60115 

1 


20017 

0 


50700 

0 


11314 

1 


30 1 1 5 

1 

33 i r320 


07324 

0 


40 7OO 

I 


5O7OO 

0 


40115 

0 


5 1 450 

1 


20016 

1 


02276 

0 

c; 

01503 

0 

33, 7330 


03440 

1 

C; 

20000 

0 


05654 

0 

Ci 

30216 

1 


05654 

0 

c: 

30331 

0 


03066 

1 


02276 

0 

3 3* 7 34O 

c ; 

0 leOj 

0 


02124 

1 


03373 

0 

c: 

40014 

0 


33537 

0 


O23I2 

0 

c; 

OOOO3 

1 


36556 

i 

33 t 735O 


02173 

0 

Cl 

67355 

0 


02256 

1 

C: 

36000 

1 

C; 

74000 

1 


32146 

0 


02046 

1 

c; 

67361 

1 

33 . 73a0 


02256 

1 


02362 

1 

Cl 

00062 

0 


35501 

0 


5 U72 

1 


51473 

0 


O4OOO 

0 

1 1 

76776 

0 

m 

33*7370 

c; 

21244 

0 

I : 

76776 

0 

C: 

12213 

1 

1 1 

75176 

0 

Cl 

01367 

1 

Cl 

33411 

0 

1 1 

75176 

0 

c: 

01375 

1 
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33,7400 

C: 

33417 

0 

I ; 

75176 

0 

C: 

OI403 

1 

c; 

33425 

33,7410 

C: 

30216 

1 


04000 

0 

1 : 

75175 

0 

I : 

76776 

33,7420 

C: 

00105 

0 


20017 

0 


40036 

0 


67440 

33,7430 


02173 

0 

C: 

67442 

1 


02124 

1 


05654 

3 3 1 / 440 

C: 

00310 

0 

C: 

01476 

0 


32162 

0 


02046 

33,7450 

CkSM 

60133 

0 





& 



S 

33, 7460 





§ 



i 



g 

33,7470 








§ 



§ 

33*7500 





@ 






9 

33 , 7510 


e 



& 



3 



3 

33,7520 


e 



& 



& 



§ 

33,7530 





@ 



§ 



§ 

33,7540 





@ 






8 

33,7550 








S 



g 

33,7560 





§ 



3 



§ 

33* ^570 


§ 






9 



g 

33*7600 


e 






3 




33*7610 


§ 



§ 






9 

33*7620 


§ 



€ 



§ 



b' 

33*7630 





f 



3 



9 

33*7640 





e 



*«■ 



& 

33*7650 


§ 






9 




33*7660 


§ 



& 



g 



g 

33*7670 





§ 



& 



9 

33*7700 


§ 



& 



9 



9 

33*7710 


§ 



& 



9 



& 

g 

33*7720 





§ 



9 



33*7730 


& 






@ 



9 

33*7740 


§ 






9 



& 

V- 

33*7750 


(p 



& 



i 



33*7760 


& 



& 



§ 




33*7770 





§ 



9 



g 
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1 

0 

0 

0 


I; 76776 0 

c; 00766 0 

02173 0 
Cl 30331 0 


Ci 26AU 1 
c: 216A3 0 
C! 65152 1 

07435 1 


c; 00007 0 

I; 77576 0 
40036 0 
02124 1 


05654 0 
02276 0 
67441 1 
C; 00000 1 


64336 0 

02256 1 

07446 0 

07447 i 


@ 

g 

g 

§ 

@ 


& 


@ 


§ 

§ 

@ 




@ 

g 

§ 


@ 

@ 

@ 

e 

@ 

@ 

& 

§ 


@ 

§ 

@ 



& 


@ 


e 

e 


e 






§ 


g 

§ 

§ 



§ 

@ 


s 


@ 

e 

@ 


@ 

§ 


€ 

e 



@ 

@ 

@ 

@ 

g 

@ 


e 


§ 

§ 

§ 

e 

§ 


& 


e 

§ 

& 

e 

@ 


g 

§ 

§ 


e 


§ 

@ 

& 


e 

@ 

§ 

@ 
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octal listing oF paragraph # 16 Uf i^ItH parity bit in binary At 

ALL VALID WORDS ARe BASIC INSTRUCTIONS EXCEPT THOSE MARKED » I <• 


3^ ♦ 6 000 


05654 

0 

C: 

25331 

1 


03302 

0 


03310 

3A ♦ 6® 1 0 


51224 

1 


21224 

0 


4 1 EO4 

1 


21224 

3A » 6020 


61224 

1 


lOOOO 

0 


44473 

1 


61224 

3*t,6030 

C; 

01225 

0 

I: 

44175 

1 

I ; 

66776 

1 

C; 

02421 

3 '♦,6040 


662 36 

0 


loooo 

u 


34473 

0 


61224 

34,b0^0 


34473 

0 


51224 

1 


04000 

0 

1 : 

73576 

3*, , bObO 

1 : 

47575 

0 

I : 

567A3 

i 

C: 

00002 

0 

c; 

O24O5 

34,6070 

C; 

01521 

0 

C; 

33521 

1 

I ; 

44174 

0 

I : 

63643 

34,6100 

c: 

33525 

0 

I : 

77576 

0 


4I3I2 

1 


4OOOO 

34 , 6 1 1 0 


34475 

0 


61224 

1 


06051 

0 


61312 

34,6120 


51572 

0 


35501 

0 


51573 

1 


04000 

34,6130 

I : 

47574 

1 

1 : 

63706 

0 

I ; 

70776 

0 

c: 

00006 

34,6140 

I ; 

61776 

0 

C; 

77777 

u 

C; 

00304 

0 

c: 

01573 

34 , 6 1 SO 

C; 

00005 

1 

C; 

/7777 

0 

C: 

01101 

0 

C; 

33101 

34 , 6 1 60 


64341 

0 


10003 

0 


34475 

0 


61224 

34 ,6l70 

C; 

01101 

0 

1 : 

64775 

u 

1 : 

66 776 

1 

C: 

01525 

34*6200 

c: 

00002 

0 

I : 

63774 

0 

1 : 

64732 

0 

I : 

61722 

34,6210 

C; 

77777 

0 

C; 

30234 

1 

C: 

32622 

0 

I ; 

77576 

34,6220 


03315 

0 


03136 

0 


06237 

1 


34473 

34,6230 


51100 

1 


51101 

0 


06051 

0 

c; 

02321 

34 * 6240 

C: 

25406 

1 


05706 

0 


51573 

1 


05654 

34 ,6250 


03100 

0 


03315 

0 


345l6 

1 


05654 

34,6260 


20735 

1 


40003 

0 


4OOOO 

0 


5I3O2 

34,6270 


40735 

1 


51304 

1 


05654 

0 

c; 

30453 

34 ,6300 


03315 

0 


345 Is 

1 


05654 

0 

c: 

3O4O6 

34,6310 


20067 

1 


50053 

1 


04000 

0 

1 ; 

73576 

34,6320 

I : 

76776 

0 

c: 

00041 

1 

C; 

00001 

0 

c: 

04524 

34,6330 

c; 

33175 

1 

1 : 

77576 

0 


04000 

0 

1 1 

76776 

34 , 6340 


05654 

0 

C; 

30331 

0 


06237 

1 


10)34 

34,6350 

C; 

30327 

1 


06237 

1 


35503 

1 


60735 

34 ,6360 

c; 

00736 

0 

1 ; 

76776 

0 

c: 

04733 

1 

I ; 

44775 

34,6370 

I ; 

47576 

0 

C; 

33411 

0 

I: 

76776 

0 

c: 

30421 
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the right oF each word; "©•* denotes unused fixed memory. 


(Interpretive operator words) or "C" (Constants), 


0 


33533 

1 


51311 

0 


35501 

0 


51312 

0 

0 


61212 

1 


21224 

0 


51212 

1 


36235 

(J 

1 


06010 

0 


51224 

1 


04000 

0 

1; 

73576 

1 

1 

C; 

01101 

0 

C; 

36421 

0 

I: 

77576 

0 


41224 

0 

1 


06025 

0 


51100 

1 


51101 

0 


51312 

0 

1 

C; 

01225 

0 

1 : 

66 376 

0 

C; 

02421 

1 

C; 

02405 

1 

1 

C; 

36421 

0 

I : 

47575 

0 

I : 

63742 

0 

c; 

OOOO3 

1 

0 

I: 

7O776 

0 

c; 

02421 

1 

c; 

OOOO5 

1 

c; 

01525 

1 

0 


61224 

1 


40000 

0 


66235 

0 


lOOOO 

0 

0 


51224 

1 


21224 

0 


41113 

1 


4000a 

0 

0 

I: 

71576 

0 

C; 

01225 

0 

I; 

45176 

0 

C; 

77777 

0 

1 

c: 

01573 

1 

C: 

01523 

1 

c; 

33523 

0 

I : 

63775 

1 

1 

I : 

44174 

0 

I : 

63722 

0 

1 : 

70776 

0 

C! 

02223 

0 

1 

l! 

77576 

0 


41224 

0 


66235 

0 


61312 

0 

1 


06114 

0 


04000 

0 

I : 

64776 

0 

c: 

01521 

0 

1 

C: 

01523 

1 

1 : 

51175 

0 

i; 

56776 

1 

c; 

01521 

0 

1 

Cl 

01312 

0 

c; 

00012 

1 

c; 

01525 

1 

c; 

77777 

0 

0 


05654 

0 

c: 

14000 

1 


37730 

1 


03100 

0 

0 


51312 

0 


05654 

0 

c: 

25331 

1 


35501 

0 

0 

C! 

00000 

1 

c: 

00077 

1 

c: 

00105 

0 


05654 

0 

0 

C: 

30453 

0 


34516 

1 


50616 

0 


37731 

0 

0 

Cj 

30406 

0 


05654 

0 

C; 

30327 

1 


06237 

I 

1 


20735 

1 


40001 

1 


4OOOO 

0 


51303 

0 

0 


35503 

1 


50616 

0 


37731 

0 


03100 

0 

0 


11305 

1 


06374 

1 


41304 

0 


65503 

1 

1 

C: 

01305 

0 

I : 

76776 

0 

c; 

04733 

1 

I : 

44775 

1 

0 

I : 

47576 

0 

c: 

33403 

0 

I ; 

45l76 

0 

c; 

01303 

0 

0 

C; 

30613 

0 

1 1 

76776 

0 

C! 

30634 

0 

1 ; 

77576 

0 

0 


06347 

1 


06332 

0 


06347 

1 


05654 

0 

0 


20067 

1 


50050 

1 


04000 

0 

1 1 

71576 

0 

1 

I : 

76776 

0 

c: 

00041 

1 

c; 

OOOOl 

0 

Ct 

04524 

□ 

0 


04000 

0 

1 ; 

735/6 

1 

c; 

01305 

0 

1 : 

76776 

0 


4tt<*t»7RA ydl System for agca; revision o of- program solrumss bv 


OCTAL listing OF PARAGRAPH # 161» rtljH PARITY BIT IN BINARY Ay 

All valid WQRdS are basic U4StRUCTIONS except those marked "I” 


34,6400 

C! 

04733 

1 

I: 75l7b 

U 

c: 00041 

1 

c; 

34,6410 


04000 

0 

I; 71576 

0 

c; 00736 

0 

1 : 

3 *+ ♦ 6 4 2 0 

I ; 

75176 

0 

Ct OllOl 

0 

c; 32007 

1 

I ; 

34,6430 

I ; 

75176 

0 

C; 0147? 

1 

C: 33403 

0 

I : 

3^,6440 

C; 

33417 

0 

I: 77576 

0 

31573 

1 


34 * 6450 

C; 

04644 

0 

I: 77576 

(J 

05654 

0 

C; 

34,6460 


05723 

1 

05 706 

0 

5 I 573 

1 


34,6470 

c: 

00002 

0 

C: 33477 

0 

I: 52775 

0 

1 : 

34 foSOO 

I ; 

41775 

1 

I: 44776 

1 

C; 01477 

1 

C! 

34,6510 

I: 

76776 

0 

C* 30634 

0 

I; 77576 

0 


34 ,6 520 

I ; 

63776 

1 

C: 013 I 5 

1 

C: 00003 

1 

c: 

34,6530 


30115 

1 

5 O 6 I 6 

0 

05654 

0 

c; 

34 » 6540 

C: 

20304 

1 

C: 33317 

1 

I: 43175 

0 

I : 

34,6550 


31573 

1 

05723 

1 

04000 

0 

I ; 

34 , 6560 

C: 

01403 

1 

C: 33101 

1 

l: 75176 

0 

c: 

34 , 65 7 O 


05654 

0 

C; 24050 

1 

I : 76576 

1 

c; 

34 , 6600 

c; 

01315 

1 

I: 57175 

0 

I: 41166 

0 

c: 

34,6610 

C: 

33175 

1 

1; 40576 

1 

I: 76576 

1 

C; 

34 *6620 

1 ; 

50776 

1 

C: 01175 

0 

C: 00013 

0 

c; 

34,6630 

c; 

00051 

0 

C: 33175 

1 

I: 40576 

1 

I ; 

34,6640 

I i 

56376 

0 

c: 03255 

0 

C: 00022 

1 

c; 

34,6650 

Cj 

03255 

0 

C; 37255 

1 

I: 51576 

1 

C: 

34,6660 


05706 

0 

51573 

1 

04000 

0 

I : 

34,6670 

c: 

00011 

1 

C: 31735 

1 

C: 2 O 4 O 4 

0 

c: 

34,6700 


41224 

0 

6 I 3 O 7 

1 

lOOOO 

0 


34,6710 


06000 

1 

51224 

i 

31573 

1 


34,6720 

I : 

66375 

0 

I; 64740 

0 

C; 020 I 7 

0 

c: 

34,6730 

c; 

30721 

0 

I; 40576 

1 

35503 

1 


34,6740 

I : 

44772 

0 

C: 01425 

0 

C: 01403 

1 

c 

34,6750 

Ij 

44772 

0 

C; 01433 

i 

C: 01403 

1 

c 

34,6760 

I : 

44776 

1 

C: 01477 

1 

c: 01505 

0 

c 

34,6770 

Cj 

30634 

0 

II 77576 

0 

05654 

0 

c 


33A03 

76776 

75176 

75176 

05723 

30104 

04000 

44776 


01505 

31573 

32620 

25153 

56776 

76776 

OUll 

20271 

01315 

20253 

01177 

75575 


36505 

30641 

71576 

36201 


34473 

05723 

02245 

67740 

00002 

00002 

00002 

30331 


NASA 1021108-021 
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tHe right df each word* "e" Denote^ unused fixed memory. 


( iNTERpRETlVE operator wORdS) OR "C" (CONSTANTS), 


0 

I ; 

77576 

0 


05654 

0 

c 


30327 

L 


06237 

1 

0 

c: 

04733 

1 

I : 

75176 

0 

c 


00041 

1 

CJ 

33411 

0 

0 

c: 

01107 

0 

c; 

32015 

1 

I 


76776 

0 

c; 

04761 

0 

0 

C; 

OI5O5 

0 

C: 

33411 

0 

I 


75176 

0 

C! 

01513 

1 

1 


05706 

0 


51573 

1 



04000 

0 

1 1 

76776 

0 

1 


05654 

0 

C; 

30331 

0 



06237 

1 


31573 

1 

0 

I : 

52775 

0 

IS 

44776 

1 

Cl 


01425 

0 

Cl 

01403 

1 

1 

C; 

01433 

1 

C: 

OI4O3 

1 

Cl 


00002 

0 

Cl 

33505 

1 

0 

C: 

00002 

0 

c: 

33513 

0 

I i 

> 

76776 

0 

c; 

04353 

0 

1 


05723 

1 


O57O6 

0 



51573 

1 


O4OOO 

0 

1 

I : 

45175 

0 

I : 

76575 

1 

c: 

t 

01317 

0 

c; 

20325 

1 

1 


04000 

0 

1 : 

43175 

0 

I ; 

i 

t 

76576 

1 

Cl 

OO6I7 

1 

1 

c 

00620 

0 

c: 

OOOO3 

1 

c 


33315 

0 

I : 

77576 

0 

0 

c 

31755 

1 

I : 

76776 

0 

c 


03475 

1 

1 : 

75176 

0 

1 

c 

33107 

1 

1: 

76776 

0 

c 


03446 

1 

1 1 

77576 

0 

I 

I 

45176 

0 

C: 

05174 

0 

I 


55I75 

1 

1 1 

47I76 

1 

1 

C; 

31733 

1 

c: 

33177 

0 

r 

t 

t 

76576 

1 

Cl 

20253 

1 

1 

C; 

32051 

1 

I; 

47573 

0 

I 


66716 

1 

1 1 

75652 

1 

1 

c: 01425 

0 

Cl 

01521 

0 

c 


33521 

1 

1 1 

45176 

0 

1 

I; 55561 

0 

c: 

OOOO7 

0 

c 


00003 

1 

Cl 

00001 

0 

1 

I 

63375 

0 

1 : 

65376 

0 

c 

9 

t 

02505 

0 

c; 

00022 

1 

1 

I 

75575 

1 

I : 

76401 

0 

c 

* 

t 

01235 

1 

Cl 

20376 

1 

0 

c 

01225 

0 

1 1 

47574 

1 

I 

< 

t 

63722 

0 

1 1 

76576 

1 

1 

I; 

77576 

0 


31230 

1 



21224 

0 


51102 

0 

0 


61224 

1 


06711 

0 



11313 

0 


06237 

1 

1 

I; 

75575 

1 

Ii 

55576 

0 

c 

* 

f 

00007 

0 

C; 

00003 

1 

0 

C; 

31751 

0 

c; 

02245 

0 

Cl 

36245 

1 

I : 

51576 

1 

0 


20067 

1 


50050 

1 



04000 

0 

l; 

52775 

0 

0 

C 

04524 

0 

1 : 

47576 

0 

c 

9 

* 

33477 

0 

I : 

52775 

0 

0 

c 

04524 

0 

I : 

47576 

0 

c 

t 

t 

33505 

1 

1 1 

41775 

1 

0 

c 

33513 

0 

1 1 

76776 

0 

Cl 

04353 

0 

I : 

76776 

0 

0 


06237 

1 


05654 

0 

c 

t 

24600 

1 

1 1 

47575 

0 


‘'*b^t>7BA yL'L System for agca- revision o of program solrumss by 


OCTAL LIStINO of PARAGRAPH § \ tZ % WITH PARITY BIT IN BINARY AT 

All valid words are basic instructions except those marked "I" 


3A»7000 

I : 

S1622 

0 

C: 

01425 

U 

c; 

00002 

0 

C: 32001 

34 % ?010 

I ; 

43175 

0 

1 : 

41176 

1 

c: 

U5174 

0 

l; 47575 

34t rOZO 

I ; 

7 I766 

0 

I ; 

446A2 

1 

I : 

52642 

0 

c: OOOOl 

34 t ?030 

c; 

77 777 

0 

C; 

01425 

U 

C: 

01521 

0 

c: 33521 

34 % ^040 


07041 

0 


0623 7 

1 


07050 

0 

07055 

34 » yOso 


445 l6 

0 


51226 

0 


455O3 

0 

51227 

34 1 /OfjO 

C; 

01425 

0 

I; 

75176 

u 

C; 

01441 

1 

C: 33425 

34,7070 


455OI 

1 


51226 

0 


445 1 6 

0 

51227 

34 , 7100 

1 : 

75176 

0 

c; 

01441 

1 

I ; 

75176 

0 

C; 01433 

34, 7110 

1 : 

75176 

0 

C: 

777 7 7 

Cl 

C: 

33433 

0 

I; 77576 

34,7120 


07046 

1 


0 4 0 0 0 

0 

1 : 

4I775 

1 

l; 73176 

34, 7130 


07046 

1 


37741 

1 


50034 

0 

35501 

34,7140 


04000 

0 

1 : 

76576 

1 

C; 

20271 

1 

i; 53575 

34,7150 

CI 

33403 

0 

1 : 

53575 

0 

I : 

5755 7 

1 

c ; 3 1 7 1 1 

34,7160 

I ; 

47176 

1 

C: 

01317 

0 

C; 

32011 

0 

i: 57176 

34,7170 

C: 

32015 

1 

I ; 

76 776 

0 

C: 

04761 

0 

I! 75176 

3A,7200 

c; 

33411 

0 

I ; 

75176 

u 

C: 

01513 

1 

c: 33417 

34,7210 


07241 

1 


07260 

1 


07241 

1 

41246 

34,7220 

I ; 

63631 

0 

C; 

01254 

0 

C: 

01250 

1 

C: 00017 

34,7230 

C: 

3I743 

0 

C; 

00001 

0 

C: 

2O4O4 

0 

C: 32622 

34 , 7240 

di 

25256 

1 


04000 

0 

I : 

66774 

0 

1; 61722 

34,7250 

c: 

3 1745 

0 

C; 

20404 

0 

C; 

32622 

0 

I: 77576 

34,7260 


04000 

0 

I : 

76576 

1 

C: 

20265 

1 

i: 54775 

34,7270 

I ; 

51176 

0 

C; 

00001 

0 

I : 

64775 

0 

i: 41176 

34,7300 

I : 

63631 

0 

C: 

01112 

1 

C; 

01 2A4 

1 

c; 00014 

3 H , 7 3 1 0 

C; 

OOOOL 

0 

C: 

00003 

1 

C; 

33140 

1 

I; 54775 

34, 7320 

I ; 

51176 

0 

Cj 

00001 

0 

I : 

64775 

0 

l; 41176 

34,7330 

I ; 

42776 

1 

C: 

01140 

u 

Cj 

01146 

0 

C; 01132 

34,7340 

I : 

45176 

0 

C: 

01115 

0 

C: 

33140 

1 

I! 45176 

34,7350 

I ! 

64771 

1 

C: 

01140 

0 

C; 

01 L46 

Q 

Cl 01132 

34 , 7360 

I ; 

77576 

0 


03302 

0 


03310 

0 

05654 

34,7370 

c; 

20271 

1 

C: 

20265 

1 

I : 

54775 

0 

l; 63631 
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ThE right of each ^ord; ''S'* Denotes unused fixed memory. 
(Interpretive operator woRpS) or »c*' (constants). 


1 

I; 45176 

0 

c: 

00043 

0 

1 : 

47176 

1 

c: 

00046 

0 

0 

1; 75622 

0 

c; 

31737 

0 

ct 

00002 

0 

1 ; 

74773 

1 

0 

C: 00023 

0 

c: 

31037 

1 

c; 

31737 

0 

c: 

00002 

0 

1 

l! 75176 

0 

c t 

32023 

1 

I ; 

40576 

1 


21223 

1 

0 

07075 

1 


07121 

1 


05654 

0 

c; 

24076 

0 

1 

07046 

1 


04000 

0 

1 : 

75 I 75 

0 

It 

47 I 76 

1 

1 

I: 75176 

0 

C: 

77777 

0 

C; 

33441 

0 

I : 

77576 

0 

1 

07046 

1 


04000 

0 

1 1 

75l76 

0 

c; 

01425 

0 

1 

C: 33441 

0 

1 1 

75176 

0 

ct 

77777 

0 

c; 

33425 

1 

0 

45501 

1 


51226 

0 


45503 

0 


51227 

1 

0 

c: 01433 

1 

c; 

01441 

1 

c: 

33425 

1 

I : 

77576 

0 

0 

20034 

1 


51402 

0 


IOO 34 

1 


O 7 I 32 

0 

0 

I : 57557 

1 

C; 

31671 

0 

c; 

01232 

0 

ct 

OOOOl 

0 

1 

C: 01232 

0 

c; 

OOOOl 

0 

ct 

33411 

0 

1 1 

55 I 75 

1 

0 

C: 01317 

0 

C: 

32013 

1 

I : 

75176 

0 

c: 

3 1 7 1 7 

1 

0 

c; 01477 

1 

c; 

334 O 3 

0 

I : 

75176 

0 

c: 

01505 

0 

0 

I: 77576 

0 


05654 

0 

Ct 

25513 

1 


11232 

1 

1 

61252 

0 


51242 

1 


O 4 OOO 

0 

1 1 

54775 

0 

1 

I; 43174 

1 

I; 

64712 

1 

I; 

76576 

1 

C; 

01243 

0 

0 

It 77576 

0 


03302 

0 


03310 

0 


05654 

0 

1 

1 ; 76576 

1 

c; 

01245 

0 

Ct 

01243 

0 

Ct 

01215 

0 

0 

03302 

0 


03310 

0 


05654 

0 

Cl 

25256 

1 

0 

It 63631 

0 

c: 

OIIO 5 

1 

Ct 

01244 

I 

c: 

00014 

1 

1 

C: OOOOl 

0 

c; 

00003 

1 

Ct 

33132 

1 

1 1 

54775 

0 

1 

It 51176 

0 

c; 

OOOOl 

0 

I : 

64775 

0 

1 1 

41176 

1 

0 

I: 63631 

0 

Ct 

01117 

1 

Ct 

01244 

1 

C; 

ooou 

i 

1 

C; OOOOl 

0 

c; 

00003 

1 

Ct 

33146 

1 

1 1 

41775 

1 

0 

C: 33156 

0 

1 : 

45176 

0 

Ct 

OHIO 

0 

ct 

33132 

1 

0 

C: 01122 

1 

c; 

33 IA 6 

1 

1 1 

41774 

0 

I ; 

42712 

0 

0 

C; 01156 

1 

C; 

31747 

1 

Ct 

20404 

0 

Ct 

32622 

0 

0 

C: 25256 

1 


04000 

0 

1 1 

76575 

1 

1 : 

76576 

1 

0 

C: 01264 

0 

c: 

01245 

0 

c; 

00015 

0 

I ; 

66774 

0 


4bA578A YUL SySTEm FOR AGC4; REVISION 0 OF- pROQRAm SOLRUMbS BY 


octal LlSjlNO OF paragraph # 163* ^*ITH PARllY BIT IN BINARY Aj 

All YALID WORdS are basic instructions except those marked *'I" 


3A 

1 7A00 

I : 

63722 

0 

I 

62776 

0 

c 

01262 

0 

c 

01243 

3A 

» /AlO 

C; 

01271 

1 

c 

01252 

0 

c 

00015 

0 

I 

66774 

3A 

» 7A20 

C; 

00015 

0 

c 

31743 

u 

I 

54775 

0 

I 

63631 

3A 

1 7A30 

1 : 

66774 

0 

I 

63722 

0 

1 

62503 

0 

c 

01274 

34 

» ?aaO 

1 : 

71175 

1 

I ; 

63771 

u 

C; 

OOOOl 

0 

C! 

00002 

3a 

t 7450 


03310 

0 


05654 

0 

C; 

2 5 205 

1 


04000 

S'* 

» 7460 

I : 


1 

1 : 

41153 

0 

I : 

44 776 

1 

C3 

01255 

3a 

t7470 

C; 

01305 

0 

I : 

45174 

1 

I ; 

41153 

0 

I ! 

44 776 

3A 

t7500 

1 ; 

62722 

1 

I 

76576 

1 

C: 

00007 

0 

c 

00015 

3*+ 

wbio 

C; 

32622 

0 

1 

77576 

0 


05654 

0 

c 

25205 

3 a 

»7520 

1 ; 

76776 

0 

C 

30613 

0 

I ; 

76776 

0 

c 

30634 

3*+ 

»7530 


31573 

1 


05723 

1 


05706 

0 


51573 

3A 

» 75aO 

C; 

32001 

1 

I 

A7575 

0 

I 

60776 

1 

c 

01250 

3A 

♦ 7550 

C; 

00001 

0 

c 

00015 

0 

c 

01101 

0 

c 

01103 

3A 

♦ 7560 


OAOOO 

0 

I 

71576 

0 

c 

01225 

0 

I 

77176 

3A 

♦ 7570 

C: 

36207 

1 

I 

77576 

0 


31573 

1 


05 723 

3A 

♦ 7600 

C; 

30573 

0 

I : 

77576 

0 


11232 

1 


07666 

3a 

♦ 7610 


05654 

0 

c 

25343 

1 


34510 

1 


51230 

3A 

♦ 7620 


33232 

1 


51220 

0 


20017 

0 


33562 

3A 

*7630 

c: 

71634 

0 


37630 

0 


02060 

0 


02256 

3A 

• 7640 

I : 

76776 

0 

C 

30715 

1 

I 

77576 

0 


11220 

3A 

♦ 7650 

c: 

01115 

0 

c 

31000 

0 

I 

76776 

0 

c 

30613 

3A 

♦ 7660 

c: 

30331 

0 


06237 

1 


11230 

0 


07613 

3A 

♦ 7670 

c; 

67222 

1 

c 

51710 

0 

c 

00000 

1 

c 

00000 

3A 

♦ 7700 

c: 

00000 

1 

c 

00000 

1 

c 

20000 

0 

c 

00000 

3A 

♦ 7710 

C; 

15327 

0 

c 

37747 

1 

c 

00000 

1 

c 

00000 

3A 

♦ 7720 

c; 

00000 

1 

c 

00000 

1 

c 

00000 

1 

c 

00000 

3a 

♦ 7730 

C; 

00666 

1 

c 

00130 

0 

c 

03711 

0 

c 

33265 

3A 

♦ 77A0 

C; 

01100 

1 

c 

00021 

i 

c 

: 01 111 

1 

1 

c 

: uoooo 

3A 

♦ 7750 

C; 

03146 

1 

c 

: 14632 

0 

c 

; 00051 

0 

c 

; 33163 

3A 

♦ 7760 

n 

4517b 

0 

c; 05174 

0 

I 

; 57175 

0 

I 

: 41166 

3A 

♦ 7770 


07770 

0 


07771 

1 

CKSM 60502 

0 




the assembly was GoqO; manufact jrable binary records STOREO 
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the right of each word; denotes unused fixed Memory, 


(Interpretive operator woRdS) or »c” (constants). 


0 

c 

00015 

O 

c 

31743 

0 

1; 

54775 

0 

I ; 

63631 

0 

0 

I 
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i: 
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01301 

1 
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Q 
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0 
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C: 
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1 

c 
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0 

c 

25456 

1 


OAOOO 

0 

I : 

76776 

0 

0 


07606 

0 


07606 

0 


0565 a 

0 

CJ 

25331 

1 

1 


355OI 

0 


5 OOA 4 

1 


5 00 A 5 

0 


5OOA6 

0 

0 


02173 

0 

C! 

71631 

0 
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1 

c; 
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1 

c; 

33002 

0 
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07621 
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0 
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0 
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0 

0 
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0 

c 
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0 
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0 
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C; 
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c; 
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